Delete

(dim S     : [[String]StringZ];
     Index : Longint;
     Count : Longint);

Tato procedura zruší část řetězce S od pozice Index (1..x) v délce Count znaků. Je-li Index větší než délka řetězce S, nebude smazán ani jeden znak. Je-li Count větší než počet znaků od pozice Index, bude řetězec S smazán od pozice Index až do konce. Použije-li se Index=0, řetězec S se nezmění.

Podívejte se na: Řetězce

Příklad:

dim S : String;
S := "ABCDEFGHI";
Delete(S, 4, 3);
Trace(S);  { S = "ABCGHI" }