Zitat von
Muetze1:
...//
Delphi-Quellcode:
function streamtostr(S: TStream): string;
var
str: string;
lStringStream: TStringStream;
begin
lStringStream := TStringStream.Create;
Try
...
/EDIT: rote Box???
Du hast einen Fehler gemacht !
soll vielleicht so :
lStringStream := TStringStream.Create('');