| Статистика | 
|
|
Каталог статей
Функция наполнения строки
К примеру, назовем функцию "spcs" и создадим следующий код:
function Spcs(num :
byte) : string;
var tmp : string;
begin
fillchar(tmp, num+1, '
'); {инициализация всей строки
пробелами}
tmp[0] := chr(num); {устанавливаем длину строки с пробелами}
result := tmp;end;
|
|
|
Просмотров: 544
3
Оштрафовать
| Жаловаться на материал |
|
| Улучшенный поиск | | Поиск по сайту
Поиск по всему интернету
|
|
