Hallo zusammen,
ich habe einen Record Typ definiert:</br>
Type</br>
TMyRecord = record</br>
RecordID : String[20];</br>
RecordDescr : String[255];</br>
end;</br>
In der Anwendung sollen nun Datensätze in die Datei geschrieben werden:</br>
begin</br>
AssignFile(RecordFile, DataFile);</br>
Reset(RecordFile);</br>
Write(RecordFile, pRecordObject);</br>
CloseFile(RecordFile);</br>
end;</br>
Soweit so gut, das Problem ist, dass nach jedem Speichervorgang trotzdem nur ein Datensatz</br>
in der Datei ist, und zwar der, den man zuletzt eingefügt hat. Die Datei selbst wurde mit der folgenden
Routine erzeugt:</br>
if vSaveDialog.Execute then</br>
begin</br>
AssignFile(vFile, vSaveDialog.FileName); { vFile : File of TMyRecord }</br>
Rewrite(vFile);</br>
CloseFile(vFile);</br>
end;</br>
Hat jemand eine Idee was ich da falsch mache?
Thanks
tom
ich habe einen Record Typ definiert:</br>
Type</br>
TMyRecord = record</br>
RecordID : String[20];</br>
RecordDescr : String[255];</br>
end;</br>
In der Anwendung sollen nun Datensätze in die Datei geschrieben werden:</br>
begin</br>
AssignFile(RecordFile, DataFile);</br>
Reset(RecordFile);</br>
Write(RecordFile, pRecordObject);</br>
CloseFile(RecordFile);</br>
end;</br>
Soweit so gut, das Problem ist, dass nach jedem Speichervorgang trotzdem nur ein Datensatz</br>
in der Datei ist, und zwar der, den man zuletzt eingefügt hat. Die Datei selbst wurde mit der folgenden
Routine erzeugt:</br>
if vSaveDialog.Execute then</br>
begin</br>
AssignFile(vFile, vSaveDialog.FileName); { vFile : File of TMyRecord }</br>
Rewrite(vFile);</br>
CloseFile(vFile);</br>
end;</br>
Hat jemand eine Idee was ich da falsch mache?
Thanks
tom
Comment