用advstringgrid如何控制光标
请问:用advstringgrid 控件时怎么控制光标,让它指定在某一个数据格中
[解决办法]
procedure TForm1.Button1Click(Sender: TObject);
var
RC: TRect;
begin
RC := editgrid.CellRect(2, 2);
RC.TopLeft := ClientToScreen(RC.TopLeft);
RC.BottomRight := ClientToScreen(RC.BottomRight);
ClipCursor(PRECT(@RC));
end;
[解决办法]
TDrawGrid(gd).row:=row;
TDrawGrid(gd).col:=col;
gd.setfocus;