как узнать открыт ли файл ...

← →
кондратий (2002-08-21 17:14) [0]

открываю файл ...

AssignFile(FT, ExtractFileDir(Application.ExeName)+"\Plugins\target.tmp");
Reset(FT);
while not Eof(FT) do
begin
ReadLn(FT, S);
...

как мне узнать открыт ли он ???

← →
кондратий (2002-08-21 17:18) [1]

что-то тина FileIsOpen(F : File):boolean ???

← →
RV © (2002-08-21 17:21) [2]

наверное попробовать прочитать из него
предварительно с дерективой {$I-}
и IOResult смотреть

← →
кондратий (2002-08-21 17:27) [3]

ну тогда мне лудше уже делать
{$I-} try CloseFile(FM) except end; try CloseFile(FT) except end; {$I+}

:-)

просто чтоб не вылетали эти ексчепционсы ...

как узнать открыт ли файл ... Найти похожие ветки