Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  Re: PopUp Menü auf linke Maustaste

   
    by himitsu, 4. Nov 2004
  für 'nen Edit:
  Procedure TForm1.Edit1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
  Begin
  PopupMenu1.Popup(Edit1.ClientToScreen(Point(X, Y)).X, Edit1.ClientToScreen(Point(X, Y)).Y);
  End;
  
  für mehrere Edit's:
  Wenn du's für was anderes brauchst, dann macht es sich besser, wenn TEdit dann durch das Entsprechende ausgetauscht wird.
  Procedure...