請問Delphi中有沒有提供直接輸入SQL語法的功能 |
尚未結案
|
MidasFan
一般會員 發表:41 回覆:22 積分:12 註冊:2004-06-03 發送簡訊給我 |
各位好:我是Delphi的新手,想請教 一般要把SQL語法輸入的方式就是透過元件中的SQL string中輸入 然後以Active:=true的方式執行SQL的語法
想請教的是 有沒有辦法直接把SQL的語法輸入後得到你要的結果
就像說宣告一的字串
Var
SQL_Statement:string;
..........
SQL_Sratement:=select count(*), a from B_table group by a 就是已很簡單的方式得到你要的答案
有辦法嗎? 因為我想顯示一個欄位的總合 然後用Label1.caption:=我所找的答案
可是我不知道有沒有簡單的方法 輸入SQL語法後就可以直接得到答案
不用透過Tstring;不知道各位先進高手知不知道我的意思???
|
cancer
高階會員 發表:58 回覆:319 積分:190 註冊:2004-07-31 發送簡訊給我 |
|
Chance36
版主 發表:31 回覆:1033 積分:792 註冊:2002-12-31 發送簡訊給我 |
MidasFan 你好
若不介意的話,可以寫個Function來達到你的目的 Function GetSQLValue(DB, SQLCommand: String):Variant; Var Qry : TQuery; Begin Qry := TQuery.Create(nil); Qry.DataBaseName := DB ; Qry.SQL.Text := SQLCommand ; Qry.Open; If Qry.Eof Then Result := NULL Else Result := Qry.Fields[0].Value; Qry.Free; End; 使用時如下方式呼叫 DataCount := GetSQLValue('test','select count(*) from B_table ');_______________________________________ 深藍的魚,祝您好運..........連連 |
MidasFan
一般會員 發表:41 回覆:22 積分:12 註冊:2004-06-03 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |