then showmessage ('Введіть всі записи!')
elsea = 2
// t_zakaz.Fields [1]. Value: = strtodate (edit0.Text);
// edit0.Text: ='';
then showmessage ('Введіть всі записи!')
elsea = 2
// edit0.Text: ='';
// Uses модуль to qzakaz.RecordCount-1 end; TZakaz.N4Click (Sender: TObject);. WindowState: = wsMinimized;;
end.