Wie kann man mit Popup

[sakura]

Wenn das Pop "gestartet" wird, kannst Du im Ereignis OnPopup den Sender abfragen.

Delphi-Quellcode:

procedure TForm1.PopupMenu1Popup(Sender: TObject);
begin
  if Sender = StringGrid1 then
    I := 1
  else if Sender = StringGrid2 then
    I := 2
  else
    I := -1;
end;

......