Prüfen, ob Datei geöffnet ist

Stauch · Beiträge: 140 Win 2000, Win XP D4

Mit AssignFile(MyFileVar, Dateiname) die Filevariable mit einer Datei verbinden.
Ich möchte aber vorher prüfen, ob MyFileVar bereits mit einer anderen Datei verbunden ist.
Gibt es da einen effizienten Weg?

MfG C.

_________________
Geht das? Und wenn ja, warum nicht?

wulfskin · Verfasst: Do 03.04.03 13:09

Hallo Stauch!

Ich verstehe dein Problem noch nicht ganz: Willst du wissen, ob eine Datei bereist geöffnet ist, wie du im Title geschrieben hast, oder willst du wissen, ob die Datei mit einer anderen verbunden ist. Wenn du das letztere meinst, dann erklär doch mal bitte, was du mit "verbunden" meinst!
Am einfachsten geht das wohl, wenn du sagst, was du damit machen möchtest.

Gruß wulfskin!

_________________
Manche antworten um ihren Beitragszähler zu erhöhen, andere um zu Helfen.

Stauch · Beiträge: 140 Win 2000, Win XP D4

Hallo,
ich meinte verbunden im Sinne zugeordnet:
In der Hilfe steht zu AssignFile

Zitat:

Die Funktion AssignFile ordnet den Namen einer externen Datei einer Dateivariablen zu.

Ich möchte prüfen, ob die DateiVariable MyFileVar schon einer externen Datei zugeordnet ist, ehe sie mit AssignFile einer anderen externen Datei zugeordnet wird. Ziel ist, den Nutzer auf eventuellen Datenverlust hinzuweisen.

MfG Carsten

Moderiert von Klabautermann: BBCode Aktiviert und "repariert".

_________________
Geht das? Und wenn ja, warum nicht?

Gausi · Verfasst: Fr 04.04.03 14:14

ich würde es einfach andersrum versuchen:
Zuerst probieren, die alte datei zu schliessen, und dann die neue zu "assignen". Also ungefähr:

markieren

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

try
   closefile(MyFileVar);
except
   memo1.lines.add('Datei war nicht offen, alles ok');
   // kann man eigentlich weglassen die Zeile
end;
assignfile(MyFileVar, 'neuedateiname');
...

So dürfte nix verloren gehn, denke ich.

_________________
We are, we were and will not be.

Stauch · Beiträge: 140 Win 2000, Win XP D4

Danke, dass war genau, was ich suchte

_________________
Geht das? Und wenn ja, warum nicht?

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme