[ArtIntellAnd]

Добрый день. Подскажите пожалуйста. Есть 16-ричная строка 38 36 31 37 38 35 30 30 30 34 30 31 35 32 35. Как передать её через сокет? Обычные текстовые сообщение передаются, а как быть с 16-ричной строкой?

Код:

ServerSocket1.Socket.Connections[0].SendText(Chr($38));
ServerSocket1.Socket.Connections[0].SendText(Chr($36));

Я как понимаю так можно передать по одному символу?
Будет ли правильно если сделать так:

Код:

ServerSocket1.Socket.Connections[0].SendText(Chr($38)+Chr($36));

[M.A.D.M.A.N.]

Лучше массивом байт передать.
вроде должна быть функция SendBuffer.

[NumLock]

Код:

var
  buf: array [0..3] of Byte;
begin
  buf[0]:=$38;
  buf[1]:=$36;
  buf[2]:=$37;
  buf[3]:=$31;
  ServerSocket1.Socket.Connections[0].SendBuf(buf, Length(buf));
end;

||

Код:

var
  buf: array [0..3] of Byte = ($38, $36, $37, $31);

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  ServerSocket1.Socket.Connections[0].SendBuf(buf, Length(buf));
end;

[ArtIntellAnd]

NumLock, спасибо большое помог