![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Народ, подскажите, как скопировать данные из списка в ... [D5]
nitro313 © (2002-06-23 10:17:00)Народ, подскажите, как скопировать данные из списка Combobox в подменю компонента PopupMenu. Хочется, чтобы это подменю формировалось динамически из строк Combobox"а.
Заранее спасибо.
nitro313 (2002-06-23 12:00:00) [1]Спасибо, все работает, только у меня добавляются строки в уже существующее popupmenu1. А мне нужно, чтобы создавалось подменю, этого меню. У меня есть эл-т меню popupmenu1 под именем N26. Так вот я хочу, чтобы создавалось submenu этого эл-та из строк комбобокса.
Жду ответа...
VDen (2002-06-23 10:30:00) [2]...
Menuitem:=TMenuItem.Create(PopupMenu);
MenuItem.Caption:=ComboBox1.Items.Strings[i];
PopupMenu.Items.Add(MenuItem);
...
Так будет правильнее...
Goblinus (2002-06-23 10:23:00) [3]procedure ComboBox1Copy (Sender: TObject);
var
i: integer;
begin
for i := 0 to ComboBox1.Items.Count - 1 do begin
MenuItem := TMenuItem.Create(Self);//Точно не знаю, Self или Application надо
MenuItem.Caption := ComboBox1.Items.Strings[i];
end;
end;