Функция StringOfChar в Delphi создает строку из одного символа, повторенного много раз.
System unit
function StringOfChar (RepeatCharacter : Char; RepeatCount : Integer) : string;
Функция StringOfChar создает новую строку длиной RepeatCount, заполненную символами RepeatCharacter.
Эта функция избавляет вас от необходимости создания цикла или утомительного ручного набора.
Функция StringOfChar: Показ заголовка с символами подчеркивания внизу
var
text, line : string;
begin
// Запись заголовка с '-' как символы подчеркивания
text := '1.An introduction to life as we know it';
line := StringOfChar('-', Length(text));
// Отображение нашего подчеркнутого заголовка
ShowMessage(text);
ShowMessage(line);
end;Результат
1.An introduction to life as we know it
---------------------------------------
Похожие функции и команды
Concat — соединяет несколько строк в одну.
Copy — создает копию части строки или части массива.
Delete — удаляет часть символов из строки.
DupeString — создает строку, содержащую копии подстроки.
Insert — вставляет строку в другую строку.
Move — копирует байты данных из источника в место назначения.
SetString — копирует символы из буфера в строку.
StringReplace — заменяет одну или несколько подстрок, найденных в заданной строке.
StuffString — заменяет часть одной строки на другую.
WrapText — добавьте перенос строки в строку, чтобы имитировать перенос слов.
Угостить автора чашечкой кофе