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

popupmenu выбор итема   Найти похожие ветки 

← →
Санек   (2008-02-04 20:32) [0]

люди скажите как сделать такое.
добавляю в popupmenu итемы динамически, и мне надо чтобы при нажатии на каждый из этих итемов вылезало скажем месага с номером выбранного итема. как такое сделать?

---

← →
engine ©   (2008-02-04 20:33) [1]

> [0] Санек   (04.02.08 20:32)

а как добавляешь?

---

← →
Санек   (2008-02-04 20:36) [2]

var
 item:TMenuItem;
begin
 item := TMenuItem.Create(nil);
 item.Caption := Capt;
 item.OnClick :=
 menu.Items.Add(item);

---

← →
Amoeba ©   (2008-02-04 20:46) [3]

Используй св-во Tag

---

← →
Санек   (2008-02-04 20:55) [4]

как с ним работать?

---

← →
Санек   (2008-02-04 21:07) [5]

не могу воткнуть как использовать его для моего случая

---

← →
Amoeba ©   (2008-02-04 21:09) [6]

Устанавливаешь в св-ве Tag нужный номер, а в обработчике OnClick получаешь
(Sender as TMenuItem).Tag и используешь так как тебе нужно.
Все просто, как мычание.

---

← →
Санек   (2008-02-04 21:10) [7]

в onclick чего?

---

← →
Amoeba ©   (2008-02-04 21:16) [8]

Надо же быть таким бестолковым! Извиняюсь за резкость.

Сам же устанавливаешь в RunTime обработчик св-ва item.OnClick! Вот в нем и анализируй!

В порядке ликбеза обязательно прочитай вот эту статью: http://www.delphikingdom.com/asp/viewitem.asp?catalogid=342

---

← →
ketmar ©   (2008-02-04 21:21) [9]

>[7] Санек (04.02.08 21:10)
TUniverse

---

← →
Санек   (2008-02-04 21:30) [10]

спасибо решил свою проблему

---

← →
Leonid Troyanovsky ©   (2008-02-04 21:31) [11]

> ketmar ©   (04.02.08 21:21) [9]

> TUniverse

Можно усилить.

--
Regards, LVT.

---

← →
ketmar ©   (2008-02-04 21:56) [12]

>[11] Leonid Troyanovsky©(04.02.08 21:31)
TUnivang?

---

← →
Amoeba ©   (2008-02-05 01:28) [13]

> Санек   (04.02.08 21:30) [10]
>
> спасибо решил свою проблему
>

Слава тебе, Господи! Внял молитвам. Наставил отрока на путь истинный.

---

← →
Германн ©   (2008-02-05 01:58) [14]

> Amoeba ©   (05.02.08 01:28) [13]

Это только начало!
:)

---

← →
Amoeba ©   (2008-02-05 02:01) [15]

> Германн ©   (05.02.08 01:58) [14]
>
>
> > Amoeba ©   (05.02.08 01:28) [13]
>
> Это только начало!
> :)
>

Увы!

---

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

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



Память: 0.48 MB
Время: 0.011 c