Problem bei Speichen von Filestream

[DeddyH]

Zitat:

len := Length(data);

Das würde ich ändern:
len := Length(data) * SizeOf(Char); Stichwort Unicode

[edit] Und dann natürlich aus PAnsiChar PChar machen [/edit]

[Deep-Sea]

Wenn du sowieso alles als String hast (sind es nicht eigentlich alles Zahlen? ), wäre dann ein Textformat wie XML oder JSON zum speichern nicht besser geeignet?!

PS: Die Funktion procedure TEinheitTyp.InDateiSchreiben (var Fs : TFilestream; Filename : String); ist auch merkwürdig: Entweder man nennt es "InDateiSchreiben" und übergibt nur einen Dateinamen, weil die Funktion den FileStream selbst erzeugt und freigibt oder man nennt es "InStreamSchreiben" und übergibt eine Instanz, die von TStream abstammt ...

[DeddyH]

Zitat von Deep-Sea:

... oder man nennt es "InStreamSchreiben" und übergibt eine Instanz, die von TStream abstammt ...

Aber nicht als Var-Parameter

[Deep-Sea]

Zitat von DeddyH:

Aber nicht als Var-Parameter

Richtig

Fraglich ist auch, ob man das lesen und schreiben nicht sogar in eine Schleife packen könnte.
Fragen über Fragen

[ele]

Und wenn man allen benutzten Variablen, Labels und Komponenten einen aussagekräftigen Namen gibt, hilft das ungemein bei der Fehlersuche...

Z.B. ComboBox11? Du weisst ernsthaft was da drin ist, ohne jedesmal nachschauen zu müssen?

[p80286]

Zitat von Deep-Sea:

Wenn du sowieso alles als String hast (sind es nicht eigentlich alles Zahlen? ), wäre dann ein Textformat wie XML oder JSON zum speichern nicht besser geeignet?!

Dem kann ich nur zustimmen. Und wenn man sich nicht darin einarbeiten will, dann sollte man die Daten wenigstens ein wenig strukturieren. Z.B ein CRLF als Trenner zwischen den verschiedenen "Einheiten". Oder Einheit1,Wert1=xxxx,Wert2=yyyy.....
So wie es jetzt ist, ist das Chaos und der Ärger vorprogrammiert.

Gruß
K-H

[Klausi1305]

Danke erstmal für vielen Antworten...

Unterfunktion also noch einbauen, und die bemängelten Sachen ausmerzen, und den Code aufräumen....
Na dann werd ich mich mal an die Arbeit machen

[Jumpy]

Mal 'ne Frage von der Seite:

Ich benutze immer die TStringList um z.B. ellenlange SQL-Statements zu laden. Die kommt ja mit so einer Save- bzw. LoadFromFile-Methode. Ist das nicht hier auch möglich den Inhalt der Edit-Felder in so eine Liste zu packen und diese zu speichern bzw. zu laden? Man müsste dann nur wieder gucken, dass man in der selben Reihenfolge ein und auspackt.

Wenn man nun sinnige Namen für die Edit-Felder vergibt, wie kann man dann über diese Felder iterieren? Das müsste ja immer in der selben Reihenfolge passieren, damit schreiben und lesen zueinander passt.
Könnte man die Tags benutzen, um die Felder zu nummerrieren und dann über alle Komponenten iterieren und nach dem Edit mit dem i-ten Tag suchen? Oder ist das zu kompliziert gedacht?