在wwdbgrid中如何知道单击了一指定的列(50分)

  • 主题发起人 主题发起人 dptt
  • 开始时间 开始时间
procedure TForm1.wwDBGrid1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var
g:TGridCoord;
begin
g := wwDBGrid1.MouseCoord(X,Y);
Caption :=Format('Col:%d,Row:%d',[g.x,g.y]);
end;
 
谢谢caidaoli;再请教:
在wwdbgrid中,怎样知道当前编辑焦点是否在指定的列中.
 
THackGrid=class(TDbGrid)
property Col;
property Row;
end;
var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.DBGrid1DblClick(Sender: TObject);
begin
with THackGrid(Sender) do
self.caption :=Format('Col:%d,Row:%d',[Col,Row]);
end;
 
接受答案了.
 
后退
顶部