PopUpMenü und Listview

[Preddy2005]

Hallo!

Bräuchte mal wieder Rat in Sachen Delphi!

Ich habe ein PopUpMenü und möchte zur Laufzeit die Caption des ersten Items in den auf der Listview angeklickten Eintrag umändern....

Das funktioniert leider nicht...

Delphi-Quellcode:

  if (LvBuddies.Selected <> nil) and (Button = mbRight) then
   begin

    pmBenutzermenue.Popup(Position.x,Position.y);
    pmBenutzermenue.Items.Items[0][1].Caption := lvBuddies.Selected.Caption; // Funktioniert leider so nicht

   end;

end;

Kann mir einer sagen wieso das nicht funktioniert? PopUpMenü existiert auch in der Ide...
Es erscheint auch, nur nachdem es verschwunden ist erhalte ich die Exception Menu Index out of Range...

Verstehe nicht wieso...

Danke für die Hilfe im voraus.

Matthias

[Hawkeye219]

Hallo Matthias,

versuche es einmal so:

Delphi-Quellcode:

if (LvBuddies.Selected <> nil) and (Button = mbRight) then
   begin

    pmBenutzermenue.Items.Items[0].Caption := lvBuddies.Selected.Caption; // Funktioniert leider so nicht
    pmBenutzermenue.Popup(Position.x,Position.y);

   end;

end;

Gruß Hawkeye

[Preddy2005]

Danke das funktioniert.

Also muss man in diesem Fall nicht wie wenn man einzelne Menupünkte im Menü auswahlen möchte das Item über einen 2 - dimensionalen Index adressieren? Hängt das mit der Caption Eigenschaft zusammen?

Wäre ganz gut wenn ich noch eine Erklärung erhalten würde.

Schon mal vielen Dank für die Hilfe.

Matthias

[Hawkeye219]

Man könnte es sogar noch kürzer schreiben:

Delphi-Quellcode:

pmBenutzermenue.Items[0].Caption := lvBuddies.Selected.Caption;

Mit der Caption-Eigenschaft hat es nichts zu tun. Die genaue Erklärung findest du in der Online-Hilfe unter dem Stichwort TMenu.Items.

Gruß Hawkeye