Hallo,
Zitat von
xZise:
Wenn wird jetzt "Result" wieder freigegeben?
Gar nicht. Das muss die aufrufende Funktion übernehmen. Z. B. so:
Delphi-Quellcode:
procedure x;
var
S: TStrings;
begin
try
S := GetText;
// irgendwas machen
finally
S.Free;
end;
end;
Gruß
xaromz