CharToOem и Cp866-U

← →
}|{yk © (2004-10-04 13:07) [0]

Никто не знает, как с помощью CharToOem перевести строку в CP866-U, потому как стандартная переводит строку просто в CP866, соответственно украинские і, є, ї не отображаются (заменяются другими (белорусскими :) символами)?

← →
[lamer]Barmaglot © (2004-10-04 13:14) [1]

Юзать Unicode?

← →
}|{yk © (2004-10-04 13:15) [2]

Чем Unicode поможет в консольных программах?

← →
VMcL © (2004-10-04 13:37) [3]

>>}|{yk © (04.10.04 13:15) [2]

Всем.

← →
}|{yk © (2004-10-04 13:46) [4]

Т.е. выводить в консоль Unicode?

← →
}|{yk © (2004-10-04 14:12) [5]

А как преобразовывать WideString в DOS - кодировку?

← →
Суслик © (2004-10-04 14:28) [6]

> А как преобразовывать WideString в DOS - кодировку?

WideString -> AnsiString (widechartomultibyte) -> DOS (chattooem)

← →
Суслик © (2004-10-04 14:29) [7]

пардон
chartooem

Не то...
var IncorrectDataText: WideString; _IncorrectDataText: AnsiString; begin IncorrectDataText := "Невірна дата!"; _IncorrectDataText := IncorrectDataText; CharToOem(Pchar(_IncorrectDataText),Pchar(_IncorrectDataText)); WriteLn(_IncorrectDataText); end;

Вобщем, решил куда как проще. Пишу текст в Delphi IDE, потом сохраняю, открываю в Bred3, конвертирую в DOS кодировку и компилю. Все нормально

> [8] }|{yk © (04.10.04 14:35)

а как оно может быть то, если при присовении

_IncorrectDataText := IncorrectDataText;

дельфи неявно вызывает widechartomultibyte для текущей кодовой страницы...
тебе же нужно для специфической. Какой именно - сам смотри.

CharToOem и Cp866-U Найти похожие ветки