Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  AW: runtime popupmenu on specific TDBGrid cell

   
    by Bummi, 25. Sep 2013
  Maybe this could give some inspiration. On Popupmenu and one OnMouseUpEvent for all Grids on all Forms.
  
  
  procedure TMainForm.PopUpProcedure1Click(Sender: TObject);
  begin
  Showmessage(TPopupMenu(TMenuItem(Sender).Owner).PopupComponent.Name);
  end;
  
  Procedure TMainform.AddPopupItem(Popup:TPopupMenu; aCaption:String;Event:TNotifyEvent);
  var