Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Вниз

Поле 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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.063 c
15-1274560189
Юрий
2010-05-23 00:29
2010.08.27
С днем рождения ! 23 мая 2010 воскресенье


15-1264755320
ocean
2010-01-29 11:55
2010.08.27
Развод на новые компьютеры


2-1267385084
bag
2010-02-28 22:24
2010.08.27
массивы


2-1267252746
shamans
2010-02-27 09:39
2010.08.27
Обработка скроллирования


2-1266912051
serko
2010-02-23 11:00
2010.08.27
Как скопировать текст из другого приложения?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский