TMenuItems verwalten

[API]

Hi,

Wie verwaltet man am besten TMenuItems in einer Liste?
Etwa wie folgt aber mit einem dynamischen Array oder TObjectList?
Es soll aber nur eine Referenz auf das Menuitem gespeichert werden.

Delphi-Quellcode:

var
  MenuItem: Integer;

procedure TForm1.Button1Click(Sender: TObject);
begin
  MenuItem := Integer(MenuItem1); // speichern in MenuItem
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  TMenuItem(MenuItem).Caption := '123'; // wieder auslesen
end;

[hoika]

Hallo,

dein Code ist "suboptimal".

Eine Integer-Variable MenuItem verwirrt.

TObjectList mit OwnsObjects =False (Suche mal in der Hilfe)
ist besser.

Gebe jedem TMenuItem noch eine separate Tag-Nummer.
Dann kannst du Sie unterscheiden.


Heiko

[himitsu]

Zitat:

Wie verwaltet man am besten TMenuItems in einer Liste?

Was meinst du mit verwalten, bzw. was willst du erreichen/machen?

- werden die Items dynamische erstellt
- ändern sich die Items (also von der Anzahl her ... öfters Mal neue erstellen oder löschen)
- wie willst du gern drauf zugreifen können
- ...