При нажатии на кнопку проверить условие, если оно правильное перейти на другую форму
Категория: Delphi/Pascal
2012-10-11 15:58:52
У меня существует кнопка, при ее нажатии, я должна перейти на другую форму, но при этом должна проверить три условия:
- Заполнен ли ComboBox, если нет, то вывести сообщение;
- Заполнен ли Edit, если нет, то вывести сообщение;
- И задать вопрос user'у уверен ли он в правильности введенных данных.
Если эти все условия верны, то я должна перейти на другую форму и свернуть эту.
code: #delphi
if ( Edit37.Text='' ) then Showmessage('Введите фамилию соц.работника') else if ( ComboBox1.Text='' ) then Showmessage('Введите месяц') else if ( MessageDlg('Вы уверены в правильности введенных данных???', mtConfirmation, [mbYes, mbNo], 0) = mrYes ) then begin Form3.Show; Form2.Hide; end;
автор: Dr.Acula
Поделиться: