Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.08.27;
Скачать: CL | DM;

Вниз

Поле Edit   Найти похожие ветки 

 
Rail ©   (2010-03-11 16:14) [0]

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


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


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


 
Rail ©   (2010-03-11 17:06) [2]

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


 
Rail ©   (2010-03-11 17:11) [3]

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


 
Rail ©   (2010-03-11 17:22) [4]

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


 
Ega23 ©   (2010-03-11 17:37) [5]

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/   :)


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


> что делать?


курсовую


 
Leonid Troyanovsky ©   (2010-03-11 18:57) [7]


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

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

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

--
Regards, LVT.


 
MsGuns ©   (2010-03-11 22:28) [8]

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



Страницы: 1 вся ветка

Текущий архив: 2010.08.27;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.051 c
15-1273644438
Lyonux
2010-05-12 10:07
2010.08.27
Нахождение max массива на asm e


15-1270388228
Дмитрий С
2010-04-04 17:37
2010.08.27
Как убрать веб браузер при загрузке delphi 2010.


2-1269712810
ZeTToG350
2010-03-27 21:00
2010.08.27
Проблемма с окнами


4-1232437513
Anklav
2009-01-20 10:45
2010.08.27
однозначное определение 2+ окон с одним заголовком


2-1275547550
My__Nick__Name
2010-06-03 10:45
2010.08.27
Unicode в Open Office 3