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

Вниз

Приветствую вас!   Найти похожие ветки 

 
serg111111   (2006-03-22 16:24) [0]

Подскажите что не так?

d: array[1..80] of Char;
//  d:dword;
  s: string;
  i: Integer;
  BytesRead:dword;
  result:string;
begin
  Result :="";
  if not ReadFile(ComFile,d,SizeOf(d), BytesRead, nil) then
  begin
   showmessage("!!!!!!!!!!!!!!!!");
  end;
s := "";
for i := 1 to BytesRead do s := s + d[I];
  Result := s;
  edit2.Text:=s;

Почемуто при считывании из COMfile d становится равным 0


 
Сергей М. ©   (2006-03-22 16:50) [1]

Значит на момент вызова ReadFile() нет фактически принятых данных



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

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

Наверх




Память: 0.46 MB
Время: 0.096 c
15-1142195946
Volf_555
2006-03-12 23:39
2006.04.09
Как нормально установить компоненты KOL???!!!


4-1138013109
Kremen
2006-01-23 13:45
2006.04.09
Помещение символов в буфер клавиатуры


8-1130876985
~SaM~
2005-11-01 23:29
2006.04.09
Как изменить значение громкости главного регулятора?


2-1143209076
nnm
2006-03-24 17:04
2006.04.09
Декриптование


15-1142361812
zlib
2006-03-14 21:43
2006.04.09
Алгоритм сжатия