Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Поле Edit [D7, XP]


Rail ©   (2010-03-11 16:14:00) 

делаю программу на  курсовую на Дельфи по теме аис ремонтно-строительной компании, которая вычисляет нужное количество материалов и их цену по заданным данным длины и ширины здания и по заданной цене на 1 штуку материала. как сделать чтобы если пользователь не ввел данные в  поле edit (цену на 1 шт материала), программа вычисляла подставив в пустые поля нули


MsGuns   (2010-03-11 22:28:00) [1]

Думаю, что автор лучше поможет "ремонтно-строительной компании", если будет класть кирпич :)


Leonid Troyanovsky   (2010-03-11 18:57:00) [2]


> Rail ©   (11.03.10 17:22) [4]

> сказали, но работает только для поля Edit1, а у меня тут
> 10 полей, что делать?

Повторять.
И так 10 раз подряд.

--
Regards, LVT.


Игорь Шевченко   (2010-03-11 18:13:00) [3]


> что делать?


курсовую


Ega23   (2010-03-11 17:37:00) [4]

for i := 0 to Components.Count-1 do
 if (Components[i] is TEdit) and (TEdit(Components[i]).Text = '')
   then TEdit(Components[i]).Text := '0';


А вообще - http://grandsmeta.ru/  :)


Rail   (2010-03-11 17:22:00) [5]

я написал  if Edit1.text='' then edit1.text:='0'; как вы сказали, но работает только для поля Edit1, а у меня тут 10 полей, что делать?


Rail   (2010-03-11 17:11:00) [6]

Все, разобрался, оказывается ";" забыл поставить


Rail   (2010-03-11 17:06:00) [7]

выходит ошибка [Error] R1Unit.pas(112): Missing operator or semicolon


Вася   (2010-03-11 16:30:00) [8]


if edit.text='' then edit.text:='0'


Наверх

Титульная страница Поиск, карта сайта Написать письмо