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

Вниз

Простой вопрос. Но не знаю, как решить.   Найти похожие ветки 

 
Гость22   (2005-10-04 15:10) [0]

На форме есть 5 Edit"ов и Button. После нажатия на кнопку, проводится обработка данных из Edit"ов. Но перед обработкой надо проверить, не пустые ли поля Edit"ов и если пустые, то выдать соотв. сообщение. Ну так вот. Я не могу создать это условие. Как его сделать?


 
stone ©   (2005-10-04 15:14) [1]


>  Как его сделать?

Проверить перед обработкой. В цикле обойти эдиты, и проверить их на наличие значения


 
Гость22   (2005-10-04 15:16) [2]

<В цикле обойти эдиты, и проверить их на наличие значения>

Ну так я и не знаю, как это сделать. Подскажите!


 
stone ©   (2005-10-04 15:17) [3]

http://delphimaster.net/view/2-1128413699/


 
nk ©   (2005-10-04 15:20) [4]


if form1.Edit1.Text="" then  // "" - это не двойеая кавычка, а 2 апострофа... без пробела между ними!
    showmessage("соотв. сообщение")
else
 begin
  ...
 end;

чтоб не писать условие отдельно для каждого Edit-a смотри
http://delphimaster.net/view/2-1128413699/


 
oldman ©   (2005-10-04 18:58) [5]


> nk ©   (04.10.05 15:20) [4]


"     " это не "", а Edit все равно пустой :)))


 
Eleepod   (2005-10-04 21:16) [6]

Как вариант, можно использовать следующее:

if not Button1.Focused
  then if (Sender as TEdit).Text = ""
         then begin
               ShowMessage("Поле не заполнено!");
               ActiveControl := (Sender as TEdit);
              end;

Это все поместить в событие onExit какого-либо Edit"а. А затем всем оставшимся Edit"ам прицепить это событие.



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

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

Наверх




Память: 0.46 MB
Время: 0.037 c
9-1113983455
Asdi
2005-04-20 11:50
2005.10.30
Отзовитесь те кто хоть раз делал музыку к играм !!!


1-1129016333
JohnKorsh
2005-10-11 11:38
2005.10.30
Как вызвать из процедуры обработчик события?


5-1105951532
Siargey
2005-01-17 11:45
2005.10.30
Нестандартный редактор компонента и перенос данных из него


1-1128429401
tw
2005-10-04 16:36
2005.10.30
Уменьшение размера приложения


2-1128439706
oSa
2005-10-04 19:28
2005.10.30
Список Обьектов





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