Ĺadny brzuch
Jak zrobić SubPopUp do PopUp?
Var SubItem, MI : TMenuItem; Begin SubItem := TMenuItem.Create(MI); SubItem.Caption := 'Caption'; SubItem.onclick := Procedura; MI.Add(SubItem); End;
// MI jest zmienną wskazującą na item PopupMenu od którego ma zostać utworzony subitem
Użytkownik Oskar_ edytował ten post 04 kwiecień 2005, 17:45
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Var SubItem, MI : TMenuItem; Begin SubItem := TMenuItem.Create(MI); SubItem.Caption := 'Caption'; SubItem.onclick := Procedura; MI.Add(SubItem); End;
// MI jest zmienną wskazującą na item PopupMenu od którego ma zostać utworzony subitem
Użytkownik Oskar_ edytował ten post 04 kwiecień 2005, 17:45