Правила форума
Fillchar.PASЯзык:
Русский
English
{ Пример программы для процедуры FillChar }
var
S : String[80];
begin
{ Заполняем строку пробелами }
FillChar(S, SizeOf(S), ' ');
S[0] := #80; { Устанавливаем байт длины }
end.
S : String[80];
begin
{ Заполняем строку пробелами }
FillChar(S, SizeOf(S), ' ');
S[0] := #80; { Устанавливаем байт длины }
end.
::
::
::
