Здравствуйте.  При выполнении программы во Free Pascal-е проблем с выводом русского текста нет, а при выполнении той же программы в коммандной строке то возникают проблемы с выводом русского текста. Проблема видимо с кодировкой, потому что вместо "Привет" выводится - ╧ЁштхЄ . Как можно решить эту траблу?
Заранее благодарен.

CharToOEM, SetOutputCP
FP здесь ни причем

Я слыхал об этот функции...
Можно ли примерчик какой-нить.
Желательно вывести что-нить через командную строку
Спасиб.

хоть я сегодня и добрый, но с тебя пиво )

Var
s:String;

s:='мама мыла раму';
CharToOEM(@s[1],@s[1]);
WriteLn(s);

Ваш ответ  подтолкнул меня к правильному решению- AnsiToOem:)
Спасибо большое.
Будете в наших краях обязаельно угощу пивом))))))))