Вниз
Скачать: CL | DM;

Менюшка   Найти похожие ветки 

← →
Goblinus ©   (2002-06-22 23:04) [0]

Всем доброго времени суток! Ответьте, PLZ, кто знает, на вопросик:

Как получить доступ к динамически создаваемым пункам меню (в моём случае - у меня есть меню ParentMenu - в нём создаются динамически подменю Name=ItemMenu c Caption"ами ItemMenu1, ItemMenu2...).


← →
Deadlock   (2002-06-23 04:05) [1]

Т.е. какой доступ тебе нужен. Объясни поподробнее....


← →
Proton ©   (2002-06-23 04:20) [2]

Вешаеш на него (на каждый пункт) обработчик OnClick
где проверяеш
if TMenuItem(SENDER).CAPTION="LAME" then
....
Только для этого текст использовать не совсем корректно
лучше сам эендер проверяй т.е.
if sender = items[456] then
...


← →
Goblinus ©   (2002-06-23 10:16) [3]

У меня не совсем так. По Caption"у в меню уменя должен загружаться файл в программу. Так что Caption может быть абсолютно любым. А запоминать каждый Caption в массиве и потом сверять его с тем, который был OnClick"нут - нехорошо вроде бы. Нет ли какого-либо другого способа.

И ещё один вопрос. Нужно осуществить поиск строки в массиве. Можно ли это сделать без цикла (наподобие IndexOf в ListBox1.Items, ComboBox1.Items и т.д.).

Заранее спасибо!


← →
Song ©   (2002-06-23 11:12) [4]

>>Нет ли какого-либо другого способа.
Например по TMenuItem.ID

>>И ещё один вопрос. Нужно осуществить поиск строки в массиве. Можно ли это сделать без цикла
Если загонишь этот массив в класс в компонент где есть IndexOf() - тогда пожалйста.


← →
Goblinus ©   (2002-06-23 13:33) [5]

Спасибо всем! Тема закрыта!


← →
Proton ©   (2002-06-23 15:09) [6]

напоследок .... :)
Ну ты и делай в обработчике
memo1.LoadFromFile(TMENUITEM(SENDER).CAPTION);



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.008 c
14-9982
Rub
2002-05-31 13:28
2002.07.04
Народ, а чем 6-е лучше 5-х????


1-9885
S@shka
2002-06-22 13:01
2002.07.04
Как сделать преостановку в работе программы


1-9811
tovSuhov
2002-06-24 10:12
2002.07.04
Вот ведь задачка...


14-9990
Dark
2002-06-03 19:00
2002.07.04
Декомпиляция программы.


4-10060
Delphi5.01
2002-05-05 11:09
2002.07.04
Ооооооооооочень лёгкий вопрос!!!!!!!!!!!!!!!!!!!!




   Наверх