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

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

Ошибка при открытии файла [D7, XP]

vitv ©   (2007-08-20 14:07:00) 

OfStruct1.cBytes := sizeOf(OFStruct);
var

 OfStruct1      : OFSTRUCT;
begin

OfStruct1.cBytes := sizeOf(OFStruct);          
filehandle:=OpenFile(PChar(ExtractFileDir(setting.GetTargetDir)+NameFileSource), OfStruct1, OF_Share_Exclusive);

fz:= GetFileSize(filehandle,nil); - размер один и тот же..

---

Anatoly Podgoretsky   (2007-08-20 15:19:00) [1]

> vitv  (20.08.2007 14:07:00)  [0]

Говоришь ошибка, а обработки ошибок что то не видно, начни с этого.

---

clickmaker   (2007-08-20 14:11:00) [2]

ExtractFilePath + NameFileSource
если конечно NameFileSource не начинается со слэша

---

Наверх