Cze
Kto wie jak to zrobić?
Mam Edit i przypisane do niego PopupMenu. Do PopupMenu dodawane są dynamicznie pozycje.
UWAGA!! Pytanie: Jak zrobić aby po kliknięciu na dynamicznie stworzoną pozycję w PopupMenu do Edita został wklejony text z Captiona tej pozycji??
Jak wiesz to bardzo proszę napisz !!!!!!
To sprawa życia lub śmierci !! (mojego programu)
pa Pa
W sekcji private zadeklaruj taką procedurę:
procedure Klikniecie(Sender: TObject);
W części implementation wpisz:
procedure TForm1.Klikniecie(Sender: TObject);
begin
Edit1.Text := (Sender as TMenuItem).Caption;
end;
Przy tworzeniu nowej pozycji w menu przypisuj jej zdarzeniu OnClick procedurę Klikniecie
MenuItem.OnClick := Klikniecie;
I będzie grać.
[cenzura]
[cenzura]
Mozesz uzasadnic swoja wypowiedz? Kazdemu mozna tak nabluzgac, ale trzeba miec na to odpowiednie argumenty! A moze to tylko czysta zazdrosc?
[cenzura]
niektórzy po prostu rodzą sie chamami...
[cenzura]
Takich ludzi jak autor powyżej cytowanego posta należy wybić oraz dać moderatorom konstytucujne prawo do komysyjnego mordu na tkich jak (on/ona/ono) to coś