Dbgrid + DoubleClick bzw. RowClick

[marabu]

Hallo Ben,

probiere es mal so:

Delphi-Quellcode:

procedure TDemoForm.StringGridDblClick(Sender: TObject);
var
  iCol, iRow: Integer;
  pt: TPoint;
begin
  with Sender as TStringGrid do
  begin
    pt := ScreenToClient(Mouse.CursorPos);
    MouseToCell(pt.X, pt.Y, iCol, iRow);
    if (iCol in [FixedCols .. Pred(ColCount)])
    and (iRow in [FixedRows .. Pred(RowCount)]) 
      then ShowMessage('bulls eye')
      else ShowMessage('off shore');
  end;
end;

Freundliche Grüße