1

Тема: Кирилиця в Delphi 7

Добрий вечір.
Написавши програму, зрозумів, що Delphi (в консольному режимі) не розпізнає кирилиці (не знаю чи це загальна проблема ОС, чи самого компілятора).
Найшов схожі проблеми в людей, але там толкової відповіді не знайшов.
Якщо хтось знає, підскажіть рішення проблеми, чи це треба перевести, чи використовувати інші види Delphi.

"Most good programmers do programming not because they expect to get paid or get adulation by the public, but because it is fun to program."
- Linus Torvalds

2

Re: Кирилиця в Delphi 7

http://www.cyberforum.ru/post424551.html

Тут мала би бути якась влучна фраза(вибачте, що витратив кілька секунд вашого часу на прочитання).

3

Re: Кирилиця в Delphi 7

Коментар мені мозок виніс. Кодування ANSI - це розширення ASCII, а ASCII кирилицю не містить і містити не може.  Там мова про cp866 і cp1251, але так конвертувати... гм... велосипедно, бо є

procedure SetCodePage(var S: RawByteString; CodePage: Word; Convert: Boolean);

Параметри: рядок (його змінюють), кодова сторінка, флаг зміни - true виконує конвертацію, false тільки змінює ознаку кодової сторінки в рядку.

Подякували: Logans1

4

Re: Кирилиця в Delphi 7

koala
Тут мова про Delphi 7, а там такої функції ще нема. Тому варіант з cyberforum-у більш-менш нормальний.

Що стосується Delphi 2009 і новіших, то там достатньо вставити такий код на початку програми:

DefaultSystemCodePage := GetConsoleCP;
Подякували: koala, Logans2