Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Простой вопрос. Но не знаю, как решить. [D7, 95/98]

Гость22 © (2005-10-04 15:10:00)
На форме есть 5 Edit'ов и Button. После нажатия на кнопку, проводится обработка данных из Edit'ов. Но перед обработкой надо проверить, не пустые ли поля Edit'ов и если пустые, то выдать соотв. сообщение. Ну так вот. Я не могу создать это условие. Как его сделать?

Eleepod (2005-10-04 21:16:00) [1]
Как вариант, можно использовать следующее:

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

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

oldman (2005-10-04 18:58:00) [2]

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

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

nk (2005-10-04 15:20:00) [3]
if form1.Edit1.Text='' then // '' - это не двойеая кавычка, а 2 апострофа... без пробела между ними! showmessage('соотв. сообщение') else begin ... end;
чтоб не писать условие отдельно для каждого Edit-a смотри
http://www.delphimaster.ru/cgi-bin/forum.pl?id=1128413699&n=18

stone (2005-10-04 15:17:00) [4]
http://www.delphimaster.ru/cgi-bin/forum.pl?id=1128413699&n=18

Гость22 (2005-10-04 15:16:00) [5]
<В цикле обойти эдиты, и проверить их на наличие значения>

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

stone (2005-10-04 15:14:00) [6]

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

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

Наверх

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