Hintergrundmenü eines Stringgrids

[DeddyH]

Ich habe das gerade unter Delphi 2007 versucht nachzuvollziehen, da tritt dieses Verhalten aber nicht auf, es wird immer das Popupmenu des StringGrids aufgerufen. Vielleicht geht als schmutziger Workaround aber so etwas:

Delphi-Quellcode:

type
  TStringGrid = class(Grids.TStringGrid)
  public
    property InplaceEditor;
  end;

  TControl = type Controls.TControl;

  TForm1 = class(TForm)

...

procedure TForm1.StringGrid1GetEditMask(Sender: TObject; ACol, ARow: Integer;
  var Value: string);
begin
  TControl(StringGrid1.InplaceEditor).PopupMenu := PopupMenu1;
end;