PopUpMenu bei Listbox

[gmc616]

Zitat von Jay15688:

... die Befehle im Menü dann nur für den selektierten Eintrag gelten

Dazu musst du im OnClick des Menüeintrags den selectierten Eintrag des ListBox ermitteln. z.B. so:

Delphi-Quellcode:

procedure TForm1.LschenClick(Sender: TObject);
var
  LB : TListbox;
begin
  lB := Popupmenu1.PopupComponent as TListBox;
  if lb.ItemIndex >=0   then
    LoeschEs ();

EDTI: Listview mit Listbox verwechselt