Рассчитать указатель SetFilePointer

[Пепел Феникса]

если не ошибаюсь то там через var механизм идет указатель(указываем имя переменки, но берется указатель...короче передача по ссылке по сути)
но стоит проверить, Делфи нет под рукой, так что скинь прототип Делфийский от ReadFile

кстати, проверь банально где ошибка то:

function ReadSector(hD: THandle; Sector: DWORD; var Buffer: TSector): boolean;
var
BytesRead,PosLo, PosHi: DWORD;
begin
Result := false;
PosLo := 0;
PosHi := PosLo;
PosLo := _mul(Sector,BytesPerSector,PosHi);
SetLastError(0);//для чистоты эксперимента
SetFilePointer(hD,PosLo,@PosHi,FILE_BEGIN);
ShowMessage(IntToStr(GetLastError()));
SetLastError(0);//для чистоты эксперимента
Result:=ReadFile(hD, Buffer[0], BytesPerSector, BytesRead, nil);//помоему так лучше.
ShowMessage(IntToStr(GetLastError()));
end;

будет видно где сбой.

[Hottabych]

есть у меня мысль как сделать...

Давайте предлагайте... Может переделать _mul для работы со знаковыми числами?
Goodwin98, цитата про SetFilePointer...

[Hottabych]

Ошибка в readfile

function ReadFile(hFile: THandle; var Buffer; nNumberOfBytesToRead: DWORD;
  var lpNumberOfBytesRead: DWORD; lpOverlapped: POverlapped): BOOL; stdcall;

function SetFilePointer(hFile: THandle; lDistanceToMove: Longint;
  lpDistanceToMoveHigh: Pointer; dwMoveMethod: DWORD): DWORD; stdcall;

Реально знак виноват... DWORD - беззнаковое (операции идут с этим типом), а Longint-знаковое число, (тут был бред )) Ну, какие мысли?

Добавлено:
Вот что получается в PosLo: 1010011010110000100100000000000, а должен быть наверно 0?

[Hottabych]

Все, проблема решена, дело было не в неверности указателя SetFilePointer, а в передачи параметров функции ReadFile

[Пепел Феникса]

Вот что получается в PosLo: 1010011010110000100100000000000, а должен быть наверно 0?

вообще то надо было верхний смотреть

рад что вы разобрались.
советую присмотреть способ которым мы выяснили где именно ошибка

[Ulex]

Сейчас наверное глупый вопрос такой спрошу.
А что за требование такое, чтобы указатель был кратен 512 ?
Почему 512 ?

[Пепел Феникса]

сектор же 512 байт у нас.

[Ulex]

Т.е. установить указатель на середину сектора сразу я не могу?
При чтении из файла, например, это не принципиально.
А если открываю диск, то всё, капец.
MSDN кстати, молчит об этом.

[Пепел Феникса]

можете, правда прочтется сектор целиком, просто вам выдадут(ОС выдаст) в ваш буфер нужный кусок сектора(или нескольких)
просто ТС нужно читать именно сектор. поэтому так адрес формируем

[Ulex]

В том то и дело что не могу.
SetFilePointer в таком разе выдаёт ошибку:

Параметр задан неверно.

Если я ошибку игнорирую и всё равно читаю сектор, то читает он первый сектор. т.е. функция SetFilePointer не сработала.
ReadFile тоже читает только сектор целиком, если я захочу прочитать 3 байта с начала сектора - борода.