Форум: "Начинающим";
Текущий архив: 2011.06.19;
Скачать: [xml.tar.bz2];
ВнизКак преобразовать данные прочитанные с 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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.005 c