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.
Właśnie, może Pan Adam by taką napisał
W książce "kompendium Programisty" jest szeroki opis jak korzystać z API a reszte trzeba doczytać, tam też <ort>pisze </ort>gdzie.
Jest taka kniga: Programowanie Windows, Charlesa Petzolda. Opis i wykorzystanie WinAPI, bardzo dobra imo
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:)
No i znow nie zdążyłem przed utratą logowania - sorki, ten tajemniczy Anonim wyzej to ja.
A to co napisalem to efekt lektury kodów źródłowych w delphi nic poza tym.
Errata: I to chyba cała tajemnica parametru sender (a nie self)