Текущий архив: 2004.10.17;
Скачать: CL | DM;
Вниз
FileOpen для совственного процесса Найти похожие ветки
← →
Users (2004-09-17 11:29) [0]Нужно открыть на чтение собственный файл :
Var
f : THandle;
...
f := FileOpen("Project1.exe", fmOpenRead );
Получаем INVALID_HANDLE_VALUE
НО через :
f:=_lOpen("Project1.exe", OF_READ);
ВСЕ нормально открывает !!!
В чем проблема, не хочется использовать старую Win16 функцию.
← →
Игорь Шевченко © (2004-09-17 11:32) [1]f := FileOpen("Project1.exe", fmOpenRead or fmShareDenyNone );
?
← →
Users (2004-09-17 11:37) [2]Спасибо! Работает !
Я нашел практически то же самое :
f:=CreateFile("Project1.exe", GENERIC_READ, FILE_SHARE_READ, nil, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0)
Страницы: 1 вся ветка
Текущий архив: 2004.10.17;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.025 c
