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

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

CharToOem и Cp866-U [D6, Win2k]

}|{yk ©   (2004-10-04 13:07:00) 

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

---

}|{yk   (2004-10-04 14:43:00) [1]

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

---

суслик   (2004-10-04 14:43:00) [2]

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

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

_IncorrectDataText := IncorrectDataText;

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

---

}|{yk   (2004-10-04 14:35:00) [3]

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

---

Суслик   (2004-10-04 14:29:00) [4]

пардон
cha r tooem

---

Суслик   (2004-10-04 14:28:00) [5]

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


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

---

}|{yk   (2004-10-04 14:12:00) [6]

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

---

}|{yk   (2004-10-04 13:46:00) [7]

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

---

VMcL   (2004-10-04 13:37:00) [8]

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

Всем.

---

}|{yk   (2004-10-04 13:15:00) [9]

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

---

[lamer]Barmaglot   (2004-10-04 13:14:00) [10]

Юзать Unicode?

---

Наверх