Witam

Wymyslilem sobie mechanizm z roznymi dziwnymi technikami, ktorych wczesniej nie stosowalem.
Calosc wydaje sie calkiem sprytnie pomyslana i czasem nawet dziala :-)

Jednym z istotnych elementow mojego programu jest przesylanie obiektow (wskaznikow do nich) za pomoca komunikatow (wewnatrz jednego programu). Robie to tak:

Wysylanie obiektu:

PostMessage(ObiektDocelowy.handle,WM_MojKomunikat,integer(ObiektPrzesylany),0);

Odbieranie:

procedure   TAPSDevice.WMCommand(var Msg: TMessage);
var cmd: TObiektPrzesylany;
begin
  if Msg.Msg = WM_MojKomunikat then begin
    cmd := TObiektPrzesylany(Msg.WParam);
    { jakies operacje na tym obiekcie}
  end;
end;

Czy takie przesylanie obiektow jest bezpieczne?
(nie chodzi mi o to ze gdzies sam moge cos namieszac, zwolnic za wczesnie obiekt, albo nie dokladnie cos napisac, tylko o to czy system zapewnia poprawnosc takich operacji, czy wyslany komunikat zawsze dotrze do adresata, czy takie przesylanie obiektow ma sens itp... )