查询谁会？(100分)

非

非洲黑人99

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-11

• #1

有一表：A
id name address
01 jj 101
02 xx 101

edit1中：输入字段名
edit2中：输入记录名
button中事件怎么查找？
焦点显示在表中！
如果记录为中文又怎么办？
[]

 

M

mercury78

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-12

• #2

procedure TForm.ButtonClick(Sender: TObject);
begin
with Query do
begin
close;
sql.text:='select * from tableA where '+edit1.text+'='''+edit2.text+'''';
open;
end;
end;
或者

 

G

GanQuan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-12

• #3

Adotable1.Locate(Edit1.text,Edit2.Text,[]);
dbgrid设置options的dgRowSelect为True；显示整行

 

L

laker20

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-12

• #4

同意2楼的说

 

Z

zhumoo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-12

• #5

同意楼上

 

J

jxyghm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-12

• #6

都对

 

M

mikegong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-12

• #7

来晚了。。

 

天

天真

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-12

• #8

procedure TForm.ButtonClick(Sender: TObject);
begin
with Query do
begin
close;
sql.text:='select * from tableA where '+edit1.text+'="'+edit2.text+'"';
open;
end;
end;

 

L

liaoyangming

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-12

• #9

locate(edit1.text,edit2.text,[])