странный массив или почему не работает

[yuta_86]

добрый день, товарищи программисты.
привожу кусок кода, который отказывается работать, почему не знаю...

 
var  B, FByte :array of byte;

begin
AvaibleBytes:=8;
                 setlength(B,AvaibleBytes);
                 setlength(FByte,AvaibleBytes);
                   If ReadFile(FHandle, B,AvaibleBytes , RealRead, @ReadOL) then
                    begin
                    {сохраняем параметры вызова события}
                     for i:=0 to  AvaibleBytes do
                       FByte[i]   := B[i];

как только идёт сохранение в массив Fbyte вылетает ошибка. RealRead=8
что делаю не так?

[_Engine_]

for i := 0 to length(FByte) - 1 do

[yuta_86]

думаю это не важно.

скорее всего ошибка в
ReadFile(FHandle, B,AvaibleBytes , RealRead, @ReadOL)

потому что после этой строки в В в watch ничего не вижу а до этого(setlength(B,AvaibleBytes)) после инициализации были нули

[evg_m]

найдено в справке

BOOL ReadFile(

    HANDLE hFile,	// handle of file to read 
    LPVOID lpBuffer,	// address of buffer that receives data  
    DWORD nNumberOfBytesToRead,	// number of bytes to read 
    LPDWORD lpNumberOfBytesRead,	// address of number of bytes read 
    LPOVERLAPPED lpOverlapped 	// address of structure for data 
   );

сравни ReadFile(FHandle, B,AvaibleBytes , RealRead, @ReadOL)

думаю это не важно.

будет важно когда до этого дойдет.

[GunSmoker]

Адрес переменной массива <> адресу данных массива.

Учить мат-часть.

[yuta_86]

Сообщение от GunSmoker

Адрес переменной массива <> адресу данных массива.

Учить мат-часть.

нет тут всё верно

[evg_m]

Цитата:
Сообщение от GunSmoker Посмотреть сообщение
Адрес переменной массива <> адресу данных массива.

Учить мат-часть.
нет тут всё верно

если "тут все верно", то почему

потому что после этой строки в В в watch ничего не вижу а до этого(setlength(B,AvaibleBytes)) после инициализации были нули

"практика - критерий истины"

[yuta_86]

почему в COM порт записываю 10 байт и сразу же их считываю.
но они приходит не сразу 10, а сначала 8 и потом 2. можно ли сразу считать всё что пришло ?

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

var  B, FByte :array of byte;

begin
AvaibleBytes:=8;
                 setlength(B,AvaibleBytes);
                 setlength(FByte,AvaibleBytes);
                   If ReadFile(FHandle, @B[0],AvaibleBytes , RealRead, @ReadOL) then//нам нужен не сам массив а его данные
                    begin
                    {сохраняем параметры вызова события}
                     for i:=0 to  AvaibleBytes-1 do//иначе вылет за границы массива
                       FByte[i]   := B[i];

почему в COM порт записываю 10 байт и сразу же их считываю.
но они приходит не сразу 10, а сначала 8 и потом 2. можно ли сразу считать всё что пришло ?

ну как бы данные пакетами идут, или вы думаете просто так протоколы стали придумывать?

[yuta_86]

Сообщение от Пепел Феникса

ну как бы данные пакетами идут, или вы думаете просто так протоколы стали придумывать?

нет я ничего такого не думал. как же теперь быть? считывать постепенно записи с приёмного буфера?или есть другой выход?