Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Приветствую, уважаемые эксперты!
Как преобразовать ASCII строку в коды символов, которые используются в консольных приложениях?
Спасибо!

Вопрос задал: Евгений Eklmn (статус: Посетитель) Вопрос отправлен: 4 октября 2008, 18:36 Состояние вопроса: открыт, ответов: 1.

Ответ #1. Отвечает эксперт: Вадим К

Здравствуйте, Трофимов Евгений!
Если отвечать в лоб, то никак. так как Вы хотите непонятное преобразования. В досе тоже используются ASCII строки. С другой стороны не совсем понятно, с чего преобразовывать.
Но включив телепатию, подозреваю, что надо просто преобразование cp1251-cp866
для этого обычно используют где то такой код

var l_cBuf : array1..1024 of Char;
      &nbspl_sStr : String;
...
CharToOemBuff(PChar(Edit1.Text),@l_cBuf,Length(Edit1.Text));
l_sStr:=String(@l_cBuf);
SetLength(l_sStr,Length(Edit1.Text));
Edit1.Text:=l_sStr;

Ответ отправил: Вадим К (статус: Академик) Время отправки: 4 октября 2008, 18:50 Оценка за ответ: 5 Комментарий к оценке: Спасибо. Прошу прощения за несовсем корректно сформулированный вопрос.

Мини-форум вопроса

Мини-форум пуст.

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.