Forum: Sonstige Fragen zu Delphi
Delphi
by himitsu,
17. Mär 2007
Problem gefunden:
Write(FaDatei, Buf);
du hattest ja Buf mit nichts gefüllt.
Forum: Sonstige Fragen zu Delphi
Delphi
by himitsu,
17. Mär 2007
ach ja, sagt dein compiler eigentlich nichts dazu?
for i := 0 to 14 do
Memo1.Lines.add(alles1.mod_.und_st.st_vert);
e ist nicht definiert :zwinker:
und beim befüllen des Records ebenfalls nicht.
also hier funktioniert es :gruebel:
Forum: Sonstige Fragen zu Delphi
Delphi
by himitsu,
17. Mär 2007
Wie speichest/lädst das denn nun jetzt?
nicht das dort z.B. nur der Zeiger auf die Daten gespeichert wrd, sondern die Daten selber.
Forum: Sonstige Fragen zu Delphi
Delphi
by himitsu,
17. Mär 2007
drum sagte ich ja ... nicht unbedingt im Debugger testen ... vorallem wenn der alle Exceptionen anzeigt :zwinker:
Tipp: nimm dir speziell den Code vor wo OK steht :stupid:
Und jupp, da die Datei ja jedesmal neu erstellt und der letzte Aufruf fehlerhaft war, also nichts schieb, kann die Datei nur leer sein.
Aber genau dieses eher "unvorhersehbare" Verhalten der Delphifunktionen...
Forum: Sonstige Fragen zu Delphi
Delphi
by himitsu,
16. Mär 2007
hier mal so alle Möglichkeiten für dich
aber am Besten du führst das Programm nicht im Debugger aus ... wenn du nicht grade die Exceptionen dort abgeschaltet hast.
Forum: Sonstige Fragen zu Delphi
Delphi
by himitsu,
16. Mär 2007
BlockRead ehthält ja in der Demo die größe der Daten, welche vorher gelesen und demnach geschrieben werden sollen.
dui mußt da angeben wieviel geschieben werden soll, also =SizeOf(TAlles) ?
hier mal ein paar mögliche Codes:
var
FaDatei: file of TAlles;
Buf: TAlles;
if SaveDialog1.Execute then { Dialog zum Speichern anzeigen }