Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.10.10;
Скачать: CL | DM;

Вниз

Ошибка: C0000008 в строке CloseHandle(FHand);   Найти похожие ветки 

 
Leaner ©   (2004-09-26 04:43) [0]

При отладке выдает ошибку: C0000008 в строке CloseHandle(FHand);
При запуске не под Delphi ошибки нет
function Get_FileSizeFD(const FName:string):Int64;
var
FindData:TWin32FindData;
FHand:THandle;
begin
FHand:=FindFirstFile(PChar(FName),FindData);
if FHand<>INVALID_HANDLE_VALUE then
 try
  Result:=FindData.nFileSizeHigh;
  Result:=Result shl 32;
  Result:=Result+FindData.nFileSizeLow;
 finally
  CloseHandle(FHand);<-- здесь ошибка
 end else Result:=-1;
end;
Что это означает и как с этим бороться ?


 
Defunct ©   (2004-09-26 04:56) [1]

Странно....

Можно было опреденить длинну файла так:
Var F:File;
..
Result := FileSize(F)


Можно было так:
If FindFirst(FileName, faAnyFile, SearchRec)=0 Then
Result := SearchRec.Size
FindClose(SearchRec)


Можно так:
Result := FileSeek(FHandle, 0, 2);

Но из всего множества вариантов вы выбрали самый кривой и пытаетесь освободить не Handle поиска, а код ошибки.



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

Текущий архив: 2004.10.10;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.023 c
8-1090069922
Nolf
2004-07-17 17:12
2004.10.10
плагин к Winamp у


3-1095240506
Marina
2004-09-15 13:28
2004.10.10
Проблемы по DBF


1-1095781449
SergeyRu
2004-09-21 19:44
2004.10.10
Подключение справки от компоненты к Делфи 6


14-1095669902
Карелин Артем
2004-09-20 12:45
2004.10.10
Галлы vs Римляне. Было ли такое?


1-1095861749
DelphiLexx
2004-09-22 18:02
2004.10.10
Общедоступные паременные