Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.017 c
3-7848
Alex-kosmonavt
2002-09-12 18:19
2002.10.03
Активная запись


1-8026
XPatriot
2002-09-20 20:38
2002.10.03
PopUpMenu


14-8136
Usre
2002-09-08 23:38
2002.10.03
Аффоризмом в глаз!!!


7-8203
V.Turecky
2002-07-27 12:16
2002.10.03
Звук системным динамиком...


7-8197
МИФИст
2002-07-26 21:35
2002.10.03
Как запустить...




   Наверх