Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Zu viele Parameter in Reset!!! Help! (https://www.delphipraxis.net/67307-zu-viele-parameter-reset-help.html)

EDatabaseError 12. Apr 2006 20:36


Zu viele Parameter in Reset!!! Help!
 
:shock: Meine Güte. Seid einer halben Stunde bin ich dabei eine Stecknadel im Heuhaufen zu suchen.

Delphi-Quellcode:
 //////////Read groups.dat/////////////
 AssignFile(ff, workdir + 'groups.dat');

 Reset(ff);
 i := 1;
 while EOF(ff) = false do
 begin
  ReadLN(ff, gruppenArr[i]);
  Form2.ListBox1.Items.Add(gruppenArr[i]);
  i := i + 1;
 end;
 CloseFile(ff);
 //////////////////////////////////////
Im Reset kommt folgender Fehler : Zu viele Parameter! :wiejetzt:

An was kann das liegen?


Mfg
Tobi

Hawkeye219 12. Apr 2006 20:44

Re: Zu viele Parameter in Reset!!! Help!
 
Hallo Tobi,

hast Du vielleicht in Deinem Formular eine (parameterlose) Methode mit Namen Reset definiert?
Ersetze die fehlerhafte Zeile mal durch

Delphi-Quellcode:
System.Reset (ff);
Wenn es dann funktioniert, scheint meine Vermutung zu stimmen.

Gruß Hawkeye

Mackhack 12. Apr 2006 20:56

Re: Zu viele Parameter in Reset!!! Help!
 
Mal ne Frage:

Muesste das nicht

Delphi-Quellcode:
While (Not EOF) Do
  ...
heissen?

Ich lese das als solange er ganz am Ende der File ist mache was... Das Programm kommt doch nur einmal an das Ende der File... oder nicht?

idontwantaname 12. Apr 2006 21:00

Re: Zu viele Parameter in Reset!!! Help!
 
Zitat:

while EOF(ff) = false do
wobei es besser ist, not eof zu schreiben

EDatabaseError 12. Apr 2006 21:12

Re: Zu viele Parameter in Reset!!! Help!
 
Hab das ganze neu aufgerollt und jetzt tuts warum ... keine Ahnung :wall:

Aber jetzt gehts! Thanks.


Mfg
Tobi

Mackhack 12. Apr 2006 22:27

Re: Zu viele Parameter in Reset!!! Help!
 
Ich glaube wegen der EOF Zeile!


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:52 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz