PopupMenu Pomocy.

Mam pytanko. mam PoupMenu za pomocą którego wybieram sobie jakiś tam kolor, powiedzmy że, clred,clblue i clgreen. Oczywiście mogę obsłużyć dla każdego z tych trzech
kolorów osobne zdarzenie onclick. np: TMainFrm.PopupMenuCzarnyClick(Sender: TObject);
do tego jakiś kodzik, no i mam czarny kolor.
Pytanie moje jest takie: Co mam zrobić aby dowiedzieć się jaki items wybrałem w postaci integer i napisać do tego jedną jakąś tam funkcje czy procedurę coś na zasadzie if then
np: if wybrałem PopupMenu.items[1] then pokaż czarny kolor

Za pomoc z góry dziękuję. Ryhvan

Mam pytanko. mam PoupMenu za pomocą którego wybieram sobie jakiś tam kolor, powiedzmy że, clred,clblue i clgreen. Oczywiście mogę obsłużyć dla każdego z tych trzech
kolorów osobne zdarzenie onclick. np: TMainFrm.PopupMenuCzarnyClick(Sender: TObject);
do tego jakiś kodzik, no i mam czarny kolor.
Pytanie moje jest takie: Co mam zrobić aby dowiedzieć się jaki items wybrałem w postaci integer i napisać do tego jedną jakąś tam funkcje czy procedurę coś na zasadzie if then
np: if wybrałem PopupMenu.items[1] then pokaż czarny kolor

Za pomoc z góry dziękuję. Ryhvan

Jeżeli cię dobrze zozumiałem, to możesz tym itemom nadać odpowiednie wartości TAG i odpowiednio zareagować w przypadku kliknięcia:

case (Sender as TMenuItem).Tag of
1 : begin
end;
2 : begin
end;
end;

możesz tym itemom nadać odpowiednie wartości TAG

Nie trzeba. Istnieje wlasciwosc TMenuItem.MenuIndex zawierajaca indeks danego itema na liscie TPopuMenu.Items