Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.10.03;
Скачать: CL | DM;

Вниз

Работа с файлом   Найти похожие ветки 

 
Metotrone ©   (2002-09-23 16:36) [0]

Как програмно проверить, Assigned ли файл с переменной f, если не факт, что это в моей программе произошло ?


 
Anatoly Podgoretsky ©   (2002-09-23 16:45) [1]

Это как


 
Metotrone ©   (2002-09-23 17:07) [2]

Например, AssignFile() находится в процедуре NNN? но не известнно, выполнилась ли она. Так вот надо проверить, ассоуиирорван ли файл с переменной.


 
Старый Паскалист   (2002-09-23 17:15) [3]

смотри
TFileRec/TTextRec


 
LordOfSilence ©   (2002-09-23 17:31) [4]

> Metotrone ©ю
Попробуйте Вашу файловую переменную привести
к типу:
TFileRec = packed record
Handle: Integer;
Mode: Word;
Flags: Word;
case Byte of
0: (RecSize: Cardinal); // files of record
1: (BufSize: Cardinal; // text files
BufPos: Cardinal;
BufEnd: Cardinal;
BufPtr: PChar;
OpenFunc: Pointer;
InOutFunc: Pointer;
FlushFunc: Pointer;
CloseFunc: Pointer;
UserData: array[1..32] of Byte;
Name: array[0..259] of Char; );
end;
который объявлен в модуле System.
ИМХО, в поле Name содержится полное имя файла.
Таким образом, Вы, пожалуй, произведете обратную
операцию, а именно: проверите, не сопоставлена ли
Ваша файловая переменная какому-либо файлу.



Страницы: 1 вся ветка

Текущий архив: 2002.10.03;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.018 c
6-8097
Zja
2002-08-03 11:32
2002.10.03
Как ограничить загрузку соединения по dial-up


3-7868
Alinka
2002-09-13 16:33
2002.10.03
Help! помогите , пожалуйста!


6-8102
karbo
2002-08-04 21:57
2002.10.03
А что это в Delphi 6 у меня нет никаких NM-компонентов...


3-7867
Evgen123
2002-09-13 09:43
2002.10.03
Вопрос MS SQL7.0 D5


3-7785
nevel
2002-09-16 07:19
2002.10.03
pack в программе