Stworzyłem dynamicznie itemy w PopupMenu. Przypisałem wszystkim to samo zdarzenie OnClick, więc muszę wiedzieć, który item został wciśnięty. ;-(
Jak pobrać numer/caption tego itema??
Mam nadzieję że rozumiecie :p
Może da się to zrobić prościej? :p
BARDZO proszę o pomoc!
Pozdrawiam PIK
...o to chodzi ?
procedure TForm1.XXXClick(Sender: TObject);
begin
ShowMessage(TMenuItem(Sender).Caption);
end;
hmmmm ja robiłem dynamicznie popupmenu ale niedawałem wszystkim tego samego onclick:-) może if sender as item ale niewiem nigdy tego niepróbowałem:)
Ustawiaj sobie przy tworzeniu kolejnych pozycji w menu TAG (numer od 0). I potem w zdarzeniu OnCLick:
[code]
Case TComponent(Sender).Tag Of
0:{Menu 1};
1:{Menu 2};
{itd.}
End;
[/code]
Serdecznie Wam dziękuje!! !! !!