StringGrid光标自动移一个单元格？(20分)

三

三点

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-18

• #1

如何在StringGrid中的某一个单元格中输入几位数，例如一个三位数，光标就自动的后移到
下一列的单元格中呢？

 

一

一少

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-18

• #2

procedure TForm1.StringGrid1KeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if length(StringGrid1.cells[StringGrid1.col,StringGrid1.row]) = 3 then
if StringGrid1.col=StringGrid1.colCount-1 then
StringGrid1.col:=0
else
StringGrid1.col:=StringGrid1.col+1;
end;

 

三

三点

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-18

• #3

我天，怎么没有大富翁应答呢？
Dbgrid回车使光标换行不是很容易做到吗？怎么StringGrid光标后移就是难题了？如是嫌分
少的话，开个价！在线等！

 

三

三点

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-18

• #4

好，我试试，如通过马上给帖！

 

W

wlmmlw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-18

• #5

更改Col, Row

 

三

三点

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-18

• #6

已通过编译，结贴！