как сформировать проверку (вложенные блоки)

[Tanuska___:)]

я пытаюсь сформировать запросик на обновление.... но на форме присутствуют MaskEdit(6 шт) для даты. и при отсутствии вводимой информации на MaskEdit у меня появляеться ошибка 'несоответствие типов при отборе данных' как сформировать блоки проверки так чтобы условия проверялись все .при этом по ходу проверки выполнялось исключение из запроса той информации которой пользователь не ввел в MaskEdiT?
пробовала вот так:

if TryStrToDateTime(MaskEdit11.Text, d)    then   begin
  if TryStrToDateTime(MaskEdit12.Text, d)    then   begin
   if TryStrToDateTime(MaskEdit13.Text, d)    then   begin
      if TryStrToDateTime(MaskEdit14.Text, d)    then   begin
        if TryStrToDateTime(MaskEdit15.Text, d)    then   begin
         if TryStrToDateTime(MaskEdit16.Text, d)    then   begin
tex:= 'update Zurnal set DataPost='+ QuotedStr(MaskEdit11.text)+',StatusKol='+ QuotedStr(Edit36.text)+',KemPereslano='+ QuotedStr(Edit38.text)+',Adress='+ QuotedStr(Edit40.text)+',Soderganie='+ QuotedStr(Edit41.text)+',Ispolnitel='+ QuotedStr(Edit42.text)+',Status='+ QuotedStr(ComboBox6.text)+',DataIspolnen='+ QuotedStr(MaskEdit15.text)+',Ident='+ QuotedStr(ComboBox10.text)+'  where PorNomer='+QuotedStr(Edit37.Text)+'';
tex1:='update RegistraKartochka set DataPovtOb ='+ QuotedStr(MaskEdit12.text)+',IndexPovtObr='+ QuotedStr(Edit44.text)+',Korrespondent='+ QuotedStr(LabeledEdit2.text)+', ';
tex1:=tex1+'DataP='+ QuotedStr(MaskEdit13.text)+',IndexP='+ QuotedStr(Edit45.text)+',VidObr='+ QuotedStr(ComboBox7.text)+', ';
tex1:=tex1+'FormulZayav='+ QuotedStr(Edit55.text)+',SocGruppa='+ QuotedStr(Edit46.text)+',Tematika='+ QuotedStr(ComboBox8.text)+', ';
tex1:=tex1+'Rezol='+QuotedStr(Edit47.Text)+',Ispolnitel='+QuotedStr(Edit42.Text)+',DataN='+QuotedStr(MaskEdit11.Text)+',DataS='+QuotedStr(MaskEdit14.Text)+', ';
tex1:=tex1+'DataI='+QuotedStr(MaskEdit15.Text)+',HodRassmotr='+QuotedStr(Edit49.Text)+',KontrMetka='+QuotedStr(Edit50.Text)+',DataOt='+QuotedStr(MaskEdit16.Text)+',RezRassmObras='+QuotedStr(ComboBox9.Text)+',OtmetkaOsnatii='+QuotedStr(Edit51.Text)+', ';
tex1:=tex1+'DokumentPodsit='+QuotedStr(Edit52.Text)+',kolListov='+QuotedStr(Edit43.Text)+',naIspolnen='+QuotedStr(Edit48.Text)+'';
tex1:=tex1+'  where PorNomer='+QuotedStr(Edit37.Text)+'';
end else begin
// исключаю из зипроса данные с MaskEdit16
end;
end else begin
// исключаю из зипроса данные с MaskEdit15
end;
end else begin
// исключаю из зипроса данные с MaskEdit14
end;
end else begin
// исключаю из зипроса данные с MaskEdit13
end;
end else begin
// исключаю из зипроса данные с MaskEdit12
end;
end else begin
// исключаю из зипроса данные с MaskEdit11
end;

[mihali4]

А зачем использовать MaskEdit ?
Календарик разве не удобнее?

[Tanuska___:)]

календарик конечно удобнее! Но! есть случаи когда дата еще не поставлена и ставиться во время работы ! и тем самым календарик усложняет а не упрощает работу!

[mihali4]

Тогда я вам порекомендую следующий алгоритм:
- первая строковая переменная - tex1:='update RegistraKartochka set ';
- вторая строковая переменная - tex2 - в ней вы будете накапливать наименования полей(pole1,pole2...);
- третья строковая переменная - tex3 - в ней вы одновременно будете накапливать значения для этих полей values(val1,val2,...);
- когда вы последовательно проверите все маскэдиты, у вас все 3 переменных будут сформированы и их останется сложить вместе и использовать как текст SQL-запроса.