Hallo RR!
Das ist doch kein Problem. Zur Not diese Asyncpro Geschichte aus dem Projekt kicken und die Datenübertragung via
WINAPI sauber in nen Thread auslagern.
Wie ist denn dieses GetCollectedData genau deklariert?
(1) GetCollectedData(Data:Pointer; Size:Integer)
oder
(2) GetCollectedData(Data:Pointer; Var Size:Integer)
In Fall 2 bekommst Du also die Anzahl der empfangenen Bytes zurück und bist aus dem gröbsten raus.
In Fall 1 erwartet die Fkt wahrscheinlich die Grösse des Speichers, den Data bereitstellt.
Würde das Teil so aufrufen:
Delphi-Quellcode:
Var
Data:PChar;
Size:Integer;
Begin
Size:=2048;
Data:=PChar(GlobalAlloc(GPRT,Size));
Try
GetCollectedData(Data,Size);
// Jetzt munter auswerten, was in Data steht
...
Finally
GloablFree(DWord(Data));
End;
End;
Viel Erfolg + schönes WE
OLLI