1樓：匿名使用者
用if語句依次查詢每個edit就可以了吧。
只要你eidt裡面的資料不改變，比如把qq放到edit2裡面去。
delphi查詢問題
2樓：網友
不用這麼麻煩，直接在adoquery的afterscroll事件中寫入：
:='shuming').asstring;
:='zuozhe').asstring;
:='zongshuliang').asstring ;
:='danjia').asstring ;
就可以了，這個是當dbgrid上指標變動時的操作。
有關於delphi檔案查詢的問題..請各位大大幫下忙.
3樓：健康美食你我他它
問題1：程式裡呼叫自己才出現回歸，所以沒有findfile(path + 這句不會回歸；
問題2 ：眼睛看花了，多用兩個begin..end可能會使程式的層次更清楚。
4樓：匿名使用者
沒有這個不會出現遞迴的。。回頭上一級是遞迴呼叫結束後，自己回去的。
delphi查詢**問題
5樓：暢夏侯嵐
你的sql語句沒有問題，否則執行查詢的時候會報錯的。
你的datasource1的dataset不應該設定為，應該是adoq_ess，因為button1click事件裡面沒有對物件進行操作，還有你再確認一下有沒有dbgrid控制項，如果沒有的話，你執行adoq_ess後出來的結果集只是在記憶體裡，而沒有任何顯示控制項來顯示，還有我一般設計資料庫程式時不用adotable這種控制項的。
你button1click事件裡執行的結果僅僅是把select的結果儲存到了adoq_ess物件裡，介面上當然沒有反應啦。
dataset裡肯定有adoquery的控制項，可能你沒有use進去，而且你看你的查詢模組沒有對adot_ess進行任何操作，你的dbgrid怎麼會有反應呢，你再好好檢查檢查，肯定是這個原因。
你再檢查一下dbgrid,datasource,adoq的邏輯關係是否正確，還有你可以在button1click事件最後再加一句**。
showmessage(adoq_'工號').asstring);
看看有沒有結果。
有結果就說明你的adoq_ess執行正常，那肯定就是你的dbgrid,datasource,adoq三個控制項之間邏輯關係沒有設定好。
:=datasource1;
:=adoquery1;
6樓：
procedure : tobject);
var ssqlw: string;
beginssqlw :=select';
//附加查詢條件。
if then
ssqlw :=ssqlw + and 工號 like ''trim( +
if then
ssqlw :=ssqlw + and 姓名 like ''trim( +
if then
ssqlw :=ssqlw + and 性別 = trim( +
if then
ssqlw :=ssqlw + and 部門 = trim( +
if then
ssqlw :=ssqlw + and 職務 = trim( +
if then
ssqlw :=ssqlw + and 工齡 like ''trim( +
if then
ssqlw :=ssqlw + and 基本工資 like ''trim( +
if ssqlw <>then
ssqlw :=where ' copy(ssqlw, pos('and', ssqlw)
+ 3, length(ssqlw));
with do
begindisablecontrols;
close;
sql[1] :ssqlw; /在sql屬性第2行中加入查詢條件。
open;enablecontrols;
end;你用的查詢語句應該是：select ..form biao where and...
你的select。。。form在那裡？
7樓：匿名使用者
procedure : tobject);
var ssqlw: string;
beginssqlw :=
//附加查詢條件。
if then
ssqlw :=select * from 在職員工基本資訊 where 工號 like ''trim('
if then
ssqlw :=select * from 在職員工基本資訊 where 姓名 like ''trim('
if then
ssqlw :=select * from 在職員工基本資訊 where 性別 like ''trim('
if then
ssqlw :=select * from 在職員工基本資訊 where 部門 like ''trim('
if then
ssqlw :=select * from 在職員工基本資訊 where 職務 like ''trim('
if then
ssqlw :=select * from 在職員工基本資訊 where 工齡 like ''trim('
if then
ssqlw :=select * from 在職員工基本資訊 where 基本工資 like ''trim('
with do
beginclose;
; 在sql屬性第2行中加入查詢條件。
open;end;
end;「顯示全部」按鈕上寫了：
procedure : tobject);
beginwith do
beginclose;
'select * from 在職員工基本資訊');將sql屬性第2清空。
open;end;
end;資料模組上adoconnection1已連線資料庫。
adoq_ess：connection：adoconnection1，sql裡寫了select * from 在職員工基本資訊。
adot_ess：connection：adoconnection1，tablename選了相應的資料庫表。
然後均啟用。
datasource1的dataset已連線。
8樓：網友
你的"select ..from...語句在哪，我只看到你的查詢條件。
9樓：匿名使用者
應該是你語句裡符號少了的問題，把。
ssqlw :=ssqlw + and 工號 like ''trim( +
改成：ssqlw :=ssqlw + and 工號 like ''trim( +
___這裡少了乙個單引號。
上面有類似的幾條語句都改下。
關於delphi的查詢中按鈕問題
10樓：網友
點選按鈕後寫。
:=false;
然後再你的open語句後寫。
:=true;
DELPHI程式問題
假設你getwindowtext所用的視窗控制代碼引數為hwnd,只需要向對應控制代碼的視窗傳送wm close命令便可，是 postmessage hwnd,wm close,0,0 在form的keypress或者keydown下面寫？我沒用過delphi，倒是用過用他的bcb，在bcb裡可以在...
delphi程式的問題，delphi7執行庫問題
var shijian tdatetime 定義變數。hour,min,sec,msec word 定義變數。begin 重新整理，可能是清除原來畫上的內容。shijian now shijian變數賦值為當前時間。decodetime shijian,hour,min,sec,msec 把當前的時...
ecelvlookup函式怎麼查詢值返回多個結果
vlookup函式只能返回乙個結果，如果想要一對多查詢，可以使用其他函式，看下邊例子，將部門為a的姓名列舉到e列 一 乙個單元格放乙個名字 e2公式 iferror index b b,all if a a d 2,row a a row a1 陣列公式，三鍵結束 二 將a部門的姓名放在e2單元格中...