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

Вниз

Глупость конечно, но...   Найти похожие ветки 

 
cypher ©   (2002-04-16 23:40) [0]

... сохранить текст в Memo можно с помошью фу-ции SaveToFile,
а как его попроще сохранить в DOS-кодировке? AnsiToOEM ведь не очень приятно, она АПИшная, да и работает с указателями... =)))
... или я совсем офигел? =)


 
Ra ©   (2002-04-17 05:54) [1]

совсем;)

var dest:pchar;
begin
GetMem(dest,Length(memo1.text)+1);
//конвертаем в дос
CharToOem(pchar(memo1.Text),dest);
memo1.Text:=dest;
// сохраняем
memo1.Lines.savetofile("text.dos");
//конвертаем назад в вин
OemToChar(pchar(memo1.Text),dest);
memo1.text:=dest;
FreeMem(dest);
end;


 
cypher ©   (2002-04-17 08:22) [2]

Ыыых.... похоже никуда от этого не денешься =))



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

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

Наверх




Память: 0.46 MB
Время: 0.012 c
3-94280
kserg@ukr.net
2002-04-08 14:25
2002.04.29
-какой тип данных лучше подходит для хранения TEXT-данных


1-94400
Nikolay
2002-04-17 19:50
2002.04.29
Переменная


1-94445
BlackJack
2002-04-13 01:11
2002.04.29
Поддержка сериализации в Delphi.


1-94456
ded_di
2002-04-16 09:49
2002.04.29
по ресурсам


14-94544
Fellomena
2002-03-21 17:43
2002.04.29
Из любопытства - кто-нибудь работал на системах класса В ?