Главная страница
    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.056 c
2-1270041864
ford
2010-03-31 17:24
2010.08.27
Case of для строк


2-1267790032
Sairex
2010-03-05 14:53
2010.08.27
Как обойти подводный Камень приведения к типу


15-1267688046
Kerk
2010-03-04 10:34
2010.08.27
dunit


2-1269838242
tippa
2010-03-29 08:50
2010.08.27
а чего он пищит?


2-1275805199
Denisrf
2010-06-06 10:19
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский