
Zitat von
new32:
Delphi-Quellcode:
function leer(count:cardinal):string;
var c:cardinal;
begin
for c:=1 to count do begin
result:=result+' ';
end;
end;
MfG NEW32!
Überhaupt tritt man den Speicher so mit Füßen. Grund ist der selbe wie bei dyn. Arrays auch. (Haben wir hier schon oft genug durchgekaut

)
Besser:
Delphi-Quellcode:
function leer(count:cardinal):string;
var c:cardinal;
begin
SetLength(result, count);
FillChar(result, count, ' ');
end;
\\edit: U.U. muss result[1] oder @result als Parameter für FillChar übergeben werden - habs grad nicht 100%ig im Kopf.
Gruss,
Fabian
Fabian K.
INSERT INTO HandVonFreundin SELECT * FROM Himmel