Проблема с созданием меню динамически.

← →
Gennadiy © (2004-07-23 11:51) [0]

Уважаемые мастера!!!
Подскажите как сделать так чтобы в данной процедуре меню создавалась не в одну строку, в первый столбик:
//
ADQMenu.Close;
ADQMenu.Parameters.ParamByName("USER").Value:=1;
ADQMenu.open;
//
while not (ADQMenu.Eof) do
begin
Mnui := TMenuItem.Create(self);
Mnui.Caption :=ADQMenu.FieldByName("Name").AsString;
Mnui.OnClick := click;
Mnui.Tag :=ADQMenu.FieldByName("ID").AsInteger;
Menu.
//Menu.Add(mnui);
ADQMenu.Next;
end; // while

← →
Reindeer Moss Eater © (2004-07-23 12:29) [1]

не в одну строку, в первый столбик:

Использовать в качестве владельца новых итемов крайний левый элемент меню

Проблема с созданием меню динамически. Найти похожие ветки