Chr и ansistring

[Vitamaster]

Пишу программу для работы с устройством. Необходимо в устройство отправлять команды в шестнадцатеричном формате.
Если пишу так:

Var adr:ansistring;
......
adr:=#128;
....
отправка в порт
.....
то все нормально, в устройство приходит значение 80

Но если пишу так:

adr:=Chr(128);

то приходит значение 3F. При чем числа от 0 до 127 приходят правильно, а вот начиная с 128 начинается какая то ерунда.

Помогите разобраться, пожалуйста.

p.s. Пишу на Delphi xe2

[Gregor]

может лучше для отправки в порт использовать не строку а байтовый массив и заполнять его как то так
Buf[0] := $80;
Buf[1] := $81;

[Vitamaster]

Дело в том, что для отправки использую готовый компонент и используется вот такая команда:

nrComm1.SendData(PAnsiChar(adr),raz mer);

Но мне нужно, чтобы параметр adr был динамическим, то есть я не могу прописывать значения статически.

[min@y™]

то есть я не могу прописывать значения статически.

То есть, ты не в курсе, что PAnsiChar - это указатель?
Метод SendData() может выдать любой кусок памяти.

[Gregor]

Сообщение от Vitamaster

я не могу прописывать значения статически.

Опишите массив так TBuf = array[0..MAXWORD] of byte
а в вашей функции SendData вы как раз и указываете последним параметром сколько байт из этого буфера вы должны взять для отправки

[Аватар]

adr:=AnsiChar(128)

[Vitamaster]

Сообщение от Аватар

adr:=AnsiChar(128)

Спасибо!!!
Работает!