|
Вопрос # 6 681/ вопрос открыт / |
|
Приветствую, уважаемые эксперты!
Пишу простейший telnet клиент. Использую компонент IdTelnet
Проблема в том что при ответе получаю доп символы.
Например захожу на Zyxel роутер.
Login: [K
Hex: 4C 6F 67 69 6E 3A 20 1B 5B 4B
a
Hex: 61
[Kd [Km [Ki [Kn [K
Password: [K
Hex: 1B 5B 4B 64 1B 5B 4B 6D 1B 5B 4B 69 1B 5B 4B 6E 1B 5B 4B 0D 0D 0A 50 61 73 73 77 6F 72 64 3A 20 1B 5B 4B
* [K
Hex: 2A 1B 5B 4B
* [K* [K* [K* [K* [K* [K* [K
Hex: 2A 1B 5B 4B 2A 1B 5B 4B 2A 1B 5B 4B 2A 1B 5B 4B 2A 1B 5B 4B 2A 1B 5B 4B 2A 1B 5B 4B 0D 0D 0A
(config)> [K
Hex: 28 63 6F 6E 66 69 67 29 3E 20 1B 5B 4B
Что это за мусор 1B 5B 4B ?
Проверял telnet (winxp) и PuTTY
Всё четко не какого мусора нет.
Приложение: Переключить в обычный режим- procedure TForm4.IdTelnet1DataAvailable(Sender: TIdTelnet;
- const Buffer: TIdBytes);
-
- var
- sVal : AnsiString;
- iLoop : integer;
- begin
- sVal:= '';
- // Convert from ASCII to a string
- for iLoop := 0 to Length(Buffer) - 1 do sVal := sVal + char(Buffer[iLoop]);
- //sVal:= AnsiToUtf8(sVal);
- // Process the input (my custom procedure)
- Memo1.Lines.add(sVal);
- Memo1.Lines.add('Hex: 'ViewBuf(Buffer,Length(Buffer)));
-
- end;
 |
Вопрос задал: Zlodey (статус: Посетитель)
Вопрос отправлен: 5 февраля 2018, 15:32
Состояние вопроса: открыт, ответов: 0.
|
Мини-форум вопроса
Мини-форум пуст.
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
