Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.08.21;
Скачать: [xml.tar.bz2];

Вниз

как получить Handle файла?   Найти похожие ветки 

 
Gon   (2005-07-31 13:24) [0]

как получить Handle файла, например, для выполнения FileSetDate, где он требуется?


 
Anatoly Podgoretsky ©   (2005-07-31 13:36) [1]

Открыть файл, результат функции то что тебе нужно.


 
begin...end ©   (2005-07-31 13:40) [2]

> Gon   (31.07.05 13:24)

Чтобы получить Handle файла, нужно вначале создать объект ядра "файл" (если он ещё не создан). Это можно сделать, используя API-функцию CreateFile или функцию-обёртку FileOpen из модуля SysUtils. После окончания работы с объектом "файл" его хэндл нужно закрыть с помощью API-функции CloseHandle или функции-обёртки SysUtils.FileClose.

Однако в Delphi (по крайней мере, в Delphi 7) есть ДВЕ функции FileSetDate. Одной в качестве параметра нужно передавать хэндл файла, а другой -- имя файла. Может быть, в Вашем случае проще воспользоваться второй из них?


 
Leonid Troyanovsky ©   (2005-07-31 14:00) [3]


> begin...end ©   (31.07.05 13:40) [2]

> Чтобы получить Handle файла, нужно вначале создать объект


Получить можно и TFileStream.Handle и TFileRec(f).Handle,
если они, конечно, открыты.

--
Regards, LVT.


 
begin...end ©   (2005-07-31 14:07) [4]

> Leonid Troyanovsky ©   (31.07.05 14:00) [3]

В любом случае без объекта "файл" не обойтись. Из конструктора TFileStream и "процедур" Reset/Rewrite тоже вызывается CreateFile.

Неточностей в своём посте [2] я не вижу: для получения хэндла действительно нужно создать объект "файл" (если его ещё нет), и для его создания можно использовать CreateFile.


 
Alexander Panov ©   (2005-07-31 17:45) [5]

begin...end ©   (31.07.05 14:07) [4]

Про неточности никто и не говорил.
Твой ответ лишь дополнен.


 
Gon   (2005-08-01 17:34) [6]

попробую, спасибо всем откликнувшимся!



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

Форум: "Основная";
Текущий архив: 2005.08.21;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.038 c
3-1120468833
kyn66
2005-07-04 13:20
2005.08.21
Как объеденить метод?


6-1115562063
Isaev
2005-05-08 18:21
2005.08.21
Dual-up


1-1122973306
Bless
2005-08-02 13:01
2005.08.21
Удаление страницы из Excel


1-1123077939
Vitali
2005-08-03 18:05
2005.08.21
Временное зависание Delphi


4-1119809266
andrew_john
2005-06-26 22:07
2005.08.21
Уменьшение задержки





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский