A Der PASCAL – Teil
A Der PASCAL – Teil
A Der PASCAL – Teil
Erfolgreiche ePaper selbst erstellen
Machen Sie aus Ihren PDF Publikationen ein blätterbares Flipbook mit unserer einzigartigen Google optimierten e-Paper Software.
Skript zur Vorlesung Allgemeine Datenverarbeitung 71<br />
Beispiel2:<br />
{..}<br />
const datei = 'a:\daten\test.dat';<br />
var f : file of integer;<br />
begin<br />
{..}<br />
assign(f,datei);<br />
rewrite(f);<br />
• Vorhandene Datei öffnen: Mit der Prozedur reset wird eine vorhandene<br />
Datei für E-/A-Operationen geöffnet. Versucht man eine nicht vorhandene<br />
Datei mit reset zu öffnen, bricht <strong>PASCAL</strong> mit einer I-/O-Fehlermeldung das<br />
Programm ab.<br />
reset();<br />
Beispiel:<br />
{..}<br />
var f : file of integer;<br />
begin<br />
{..}<br />
assign(f,'test.dat');<br />
reset(f);<br />
• Datei schließen und speichern: Um Datenverluste zu vermeiden, muß die<br />
geöffnete Datei nach Beendigung der Dateioperationen, spätestens aber am<br />
Ende des Programmes über die Prozedur close geschlossen werden. Beim<br />
Aufruf der Prozedur close wird zunächst die Datei im angegebenen Pfad<br />
(assign-Anweisung) gespeichert und anschließend geschlossen. Dabei wird<br />
auch die Verknüpfung der Dateivariablen mit der Datei aufgehoben. Will<br />
man diese Datei (oder eine andere) wieder öffnen, so muß zuerst die Datei<br />
mit der Dateivariablen wieder verbunden werden.<br />
close();<br />
Beispiel:<br />
{..}<br />
var f : file of integer;<br />
begin<br />
{..}<br />
assign(f,'test.dat');<br />
reset(f);<br />
{Dateioperationen}<br />
close(f);<br />
Fachhochschule Gelsenkirchen Prof. Dr.-Ing. A. Rinschede<br />
Fachbereich Versorgungs- und Entsorgungstechnik