Главная страница
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.023 c
1-82778
Suprime
2002-11-12 20:06
2002.11.25
Вопрос про ListBox, но имеющи отношении к математике


1-82851
Zn
2002-11-14 10:31
2002.11.25
Выделение и освобождение памяти под PChar


14-82999
Шишкин Илья
2002-10-30 21:30
2002.11.25
Оцените мою первую игру.


1-82839
se-run
2002-11-14 11:20
2002.11.25
skin компонента


3-82572
Alex Chu
2002-11-03 12:39
2002.11.25
Стоит ли смотреть дистрибутив Delphi7 ?