PadLeft(Source: String; Length: Integer; [PaddingChar: Char = " "]): String;
Source. Исходная строка;
Length. Длина, которую приобретет исходная строка, после добавления символов (длина исходной строки + количество добавляемых символов);
PaddingChar. Добавляемый символ.
Метод PadLeft добавляет определенное количество указанных символов, передаваемых посредством параметра PaddingChar, слева к исходной строке, передаваемой посредством параметра Source.
Sub UserProc;
Var
s, s1: String;
Begin
s := "abcdef";
s1 := String.PadLeft(s, s.Length + 2, 'X');
End Sub UserProc;
После выполнения примера в переменной «s» будет содержаться значение «XXabсdef».
См. также: