Access + поле дата/время

[Konstantin_ua]

У меня есть форма для заполнения там едиты, мемо, маскедит... когда пользователь заполняет поля он может пару полей оставить пустыми а когда я пытаюсь через запрос передать пустой параметр полю дата то матюки, не знаете как обойти это?
код запроса

 with F_main.qry1 do
    begin
      Active:=False;
      SQL.Clear;                                                                                                                                                                                           // , status5=:pstatus5
      SQL.Add('INSERT into Dok (dov_number, Dov_date, Date_oplatu, Kontragent, Summ_money, Rah_number, Rah_Date, Akt_number, Akt_date, Naklad_number, Naklad_date, Dog_buh, Dog_der)');
      SQL.Add('values (:par1,:par2,:par3,:par4,:par5,:par6,:par7,:par8,:par9,:par10,:par11,:par12,:par13)' );
      Parameters.ParamByName('par1').Value:= edt1.Text;
      Parameters.ParamByName('par2').Value:= FormatDateTime('ddddd',StrToDate(medt1.Text));
      Parameters.ParamByName('par3').Value:= medt2.Text;
      Parameters.ParamByName('par4').Value:= cbb1.Items[cbb1.ItemIndex];
      Parameters.ParamByName('par5').Value:= edt2.Text;
      Parameters.ParamByName('par6').Value:= edt4.Text;
      Parameters.ParamByName('par7').Value:= medt3.Text;
      Parameters.ParamByName('par8').Value:= edt5.Text;
      Parameters.ParamByName('par9').Value:= medt4.Text;
      Parameters.ParamByName('par10').Value:= edt6.Text;
      Parameters.ParamByName('par11').Value:= medt5.Text;
      Parameters.ParamByName('par12').Value:= edt7.Text;
      Parameters.ParamByName('par13').Value:= edt8.Text;

      ExecSQL;

    end;

[Serge_Bliznykov]

для каждого параметра проверять, пустое или нет значение и, в зависимости от этого передавать или нет параметер!

[Konstantin_ua]

Сообщение от Serge_Bliznykov

для каждого параметра проверять, пустое или нет значение и, в зависимости от этого передавать или нет параметер!

ну это тогда нужно каждый параметр отдельно передавать? я же передаю все сразу, или можно параметру null присвоить и тогда он не бует передаваться?

[Serge_Bliznykov]

во-первых, (для начала) попробуйте вместо тех параметров, которые могут отстутсвовать передать Null
(например, так;

....
Parameters.ParamByName('par11').Value:= varNull;
....

во-вторых, если это не прокатит, тогда Вам придётся строчку Insert формировать ДИНАМИЧЕСКИ (т.е. в run-time).

в-третьих, в поля, которые в БД имеют тип дата/время должны передавать значения в формате даты/времени! (TDateTime)
использовать для этого строки - путь к трудновылавливаемым глюкам-багам!!

[eval]

тогда Вам придётся строчку Insert формировать ДИНАМИЧЕСКИ (т.е. в run-time).

это плохой путь, можно нулл значит нулл, нельзя а по другому никак- значит дефаулт и т.д.

[Konstantin_ua]

 if(medt1.Text='  .  .  ')then Parameters.ParamByName('par2').Value:=Null else
      Parameters.ParamByName('par2').Value:= FormatDateTime('ddddd',StrToDate(medt1.Text));

работает если кому надо

[Serge_Bliznykov]

т.е. Вы проигнорировали мои слова насчёт передачи параметров типа "дата/время"...
ну-ну..