TMdiChild: Kontextmenü des Hauptfensters schlägt durch

[Stevie]

Hi Union,

ist ja schon komisch, ein möglicher Workaround wäre:

Delphi-Quellcode:

procedure TForm1.Image1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var
  APoint: TPoint;
begin
  if Button = mbRight then
  begin
    APoint := Image1.ClientToScreen(Point(X, Y));
    PopupMenu1.Popup(APoint.X, APoint.Y);
  end;
end;

MfG
Stevie