Тема: Как привести код к компактному виду
Показать сообщение отдельно
  #3  
Старый 13.06.2017, 19:42
Аватар для Alegun
Alegun Alegun вне форума
LMD-DML
  
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
По умолчанию
Можно ещё и так
Код:
f4:= StringOfChar('0', 8-Length(f4)) + f4;
Ответить с цитированием