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

Вниз

ASCII в Memo   Найти похожие ветки 

 
roman002 ©   (2002-11-15 05:29) [0]

Подскажите плз как в Мему загрузить файл в досовой кодировке (точнее прочитать)


 
sask ©   (2002-11-15 05:54) [1]

Идея следующая:
procedure TForm1.Button1Click(Sender: TObject);
var List: TStringList;
S: String;
begin
List := TStringList.Create;
try
List.LoadFromFile("FileName");
SetLength(S, Length(List.Text));
OemToAnsi(PAnsiChar(List.Text), PAnsiChar(S));
Memo1.Lines.Add(S);
finally
List.Free;
end;
end;


 
SottNick ©   (2002-11-15 08:16) [2]

а может тебе будет достаточно поставить шрифт у мемо в "System"?


 
sask ©   (2002-11-15 08:21) [3]

2 SottNick © (15.11.02 08:16)
согласен... а что, если будет надобность одновременно отображать несколько файлов с разными кодировками?


 
SottNick ©   (2002-11-15 09:33) [4]

я просто уточнил...


 
Zn   (2002-11-15 10:02) [5]

А нельзя ли как-то по умолчанию указать кодовую страницу 866? Мне, например надо работать в одной программе и с текстовыми файлами, и с dbf-файлами в DOS-кодировке.



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

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

Наверх




Память: 0.47 MB
Время: 0.012 c
1-82747
SuperVK
2002-11-11 12:17
2002.11.25
Автоматическая прокрутка в TRichEdit глючит с RTF


1-82742
mer
2002-11-13 07:27
2002.11.25
События программно созданых компонентов


7-83025
Данилин Руслан
2002-07-19 14:02
2002.11.25
Как отключить кнопку Пуск


3-82600
dim-
2002-11-04 11:47
2002.11.25
автоподставление


14-82949
Pumpkin
2002-11-05 23:51
2002.11.25
Как заставить NetWare client не логиниться при загрузке Windows