Показать сообщение отдельно
Старый 27.03.2011, 15:26   #2 (permalink)
MrSTEP
一步一步地会到目的
 
Аватар для MrSTEP
 
Регистрация: 09.05.2009
Адрес: Черноземье
Сообщений: 10,939
Записей в дневнике: 10
Сказал(а) спасибо: 140
Поблагодарили 80 раз(а) в 33 сообщениях
Репутация: 28362
По умолчанию

Там несложно. В разделе var объявялете эти переменные, а этот код вставляете в процедуру OnFormCreate. На форме разместите компонент Label или Edit, и вместо вашего вывода
Цитата:
write('Koli4estvo vozrastanii=',countV);
сделайте вывод в выбранный компонент:
Цитата:
Edit1.Text:= 'Koli4estvo vozrastanii=' + IntToStr(countV);
Процедура IntToStr преобразует целочисленную переменную в строку.
MrSTEP вне форума   Ответить с цитированием
Ads

Яндекс

Member
 
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070