Вниз
Скачать: CL | DM;

перекодировка DOS Delphi 2009   Найти похожие ветки 

← →
zdm ©   (2009-02-10 09:01) [0]

Имеется текстовый файл в DOS кодировке, в предыдущих версиях Delphi делал так.
var
T:TextFile;
Str,Dest:String;
begin
...  
Readln(t,str);
SetLength(dest,Length(str));
OEMTOCHAR(pchar(str),pchar(dest));

В Delphi2009 пробовал строковые переменные как AnsiString не получается. Подскажите как сделать. Спасибо.


← →
Palladin ©   (2009-02-10 09:05) [1]


> В Delphi2009 пробовал строковые переменные как AnsiString
> не получается.

"Ansi" не набирается в IDE ?


← →
Palladin ©   (2009-02-10 09:05) [2]

ты"б, во первых, глянул, что на входе oemtochar требует...


← →
zdm ©   (2009-02-10 09:22) [3]

Дык в предыдущих версиях все работает, это рабочий код. Как аналогию перевода из DOS кодировки в 2009 -ой сделать?
Пробую если OemToChar (PansiChar(str),Pchar(str)); компилится но не переводит , т.е. кракозябра как была так и остается... Запутался в конец. Можно просто несколько строк как правильно.


← →
Anatoly Podgoretsky ©   (2009-02-10 09:58) [4]

> zdm  (10.02.2009 9:01:00)  [0]

The OemToChar function translates a string from the OEM-defined character set into either an ANSI or a wide-character string.

str должна быть AnsiString
dest должна быть WideString

То что ты пробовал в Д2009 никак не подтверждено никаким кодом, зато зачем то приведен код из других версий, а вопрос то про 2009.
Нафига нам нужен этот мусор?


← →
zdm ©   (2009-02-10 10:04) [5]

ОГРОМНОЕ ЧЕЛОВЕЧЕСКОЕ СПАСИБО!!!!



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

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



Память: 0.46 MB
Время: 0.011 c
2-1235327758
mm_ash
2009-02-22 21:35
2009.04.12
Dataset Buffers


15-1233663867
Кто б сомневался
2009-02-03 15:24
2009.04.12
Юмористические шоу


15-1234438605
Кто б сомневался
2009-02-12 14:36
2009.04.12
МВД запретило пользоваться псевдонимами


15-1233676974
Снеговик-2009
2009-02-03 19:02
2009.04.12
ICQ сдохла! :-))) Я преждал про джаббер...


2-1235554500
Scot Storch
2009-02-25 12:35
2009.04.12
Сохранить результа запроса в список




   Наверх