wywołanie procedury(Sender : TObject)

wywołanie procedury(Sender : TObject)
  • Rejestracja: dni
  • Ostatnio: dni
0

Mam tak problem:

W dynamicznym Popupie przypisalem do zdarzenia onClick procedure "click".
Procedura "click" jest typu (Sender TObject). Chciałbym ją wywołać w innej procedurze ale nie wiem jak.
Sposób z przypisaniem własnej procedury do "click(Sender TObject)" i wykorzystaniem tej własnej w innej procedurze odpada gdyż korzystam z polecenia "z:=(Sender:TObject).Caption;" tymsamym więc procedura musi być typu (Sender:TObject);

Jaśli ktoś wie jak to zrobić z góry dziękuje !!!!

adiblol
  • Rejestracja: dni
  • Ostatnio: dni
  • Postów: 136
0

Zwyczajnie ;) . W innej procedurze piszesz

Kopiuj
click(Sender)

:]

Azarien
  • Rejestracja: dni
  • Ostatnio: dni
0
Kopiuj
with DynamicznyPopup do
  if Assigned(OnClick) then OnClick(this);
Szymek
  • Rejestracja: dni
  • Ostatnio: dni
0

Click(Nil);

MrSquell
  • Rejestracja: dni
  • Ostatnio: dni
0

Może to coś pomoże :)

(Sender as TMenuItem).onClick ........ lub
TMenuItem(Sender).onClick

jak to wykorzystasz.... nie wiem :D

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.