Текущий архив: 2010.10.24;
Скачать: CL | DM;

Вниз

delphi - oracle - null параметр   Найти похожие ветки 

← →
12 ©   (2010-08-03 10:52) [0]

надо передать в запрос null

 oqLoadPrice.SQL.Text := " Insert into price                                                                    "+
                         "        ( id_price,  subscriber_id,  start_data,  stop_data,  address,  phone, ready) "+
                         " values (:id_price, :subscriber_Id, :start_data, :stop_data, :address, :phone, :ready)";

if IsNull(dtFrom.Date, V) then
 oqLoadPrice.ParamByName("start_data").Value := V;

написал было

function IsNull(dt: TDateTime; var V:Variant):boolean;
begin
 if dt = 0 then
 begin
   Result := true;
   V := varNull;  // <-------
 end else
 begin
   Result := false;
   V := dt;
 end;
end;

не Null получается. Как null сделать?

---

← →
Sergey13 ©   (2010-08-03 10:58) [1]

oqLoadPrice.ParamByName("start_data").Clear
не подойдет?

---

← →
12 ©   (2010-08-03 11:06) [2]

ага, спасибо

---

Страницы: 1 вся ветка

Текущий архив: 2010.10.24;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.009 c