[pgsql-jp: 25573] TSQLTimeStamp
AKI
hiroe @ bccenter.co.jp
2002年 4月 10日 (水) 20:44:38 JST
初めまして(まだデルファイを使って3ヶ月ぐらいです)。
ParamByName('ymd').As・・・でセットしたいのですがどの様にすれば
いいのでしょうか?
データベースはPostgreSQLです。
現在は以下のとおりでやりたいのです。が他に方法があれば教えていただけ
ればと思っております。
procedure FormShow(Sender:TObject);
var
getTax : String;
begin
getTax := gettax(DateTimeSQLTimeStamp(Date));
end;
function gettax(ymd:TSQLTimeStamp):String;
var
rtn : String;
begin
Query1.Close;
Query1.ParamByName('ymd').???????:=ymd;
try
Query1.Open;
rtn := Query1.FieldValue['tax'];
except
on E:EDatabaseError do rtn := '';
end;
Query1.Close;
Result := rtn;
end;
未熟者ですがよろしくお願いします。
pgsql-jp メーリングリストの案内