Einzelnen Beitrag anzeigen

Benutzerbild von _frank_
_frank_

Registriert seit: 21. Feb 2003
Ort: Plauen / Bamberg
922 Beiträge
 
Delphi 3 Professional
 
#5

Re: TMemoryStream - DLL (delphi/Lazarus)

  Alt 25. Nov 2006, 18:00
so mein erster versuch, jedoch bekomme ich die daten nicht zurück, damit ich den stream in der dll freigeben kann...

Delphi-Quellcode:
function oBinaryToText(InData:Pointer;inLen:integer;OutData:Pointer;var outLen:integer):boolean;
var ms,ms2:TMemoryStream;
begin
  ms:=TMemoryStream.Create;
  ms.ReadBuffer(inData,inLen);//sollte so funktionieren, denk ich
  ms.Position:=0;
  ms2:=TMemoryStream.Create;
  ObjectBinaryToText(ms,ms2);
  ms2.Position:=0;
  //wie ms2.memory in die hauptanwendung bekommen??
  ms2.free;
  ms.free;
  result:=true;
end;
eine idee?

//edit: gibt es eine möglichkeit á la initialization/finalization um den speicher beim dll-unload aufzuräumen?

Frank
  Mit Zitat antworten Zitat