Char in String, hab keine Antwort gefunden :X

[fortuneNext]

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  txtfile: textfile;
  x: integer;
  temp: char;
  temp2: string;
  temp3: string;
begin
assignfile(txtfile, 'C:/text.txt');
reset(txtfile);
randomize;
for x := 1 to 36768 do
begin
temp := chr(random(255));
temp2 := inttostr(x) + ' ';
temp3 := temp;
writeln(temp2 + temp3); // Exception I-O Error :-/
end;
closefile(txtfile);
end;