Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Вывод текста в приложении ($APPTYPE CONSOLE) русскими буквами... [D6, D7, Win95/98, NT4, Win2k]


KPV-10k ©   (2003-01-07 21:21:00) 

Уважаемые МАСТЕРА! Ответьте пожалуйста на вопрос: Как сделать так, чтобы в моём приложении ($APPTYPE CONSOLE) можно было корректно выводить русские буквы, а не что-то типа ЋЎ­®ўЁвмЋЎ­®ўЁ.. (Я пользуюсь WriteLn("русский текст");)


Оливейра   (2003-01-07 21:53:00) [1]

Усложнять просто :-) Проще надо, братцы!

writeln("kpyt0 3|-|a|-0 WinAPI!");


TTCustomDelphiMaster   (2003-01-07 21:41:00) [2]

function StrToOem(const AnsiStr: string): string;
begin
SetLength(Result, Length(AnsiStr));
if Length(Result) > 0 then
CharToOem(PChar(AnsiStr), PChar(Result));
end;

begin
writeln(StrToOem("Абракатабра"));
readln
end.


KPV-10k   (2003-01-07 21:36:00) [3]

Спасибо...


Anatoly Podgoretsky   (2003-01-07 21:27:00) [4]

Есди у тебя консоль поддерживает русские буквы, то CharToOem


Наверх

Титульная страница Поиск, карта сайта Написать письмо