DBGrid 响应鼠标进行定位？？locate？？(100分)

K

KenLee

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-06

• #1

procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
Query1.Locate('KMBM','1001',[loPartialKey]);
end;

 

W

white83

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-06

• #2

不知你说定位是什么意思，请说明白点吗？

 

J

jsxjd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-06

• #3

你这个是想实现按任意键定位到 1001 ，是什么意思？

 

S

svw0506

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-06

• #4

这样吧,按回车键，定位到指定记录：
procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
if Key=#13 then
begin
Query1.Locate('KMBM','1001',[loPartialKey]);
Key:=#0;
end;
end;

 

K

KenLee

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-09

• #5

多人接受答案了。