Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Работа с файлом [D6, Win95/98]


Metotrone ©   (2002-09-23 16:36:00) 

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


LordOfSilence   (2002-09-23 17:31:00) [1]

> 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 содержится полное имя файла.
Таким образом, Вы, пожалуй, произведете обратную
операцию, а именно: проверите, не сопоставлена ли
Ваша файловая переменная какому-либо файлу.


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

смотри
TFileRec/TTextRec


Metotrone   (2002-09-23 17:07:00) [3]

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


Anatoly Podgoretsky   (2002-09-23 16:45:00) [4]

Это как


Наверх

Титульная страница Поиск, карта сайта Написать письмо