Name
Delete Procedure
Syntax
procedure Delete(var Str: string; StartingIndex, Count: Integer);
Description
The Delete
procedure removes
Count
characters from a string, starting at
StartingIndex
. If Count
is more
than the number of characters remaining in the string,
Delete
deletes the rest of the string, starting
from StartingIndex
. Delete
is
not a real
procedure.
Tips and Tricks
The first character of a string has index 1.
If
StartingIndex
is not positive or is greater than the length of the string,Delete
does not change the string.If the
Count
is greater than the characters remaining after the starting index, the rest of the string is deleted.If you want to delete characters at the end of a string,
SetLength
is slightly faster than calling the more general purposeDelete
.
Example
// Remove a drive letter from the front of a path.
procedure RemoveDriveLetter(var Path: string);
begin
// First make sure the path has a drive letter in front.
if (Length(Path) >= 2) and (Path[2] = ':') then
// Delete the first two characters of the path.
Delete(Path, 1, 2);
end;
See Also
Copy Function, Insert Procedure, SetLength Procedure, SetString Procedure |
Get Delphi in a Nutshell now with the O’Reilly learning platform.
O’Reilly members experience books, live events, courses curated by job role, and more from O’Reilly and nearly 200 top publishers.