Jak przy operowaniu na komunikatach uzyskać parametr sender. Może można go jakoś wyciągnąć ze struktury TMsg.A..... I przy okazji może ktoś zna jakąś dobrą książkę o Delphi ale za pomocą narzędzi dostępnych w systenie(WINAPI), nie książkę o VCL.
0
Nie mam pewnosci , jelsi sie mysle to mnie poprawcie ale wydaje mi sie sender to po prostu wartosc zmiennej self dla obiektu, ktory wywoluje funkcje to znaczy na przyklad:
zdarzenie=procedsure(sender:Tobject;(ine parametry)) of object;
Tnaszaklasa=class
....
procedure xxx(var m:Tmessage);message jakis tam
....
property onzdarzenie: zdarzenie;
....
end;
i teraz tak:
Tnaszaklasa.procedure xxx(var m:Tmessage);
begin
...
if assign(onzdarzenie) then onzdarzenie(self,//i te inne paraletry);
...
end;
I to chyba cała tajemnica parametru self:)
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.