Einzelnen Beitrag anzeigen

silentAMD

Registriert seit: 27. Sep 2003
203 Beiträge
 
Turbo Delphi für Win32
 
#1

Menü zur Laufzeit - Frage

  Alt 10. Feb 2004, 14:25
Hi,
ich hab zwar kein problem mit dem menü nur hätte ich eine frage:
momentan erstelle ich menüs während der laufzeit so (also mit variable "newitem")


Delphi-Quellcode:
NewItem := TMenuItem.Create(Menu);
NewItem.Caption := Chr(i + Ord('A'))+#8+DriveType(i);
NewItem.RadioItem := True;
NewItem.OnClick := DriveChange;
Menu.Items[1].Insert(Menu.Items[1].Count-3, NewItem);
NewItem.Clear;

zuerst wollte ich es so machen:

Delphi-Quellcode:
with TMenuItem.Create(Menu) do begin
Caption := Chr(i + Ord('A'))+#8+DriveType(i);
RadioItem := True;
OnClick := DriveChange;
...
aber wie soll ich diese zeile machen:

Delphi-Quellcode:
...
Menu.Items[1].Insert(Menu.Items[1].Count-3, self);
end;

mit self gehts nicht aber gibt es vielleicht einen befehl der bei so einem fall geht?
oder MUSS ich diese variable definieren?


PLEASE HELP!!!!!!
  Mit Zitat antworten Zitat