全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1041
推到 Plurk!
推到 Facebook!

Parameters如何精確到小數點后5位?

尚未結案
hostart
一般會員


發表:4
回覆:3
積分:1
註冊:2003-05-17

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-12-06 15:27:59 IP:59.37.xxx.xxx 未訂閱
各位大大, 當我用 with ADOQuery1 do begin close; sql.clear; sql.add('update ABC set A=0.123456 where ID=1'); execSQL; end; 是可以把0.123456寫入A內的, 但如果用 with ADOQuery1 do begin close; sql.clear; sql.add('update ABC set A=:v1 where ID=:v2'); parameters[0].value:=0.123456 parameters[1].value:=1 execSQL; end; 只能寫入0.1235, 不能精確到第5位, 如何才能解決?
way888
初階會員


發表:32
回覆:76
積分:36
註冊:2005-05-31

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-12-07 09:41:06 IP:220.136.xxx.xxx 未訂閱
您好: 請試試先宣告1個real變數看看,如下: var r : real; . . r:=0.123456; . . parameters[0].value:=r; . .
l630521
資深會員


發表:15
回覆:349
積分:372
註冊:2003-02-17

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-12-07 14:22:13 IP:203.73.xxx.xxx 未訂閱
procedure TForm1.Button1Click(Sender: TObject);
begin
  with ADOQuery1 do
  begin
  close;
  sql.clear;
  sql.add('update ABC set A=:v1 where ID=:v2');
  ADOQuery1.Parameters.Refresh;
  parameters[0].Value := VarFMTBcdCreate(0.4567891, 18, 7);
  parameters[1].value:='2';
  execSQL;
  end;
end;
請參考看看! Ian
系統時間:2024-06-23 10:10:21
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!