Вниз
Скачать: CL | DM;

Как открыть в Richedit кодированный rtf   Найти похожие ветки 

← →
Dimich1978   (2008-07-22 11:06) [0]

Вообщем есть rtf, вордом открывается как кодированный текст, Richedit его открывает коряво. Как нормально открыть данный текст.
Заранее спасибо.
Долго не программил, поэтому сильно не пинать.


← →
Dimich1978   (2008-07-22 11:32) [1]

Если кому интересно, сделал так(не мое на авторство не претьендую)
type
 TOEMTextConv = class(TConversion)
 public
   function ConvertReadStream(Stream: TStream; Buffer: PChar; BufSize: Integer): Integer; override;
 end;

{ TOEMTextConv }
function TOEMTextConv.ConvertReadStream(Stream: TStream; Buffer: PChar;
 BufSize: Integer): Integer;
begin
 Result := Stream.Read(Buffer^,BufSize);
 OEMToCharBuff(Buffer,Buffer,Result);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
 RichEdit1.RegisterConversionFormat("txt",TOEMTextConv);
 RichEdit1.Lines.LoadFromFile("c:\1.txt");
end;


← →
Anatoly Podgoretsky ©   (2008-07-22 11:47) [2]

> Dimich1978  (22.07.2008 11:32:01)  [1]

А где здесь кодирование?


← →
brother ©   (2008-07-22 11:57) [3]

конвертация однако)


← →
Anatoly Podgoretsky ©   (2008-07-22 12:02) [4]

конвертация и мкодирование - это разные вещи.
Для показа OEM конвертирование не требуется,
я думаю, что это не конвертация, а ремонт испорченого RTF



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.016 c
15-1215076413
Tonich
2008-07-03 13:13
2008.08.24
Халтурка


15-1215574736
AEN
2008-07-09 07:38
2008.08.24
Есть ли у Билла Гейтса ВО?


15-1215158807
Вопросик
2008-07-04 12:06
2008.08.24
напоминание пароля


15-1215179495
jane
2008-07-04 17:51
2008.08.24
Не могу установить delphi 5 :(


15-1215587634
SoundB
2008-07-09 11:13
2008.08.24
Помогите с SQL запросом




   Наверх