Avatar billede mr_ruggerio Nybegynder
05. december 2001 - 16:52 Der 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!!
Avatar billede mr_ruggerio Nybegynder
05. december 2001 - 16:53 #1
Nu glemte jeg at markere linien, ups. Det er der hvor der står Readln(f,x).
Avatar billede broegger Nybegynder
05. december 2001 - 16:58 #2
Du må ikke bruge readln i den sammenhæng. Du skal nøjes med read...
Avatar billede ziron Nybegynder
05. december 2001 - 17:00 #3
prøv dette:

implementation

{$R *.dfm}

type
  streng100 = string[100];

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;

end.

/ZIRON
Avatar billede mr_ruggerio Nybegynder
05. december 2001 - 17:00 #4
Tak skal du ha. Det virker sq.
Avatar billede ziron Nybegynder
05. december 2001 - 17:01 #5
var da så lidt...

/ZIRON
Avatar billede mr_ruggerio Nybegynder
05. december 2001 - 17:02 #6
Ziron>> Det var til broegger...
Avatar billede ziron Nybegynder
05. december 2001 - 17:02 #7
hvad for en???

/ZIRON
Avatar billede ziron Nybegynder
05. december 2001 - 17:03 #8
når hehe så slet ikke men den anden kører den også igennem :)

/ZIRON
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester