Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как открыть в Richedit кодированный rtf [D7, WinXP]

Dimich1978 © (2008-07-22 11:06:00)
Вообщем есть rtf, вордом открывается как кодированный текст, Richedit его открывает коряво. Как нормально открыть данный текст.
Заранее спасибо.
Долго не программил, поэтому сильно не пинать.

Anatoly Podgoretsky (2008-07-22 12:02:00) [1]
конвертация и мкодирование - это разные вещи.
Для показа OEM конвертирование не требуется,
я думаю, что это не конвертация, а ремонт испорченого RTF

brother (2008-07-22 11:57:00) [2]
конвертация однако)

Anatoly Podgoretsky (2008-07-22 11:47:00) [3]
> Dimich1978 (22.07.2008 11:32:01) [1]

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

Dimich1978 (2008-07-22 11:32:00) [4]
Если кому интересно, сделал так(не мое на авторство не претьендую)
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;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »