Hallo,
ja,
ich habs gelöst.
Delphi-Quellcode:
procedure TForm.FileMenuItemClick(Sender: TObject);
var i:integer;
begin
if not opendialog.Execute then exit;
for i := 0 to opendialog.Files.count-1 do
(PopupMenu.PopupComponent as TMemo).Lines.Add(opendialog.Files[i]);
end;
PopupMenu.PopupComponent war der richtige Hinweis