Что я делаю не так при чтении с последовательного порта

← →
KostR (2005-02-04 12:12) [0]

Здравствуйте. Когда я открываю порт и отправляю туда что-либо, примерно так:
vcport.Open;//открываем порт
Buff:=strtoint(edsend.Text);//откуда отправляем
lbuff:=Length(edsend.Text);// длина посылки
vcport.WriteBuf(Buff,lbuff);// запись в порт
все получается, устройство, подключенное к порту откликается.
Когда я открываю порт и пытаюсь получить от туда что-либо, примерно так:
procedure TForm1.vcportRxChar(Sender: TObject; Count: Integer);
begin
vcport.ReadBuf(buf,count);
label1.Caption:=inttostr(buf);
end;
Получаю в label1.Caption какую-то ерунду, что-то вроде
-28394890987…
Что я делаю не так. Спасибо.

← →
Piter © (2005-02-04 16:40) [1]

Блин... очередной, кого нужно будет пытать,вытягивая информацию, которую он никак не хочет говорить, да?
Кому это надо?

Итак... ЧТО ТАКОЕ vcport?

← →
wal © (2005-02-04 16:52) [2]

Buff:=strtoint(edsend.Text);
lbuff:=Length(edsend.Text);

Весьма интересно, даже не зная что такое vcport.

C уважением

← →
Marser © (2005-02-04 16:58) [3]

Почти ничего не понял, но одно точно - strtoint и inttostr тут не годятся совершенно. Их использование в данном случае, скорее всего, пахнет орешками.

← →
KostR (2005-02-04 20:14) [4]

wal
Buff:=strtoint(edsend.Text);
lbuff:=Length(edsend.Text);
Весьма интересно, даже не зная что такое vcport.

Это уже работает, причем нормально. vcport - компонента, что-то вроде async32.
C уважением.

← →
Piter © (2005-02-06 18:59) [5]

KostR (04.02.05 20:14) [4]
vcport - компонента, что-то вроде async32

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

← →
Marser © (2005-02-07 11:54) [6]

> Это уже работает, причем нормально

Тогда не совсем понятно, что тебе нужно от COM-порта...

разыменование переменной buf забыл .. или не знал вообще про таковое ... а buf - указательного типа скорей всего

buf глобальная переменная, неизвестного типа.

Что я делаю не так при чтении с последовательного порта Найти похожие ветки