probleme mit file

[flori-da]

Hallo..
Ich benötige für mein spiel ein highscore. den wollte ich in einem file speichern. das file soll aus einem record bestehen!
hab alles soweit geschrieben und bekommen nun eine Fehlermeldung. Meine file-variable sei nicht finalisiert.


so siehts bis jetzt aus:

Delphi-Quellcode:

type TDaten=record
           Zeit:byte;
           Name:String[20] ;
           end;

var
  Form2: TForm2;
  HS: file of TDaten;

und dann:

Delphi-Quellcode:

assign(HS,'Highscore.dat');
if FileExists('Highscore.dat') = False then
      Rewrite(HS)
    else    Reset(HS);
close(HS);

Das ist ja erstmal das Grundgerüst..Ich dachte mir wenn das nicht klappt brauche ich gar nicht weiter machen.

Gruß der flo

[messie]

Benutze nicht "Name" für den Namen. Das wird in Zusammenhang mit API-Aufrufen benutzt. Vielleicht stolpert der Compiler darüber.

Grüße, Messie

[mkinzler]

Oder versuch mal die Dimensionierung des Strings wegzulassen.

[flori-da]

Das sagt/meckert Delphi:

[Fehler] Unit2.pas(45): E2155 Typ 'TDaten' benötigt Finalization - nicht im Dateityp erlaubt

was meinen die mit Finalisation?

Das mit der namensänderung bringt nix!
gruß der flo

[flori-da]

bringt auch nix

[scrat1979]

Zitat:

Zitat von flori-da

Hallo..

und dann:

Delphi-Quellcode:

assign(HS,'Highscore.dat');
if FileExists('Highscore.dat') = False then
      Rewrite(HS)
    else    Reset(HS);
close(HS);

Das ist ja erstmal das Grundgerüst..Ich dachte mir wenn das nicht klappt brauche ich gar nicht weiter machen.
Gruß der flo

Bin mir nicht sicher, aber IMHO Opinion müsste es so lauten. Den Unterschied findest Du in der Delphi-Hilfe:

Delphi-Quellcode:

AssignFile(HS, 'Highscore.dat');
[...]
CloseFile(HS);

Ich persönlich favorisiere folgende einfachere Schreibweise:

Delphi-Quellcode:

AssignFile(HS,'Highscore.dat');
if not FileExists('Highscore.dat') then Rewrite(HS)
                                   else Reset(HS);
CloseFile(HS);

Hoffe weitergeholfen zu haben...

Grüsse,
SCRaT

[flori-da]

nein..das klapt auch nicht..
Finalisation heißt doch so viel wie schließen oder so was in der richtung..
aber mit closefile(HS) mach ich das doch..
ich weiß nicht weiter :wall:
aba schon mal vielen dank für euere unterstützung

[dominikkv]

Delphi-Quellcode:

assign(HS,'Highscore.dat');

das muss der komplette pfad sein, also zB

Delphi-Quellcode:

assign(HS,'C:\Highscore.dat');

[flori-da]

ich hab das problem gelöst
man muss den string auf jedenfall einschränken..sonst haut das dann nicht mit dem file hin..
kein plan warum..is aba so
ich glaub sonst is das file zu groß da ein string bei delphi ziemlich groß ist..und wenn das zu groß ist dann kann das nicht mehr finalisiert werden..
oder so irgendwie hab ich mir das jetzt gedacht.

trotzdem danke...
gruß der flo

[Peter_Cottbus]

Delphi-Quellcode:

           Name:String[20] ;

Du hast doch den String eingeschränkt, da gings doch schon nicht?!

[messie]

Zitat:

Zitat von flori-da

nein..das klapt auch nicht..
Finalisation heißt doch so viel wie schließen oder so was in der richtung..
aber mit closefile(HS) mach ich das doch..
ich weiß nicht weiter :wall:
aba schon mal vielen dank für euere unterstützung

Nein, es geht um die Deklaration. Delphi akzeptiert in einem typisierten file keine offenen arrays. Ich habe ein wenig gegoogelt und dabei gesehen, daß dieser Fehler meist dann auftritt, wenn die Stringlänge vergessen wird. Weil dann die Anzahl der Bytes beim Schreiben nicht klar ist.
Dein Beispiel funzt bei mir ohne Probleme(wenn ich AssignFile und CloseFile verwende).
Deine Fehlermeldung sagt aber, daß Du noch mehr Deklarationen davor oder dahinter hast. Probier' die Beispiele mal isoliert in einem neuen Projekt aus. Vielleicht vertauschst Du mal die Position von integer und string in der record-Definition. Bei TurboPascal hat das gelegentlich auch geholfen.

Grüße, Messie

[phreax]

Zitat:

Zitat von flori-da

ich hab das problem gelöst
man muss den string auf jedenfall einschränken..sonst haut das dann nicht mit dem file hin..
kein plan warum..is aba so
ich glaub sonst is das file zu groß da ein string bei delphi ziemlich groß ist..und wenn das zu groß ist dann kann das nicht mehr finalisiert werden..
oder so irgendwie hab ich mir das jetzt gedacht.

trotzdem danke...
gruß der flo

Das ist gnaz einfach der Fall weil, wenn dein Compiler auf lange Strings eingestellt ist, sind Delphi strings, wenn sie nicht terminiert sind mal eben 2GB gross und so groß sollen doch wohl deine Einträge nicht werden ;)
Denn bei Typisierten Dateien speichert Delphi immer die fixe, angegebene Länge ab, der Rest wird mit Nullen aufgefüllt. Deshalb werden solceh dateine dann auch recht shcnell recht groß...

ich hoffe ich konnte etwas zur Klärung Beitragen :)

mfg phreax