PHP/MySQL | Помощь Delphi
Тема закрыта by
Radlee
Причина: Проблема решена
Причина: Проблема решена
Вечер добрый! Форма делфи,на ней 3 компонента Label (Фамилия,имя,отчество) и 3 компонента DBEdit (соответственно к каждому из Label). Нужен код,который будет выводить ошибку при нажатии на кнопку,о том,что данные не были введены в Edit.
Могу помочь но нужно конкретнее ТЗ
вам нужно вывести ошибку если поля пустые? И для каждого разное?
Давайте я вам за 5 минут кину скрин код и исходник? Сойдёт? Только у меня Delphi XE7
________
посл. ред. 14.12.2015 в 19:52; всего 1 раз(а); by MrCatOff
________
посл. ред. 14.12.2015 в 19:52; всего 1 раз(а); by MrCatOff
MrCatOff, конкретно изложено выше,куда конкретней,я не знаю..
MrCatOff (14.12.2015 в 19:51)
вам нужно вывести ошибку если поля пустые? И для каждого разное?
вам нужно вывести ошибку если поля пустые? И для каждого разное?
именно, да хотя бы для одного поля,мне просто пример нужен,а дальше разберусь
________
посл. ред. 14.12.2015 в 19:55; всего 1 раз(а); by WooDoo
procedure TForm1.Button1Click(Sender: TObject);
begin
if DBEdit1.Text = '' then ShowMessage('Поле № не заповнено!')
else if DBEdit.Text2 = '' then ShowMessage('Поле № не заповнено!')
else if DBEdit.Text3 = '' then ShowMessage('Поле № не заповнено!')
else begin
//УСПЕШНО
end;
begin
if DBEdit1.Text = '' then ShowMessage('Поле № не заповнено!')
else if DBEdit.Text2 = '' then ShowMessage('Поле № не заповнено!')
else if DBEdit.Text3 = '' then ShowMessage('Поле № не заповнено!')
else begin
//УСПЕШНО
end;
WooDoo, Пункт № 7 там я описал для 3 DBEdit-ов смотрите ShowMessage выводит ошибку что поле не заполнено
'' - 2 одинарные кавычки
________
посл. ред. 14.12.2015 в 19:59; всего 1 раз(а); by MrCatOff
'' - 2 одинарные кавычки
________
посл. ред. 14.12.2015 в 19:59; всего 1 раз(а); by MrCatOff
MrCatOff, благодарю