C Croco Unregistered / Unconfirmed GUEST, unregistred user! 2000-04-28 #2 procedure TForm1.StringGrid1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); var GC: TGridCoord; begin GC := StringGrid1.MouseCoord(X, Y); // GC.X 即鼠标所选择的行中的列号。 Caption := Format('%d %d', [GC.X, GC.Y]); end;
procedure TForm1.StringGrid1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); var GC: TGridCoord; begin GC := StringGrid1.MouseCoord(X, Y); // GC.X 即鼠标所选择的行中的列号。 Caption := Format('%d %d', [GC.X, GC.Y]); end;
X xWolf Unregistered / Unconfirmed GUEST, unregistred user! 2000-04-28 #3 to Croco: "内容" Caption := StringGrid1.Cells[GC.X, GC.Y];
H help Unregistered / Unconfirmed GUEST, unregistred user! 2000-04-29 #4 StringGrid1.MouseCoord(X, Y);可是我对用户要选那一行并不知道,我如何确定Y 值?
H help Unregistered / Unconfirmed GUEST, unregistred user! 2000-04-29 #5 谢谢你们,我试了你们的方法,可以,但每次取出的都是鼠标正点中的单元,我想 不管鼠标点在该行的那个单元,我都取该行的第4列的数据,我改为StringGrid1.Cells[GC.4, GC.Y];但无法编译,怎么办?
谢谢你们,我试了你们的方法,可以,但每次取出的都是鼠标正点中的单元,我想 不管鼠标点在该行的那个单元,我都取该行的第4列的数据,我改为StringGrid1.Cells[GC.4, GC.Y];但无法编译,怎么办?
C Croco Unregistered / Unconfirmed GUEST, unregistred user! 2000-04-29 #6 StringGrid1.Cells[4, GC.Y];