05. december 2001 - 16:52Der er
7 kommentarer og 1 løsning
Incompatibel types ??
Hvad er der galt her??
implementation
{$R *.dfm} type streng100 = string[100];
var x: streng100; f: file of streng100; i: integer; Questions: array[1..10] of streng100;
procedure TForm1.FormActivate(Sender: TObject); begin AssignFile(f, \'C:\\Dokumenter\\Skole\\Datalogi\\Quiz\\Questions.txt\'); Reset(f); i:=0; while not eof(f) do begin inc(i); readln(f,x); Questions[i]:=x; end; end;
end.
Meningen er, at sålænge der er tekst tilbage i filen Questions.txt skal disse læses ind i Question-arrayen, men den siger Incompatibel Types ved den linie jeg har markeret med et (!!). Hvad er der galt?? Plz help, det er til et skoleprojekt som skal afleveres i på fredag!!
var x: streng100; f: textfile; i: integer; Questions: array[1..10] of streng100;
procedure TForm1.FormActivate(Sender: TObject); begin AssignFile(f, \'C:\\hejhejhej.txt\'); Reset(f); i:=0; while not eof(f) do begin inc(i); readln(f,x); Questions[i]:=x; ShowMessage(x); end; end;
når hehe så slet ikke men den anden kører den også igennem :)
/ZIRON
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.