Datenabfrage

[schmodi]

Hallo zusammen
Ich habe ein problem wenn ich das program laufen lasse und dan auf den Buton drücke wird eine Exception ausgelöst. Warum da?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var a: array[1..2] of integer;
    c:string;
    i: integer;
    f: textFile;
begin
    for i:= 1 to 2 do
    a[i]:=random(2);
    Assignfile(f,'C:\WINDOWS\Desktop\Delphi Programm mit Dateien\Fragen1\(a[i]).txt');
    reset(f) ;
    readln(f,c);
    label1.Caption:=c;
    Closefile(f);

    end;

Ich hoffe ihr könnt mir helfen.
Gruess Schmodi

[Jelly]

Zitat:

Zitat von schmodi

Assignfile(f,'C:\WINDOWS\Desktop\Delphi Programm mit Dateien\Fragen1\(a[i]).txt');

Also wenn a[i] dabei deine Zufallszahl darstellen soll, klappt das so nicht. Kuck dir mal in dem Kontext die Funktion format an.

Delphi-Quellcode:

Assignfile(f,format('C:\WINDOWS\Desktop\Delphi Programm mit Dateien\Fragen1\(%d).txt',[a[i]]));