Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.04.26;
Скачать: CL | DM;

Вниз

Кодовые страницы   Найти похожие ветки 

 
d@sd@s   (2009-03-12 00:47) [0]

как текст записанный в кодовой странице 1251  преобразовать в дос 866? есть ли функция которая преобразует из одной кодовой страницы в другую?


 
Amoeba ©   (2009-03-12 01:00) [1]

Есть такая ф-ия!


 
d@sd@s   (2009-03-12 01:02) [2]

Просим, функцию ф студию!


 
Amoeba ©   (2009-03-12 01:10) [3]

Пожалуйста!

function StrToOem(const AnsiStr: string): string;
begin
 SetLength(Result, Length(AnsiStr));
 if Length(Result) > 0 then
   CharToOemBuff(PChar(AnsiStr), PChar(Result), Length(Result));
end;

function OemToAnsiStr(const OemStr: string): string;
begin
 SetLength(Result, Length(OemStr));
 if Length(Result) > 0 then
   OemToCharBuff(PChar(OemStr), PChar(Result), Length(Result));
end;

Ф-ии взяты из RxLib


 
Германн ©   (2009-03-12 01:12) [4]

CharToOem, CharToOemBuff
Но может в Д2009 это и не совсем так.


 
d@sd@s   (2009-03-12 01:20) [5]

Только вопрос, это для случая 1251-866?
А есть для общего случая
например 1252-866 :)


 
d@sd@s   (2009-03-12 01:23) [6]


> CharToOem, CharToOemBuffНо может в Д2009 это и не совсем
> так.

Проверил код
Вы правы, в д2009 компилятор ругается-  несовместимость типов


 
Германн ©   (2009-03-12 01:37) [7]


> d@sd@s   (12.03.09 01:23) [6]
>
>
> > CharToOem, CharToOemBuffНо может в Д2009 это и не совсем
> > так.
>
> Проверил код
> Вы правы, в д2009 компилятор ругается-  несовместимость
> типов
>

Я так и думал.
Но помочь не могу, увы. У меня нет Д2009.


 
d@sd@s   (2009-03-12 01:55) [8]

Жаль, непонятно, что они там намудрили с типами
Навожу мышку на переменную  ch:pchar;
он пишет следующее:
ch - System.PAnsiChar
хотя для  Pchar общим является юникодовский PWideChar  (в Delphi 2009)
aх юникод, юникод  и почему он сразу не возник :)


 
Anatoly Podgoretsky ©   (2009-03-12 07:40) [9]

> d@sd@s  (12.03.2009 1:20:05)  [5]

Шутник?


 
Anatoly Podgoretsky ©   (2009-03-12 07:42) [10]

> Amoeba  (12.03.2009 1:10:03)  [3]

Ответ неверный, просили 1251 в 866, а не char в OEM


 
d@sd@s   (2009-03-12 09:49) [11]

Функция(string,source_кодировка,dest_кодировка)
//Даже может source_кодировка ненужна...
Я так думаю...(с)

> Anatoly Podgoretsky ©   (12.03.09 07:42) [10]

Проект стоит,
ну не томите уже)))))


 
Palladin ©   (2009-03-12 09:55) [12]

ну раз стоит, так положи его... устанет ведь... )


 
d@sd@s   (2009-03-12 09:55) [13]


> Шутник?

Незнаю, может быть
По другим веткам могу сказать определенно, что вам чувство юмора не занимать.


 
d@sd@s   (2009-03-12 10:04) [14]


> ну раз стоит, так положи его... устанет ведь... )

Да походу тут всё умористы покруче Задорнова.
Хочется узнать есть ли всё-таки программисты покруче Задорнова...))


 
Palladin ©   (2009-03-12 10:14) [15]

так фикли ты партизанишь? откуда текст взялся, как получен, описание переменной... я даже не знаю к в д2009 chartooem описана... шутник


 
Плохиш ©   (2009-03-12 10:34) [16]


> d@sd@s   (12.03.09 10:04) [14]

На вопросы по справке я отвечаю только по предоплате.


 
d@sd@s   (2009-03-12 10:34) [17]

Не знаете, не страшно.
Только один вопрос:
Я помоему не в теме, а кто такой фикли?


 
Ega23 ©   (2009-03-12 10:39) [18]


> а кто такой фикли?


фикли это ребёнок ФИКЛИ. Маленький ещё.


 
d@sd@s   (2009-03-12 10:49) [19]

С фикли ВСЁ понятно...



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

Текущий архив: 2009.04.26;
Скачать: CL | DM;

Наверх




Память: 0.5 MB
Время: 0.018 c
15-1234684978
Marser
2009-02-15 11:02
2009.04.26
КПК Asus MyPal A696


15-1234977774
vrem
2009-02-18 20:22
2009.04.26
Верить или не верить?


2-1237228064
Elephon
2009-03-16 21:27
2009.04.26
Открытие файла


2-1237222972
игяи
2009-03-16 20:02
2009.04.26
Как поместить image поверх всех компонент на форме.


2-1237121432
AIK
2009-03-15 15:50
2009.04.26
Теряется путь от исполняемой папки