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

Вниз

Как преобразовать данные прочитанные с com порта?   Найти похожие ветки 

 
Сергей   (2011-03-14 18:10) [0]

Использую компонет CommPortDriver для чтения сомпорта
в обработчике пытаюсь обработать данные.
На компорт подаю  число но после чтения получаю козяблики.
Как их преобразовать в число?

procedure TMainForm.CommPortDriverReceiveData(Sender: TObject;
 DataPtr: Pointer; DataSize: Integer);
var
 i:integer;
 s,L:string;
begin
 For i:=0 to (DataSize-1) do begin    
   s:=s+ PChar(DataPtr)[i];
 end;
RxMemo.lines.add(s);
end;


 
Германн ©   (2011-03-14 18:12) [1]


> На компорт подаю  число

Какое число?


 
Германн ©   (2011-03-14 18:19) [2]

Если передается текст, то так s:=s+ Char(DataPtr[i]);
Если не текст, то можно так s:=s+#32+IntToHex(DataPtr[i]);


 
Сергей   (2011-03-16 13:08) [3]

Данные отображались не правильно т.к скорость чтения comпорта была не 115200 бод. Выставил эту скорость все отображается.



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

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

Наверх




Память: 0.47 MB
Время: 0.009 c
8-1212651799
Феликс
2008-06-05 11:43
2011.06.19
WMF. Переформулирую вопрос


2-1299971156
Сергей К.
2011-03-13 02:05
2011.06.19
Нажатие клавиши


15-1299015000
Юрий
2011-03-02 00:30
2011.06.19
С днем рождения ! 2 марта 2011 среда


15-1298707427
RWolf
2011-02-26 11:03
2011.06.19
Подскажите подходящий grid


3-1260890661
man Yury
2009-12-15 18:24
2011.06.19
Странный результат при выполнении хранимой процедуры