проблема при чтении даних из модема

вот так вот я отправляю и принимаю даные из модема
var
ch:array[byte] of char;
count:dword ;
hport:THandle;
begin
count:=length(Edit2.Text)+2;
WriteFile(hPort,PChar(Edit2.Text+#13#10)^,count,count,nil);
FillChar(ch,sizeof(ch),0);
SLEEP(100);
ReadFile(hport,ch[0],sizeof(ch),count,nil);
Caption:=ch;
end;
реакция на прием даних вроде норм! покрайней мере он на нее реагирует
а вот когда считую дание из модема массив пустой все равно остаеться...
хотя от команда возращает некоторые дание, и другие программы нормально читают их,
мож у меня тут ошибка?
посмотри и посоветуйте плиз как что исправить?

 

порт открываю, одельно и открытие происходит нормально

 

ReadFile(hport,ch[0],sizeof(ch),count,nil);
Что возвращается в count?

 

не ch:array[byte] of char; а ch:array[0..$ff] of char;
не ReadFile(hport,ch[0],sizeof(ch),count,nil); а ReadFile(hport,ch,sizeof(ch),count,nil);

 

это одно итоже!!!
тип байт принадлежит диапазону 0..255

 

count - равно нулю всегда, при разних командах(((

 

я в курсе, хм.. такой записи просто не встречал..

что readfile возвращает?

 

readfile возвращает false
GetLastError - 5