czy plik 'plik.txt' jest aktualnie otwarty

Odpowiedz Nowy wątek
2006-12-02 14:42
blasi
0

Jaka funkcja sprawdza czy plik: 'plik.txt' jest aktualnie otwarty czy też zamknięty?

Pozostało 580 znaków

2006-12-02 17:54
l3niwi3c
0

Function Czy_istnieje(Nazwa: String): Boolean;
var Plik: file;
begin
{$I-}
Assign(Plik, Nazwa);
FileMode := 0;
Reset(Plik);
Close(Plik);
{$I+}
Czy_istnieje := (IOResult = 0) and (Nazwa <> '');
end;

Pozostało 580 znaków

2006-12-02 20:05
0
blasi napisał(a)

Jaka funkcja sprawdza czy plik: 'plik.txt' jest aktualnie otwarty czy też zamknięty?

jesli program blokuje dostep do pliku to po prostu go nie otworzysz ... inaczej tego pewnie nie sprawdzisz


Pozostało 580 znaków

Odpowiedz
Liczba odpowiedzi na stronę

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0