Einzelnen Beitrag anzeigen

Benutzerbild von ATS3788
ATS3788

Registriert seit: 18. Mär 2004
Ort: Kriftel
646 Beiträge
 
Delphi XE Starter
 
#4

AW: Object und Pointer

  Alt 3. Jan 2011, 20:11
Danke das Problem liegt auch nicht
an der Übergabe
 SendMessage(TheHandle,MessageToGetPics,1, integer(_GifImage)); das passt schon.

Habe ein Problem das in ein TImage zu bekommen

Delphi-Quellcode:
var
p : TGifImage;
begin

 p := pointer(Msg.LParam);
  BuOpenPics.Caption := IntToStr( p.Height);

case Msg.WParam of
1: begin ImPic.Picture.Assign(p);
     end;

end;
  end;
Das ist der Empfänger da gibt es auch kein Problem
wenn ich das aus der Applikation mache.
Nur aus der DLL geht es nicht ?
Martin MIchael

Geändert von ATS3788 ( 3. Jan 2011 um 20:14 Uhr)
  Mit Zitat antworten Zitat