Скачать: CL | DM;

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

---

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

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

---

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

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

---

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

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

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

_IncorrectDataText := IncorrectDataText;

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.021 c