新手問(如何用query1做搜尋) |
答題得分者是:channel
|
diehuman
初階會員 發表:91 回覆:57 積分:29 註冊:2003-04-16 發送簡訊給我 |
|
channel
尊榮會員 發表:67 回覆:707 積分:854 註冊:2002-05-02 發送簡訊給我 |
引言: 如果想在edit1打入搜尋的資料按下button1可以秀出來要怎樣做(用query1)? ,謝謝二個方法:
------
~小弟淺見,參考看看~ |
wnhoo
高階會員 發表:75 回覆:443 積分:198 註冊:2003-04-22 發送簡訊給我 |
|
diehuman
初階會員 發表:91 回覆:57 積分:29 註冊:2003-04-16 發送簡訊給我 |
|
bluefires
一般會員 發表:0 回覆:1 積分:0 註冊:2003-05-05 發送簡訊給我 |
引言: 二個方法:大家好,唔好意思,小弟是新手,有問題想問問: 我用了上面的SQL, 但當Click 那行這段CODE 的button時,就出了這句: SQLQuery1: Parameter 'aaa' not found.試過在SQLQuery1的Params 加一個名為aaa 的parameter, 但情況更壞,一RUN個prog 就出 Exception EOleException in module Projict1.exe at 000BAF4B No value for parameter 'aaa'.請問是什麼問題? (附CODE:) procedure TForm1.Button1Click(Sender: TObject); begin with SQLQuery1 do begin Close; SQL.Clear; ParamByName('aaa').AsString := Edit1.Text; SQL.Add('Select * From admin Where user = :aaa'); Open; end; end;謝謝! |
cake2000
一般會員 發表:13 回覆:16 積分:10 註冊:2002-04-14 發送簡訊給我 |
引言:我的方式~在FormCreate~也要加入~ 如果你還不會~我可以寄程式給你參考~ procedure TForm1.FormCreate(Sender: TObject); begin Query1.Close; Query1.SQL.Clear; Query1.SQL.Add('select * from DATANAME');//DATANAME為要搜索資料庫名稱 if Query1.Prepared=False then Query1.Prepare; Query1.Open; end; procedure TForm1.Button1Click(Sender: TObject); begin Query1.Close; Query1.SQL.Clear; Query1.SQL.Add('select * from DATANAME'); //DATANAME為要搜索資料庫名稱 Query1.SQL.Add('where DATA like :Q1');//DATA為要搜索的檔 Query1.ParamByName('Q1').AsString:='%' Edit1.Text '%'; if Query1.Prepared=False then Query1.Prepare; Query1.Open; end;引言: 二個方法:大家好,唔好意思,小弟是新手,有問題想問問: 我用了上面的SQL, 但當Click 那行這段CODE 的button時,就出了這句: |
diehuman
初階會員 發表:91 回覆:57 積分:29 註冊:2003-04-16 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |