請問大大 當使用者點選DBComboBOX後，在ONEXIT事件裡面要如何把所選取的值取出到QUERY中的SQL判別?? 謝謝~麻煩各位大大教導。

您好﹗

begin
  Query1.Close;
  Query1.SQL.Text('Select * From TableName Where ''' DBComboBox1.Text '''');
  Query1.ExecSQL;
  //如果不需要執行﹐只是指定SQL內容﹐則此句可刪除
end;

參考看看﹗ ===================== 努力,相信會獲得美麗! 忻晟

------
忻晟

procedure TForm1.DBComboBox1Exit(Sender: TObject); var sql_str:string; begin sql_str:=DBComboBox1.Text ; with query1 do begin sql.Clear ; sql.Add('select * from table where A=''' sql_str ''''); open; end; end; jacky

------
jacky

請問大大 我照你上面的程式碼 但是有錯誤 錯誤訊息為 project project2.exe raised exception class EDBEngineError with message "table does not exist " File or directory does not exist 請大大幫幫忙

您好!    這句錯誤信息是指資料表不存在, 或其路徑有錯誤, 請檢查Query元件對應DBE中Alias(別名)所連接的資料庫路徑名稱是否正确, 或者該Alias連接的路徑中有何此資料表, 或者程式碼中SQL語法部分From 資料表名此處的名稱是否寫錯. 另外, 之前回覆的程式碼部分, 其中一點筆誤, 修正如下:

begin
  Query1.Close;
  Query1.SQL.Text('Select * From TableName Where ''' DBComboBox1.Text '''');
  Query1.ExecSQL;//此句請改為Query1.Open;
end;

因為是Select查詢的SQL, 需使用Open的語法來回傳資料, 如果有ExecSQL, 則沒有回傳資料, Select也就沒有意義了. 注: ExecSQL方法是用在異動資料的SQL語法中. 參考看看! ===================== 努力,相信會獲得美麗! 忻晟 發表人 - cashxin2002 於 2003/10/23 00:18:49

------
忻晟