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

Вниз

Перекодировка DOS -> Windows и обратно   Найти похожие ветки 

 
Sem   (2004-09-12 17:39) [0]

Только начинаю осваиваться в Delphi. Как это делается? Где0то в uke.byt понимаю что очень просто, но найти не могу! Подсоветуйте. Спасибо.


 
QuasiLamo ©   (2004-09-12 18:06) [1]

FAQ


 
QuasiLamo ©   (2004-09-12 18:29) [2]

QuasiLamo ©   (12.09.04 18:06) [1]
{ **** UBPFD *********** by delphibase.endimus.com ****
>> Конвертирует строку из кодировки DOS в кодировку Windows и обратно

Конвертирует строку из кодировки DOS в кодировку Windows и обратно

Зависимости: ???
Автор:       Сергей, nfkazak@inbox.ru, Краснодар
Copyright:   VIP BANK
Дата:        11 сентября 2002 г.
***************************************************** }

function WinToDos(St: string): string;
var
 Ch: PChar;
begin
 Ch := StrAlloc(Length(St) + 1);
 AnsiToOem(PChar(St), Ch);
 Result := Ch;
 StrDispose(Ch)
end;

function DosToWin(St: string): string;
var
 Ch: PChar;
begin
 Ch := StrAlloc(Length(St) + 1);
 OemToAnsi(PChar(St), Ch);
 Result := Ch;
 StrDispose(Ch)
end;


 
sem   (2004-09-12 21:30) [3]

Спасибо!
А вот еще в добавочек:
А как определить что за кодировка DOS или Windows?
Списибо!



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

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

Наверх




Память: 0.47 MB
Время: 0.042 c
1-1096754760
delphi-coder
2004-10-03 02:06
2004.10.17
Перевод любого файла в HEX


3-1095419269
Солер
2004-09-17 15:07
2004.10.17
Данные из DBGrid в Word


3-1095658526
Алексей
2004-09-20 09:35
2004.10.17
XML для запихивания данных в таблицы....


6-1091837453
НовичОк
2004-08-07 04:10
2004.10.17
Блокировка рисунков в WebBrowser e


1-1096959014
MSerg
2004-10-05 10:50
2004.10.17
Циклы