Привет Delphi-программерам! Есть проблема: Имеется бланк А4, на нем текст и всякие таблицы... Треб. сделать этот бланк в электронном виде, а в ячейки таблиц вставить данные из ComboBox'ов и распечатать...  Попробовал использовать компонент TRvNDRWriter( страничка Rave) который сохр. отчет в двоичной форме в файле .NDR  потом через поток с помощью компонентов RvRenderPDF, RvRenderRTF,
RvRenderHTML, RvRenderTEXT преобразовывал этот файл в соответствующие форматы и... увидел следующее: в .TXT естественно линии таблиц не отобразились, текст впорядке, в .HTML - тоже самое, в RTF(Word) - таблицы впоряде, только толщину линии не видит, однако русский текст отобр. в виде каракуль, .PDF - тоже самое, только видит толщину линии... 

ВОПРОС: КАК сделать ,чтоб русский текст в .RTF   и .PDF  отображался нормально??????  Я уж че не делал....

Прилагаю код, на всякий случай:

procedure TForm1.Button1Click(Sender: TObject);
begin
With Form1.RvNDRWriter1 do begin
Start;
SetFont('Arial',8);
OriginX:=0.0;
OriginY:=0.0;
MoveTo(5,5);
LineTo(5,20);
LineTo(a+190,b+160);
PrintXY(a+20,b+65,'Пример');
Finish;
end;

ReportStream:=TMemoryStream.Create;
try
 ReportStream.LoadFromFile('Primer1');
 Form1.RvRenderRTF1.NDRStream:=ReportStream;
 Form1.RvRenderRTF1.PrintRender(ReportStream,'Primer2');
 Form1.RvRenderPDF1.NDRStream:=ReportStream;
 Form1.RvRenderPDF1.PrintRender(ReportStream,'Primer2');
 finally
 ReportStream.Free;
 end;
end;

Кстати, когда я сюда перенес этот код произошла такая же фигня - русский текст превратился в каракули... может это вам о чем то говорит?

Помогите пожалуйста!!!! 

Это сообщение отредактировал(а) DZ509 - 21.2.2008, 23:39