Bună ziua programatori Delphi! Există o problemă: Există o formă A4, textul de pe ea, și toate tabelele. Req. face această formă electronică și într-o celulă de tabel pentru a introduce date din ComboBox'ov și de imprimare. A încercat să folosească componenta TRvNDRWriter (pagina Rave) care salvează. în formă binară într-un fișier .NDR raport ulterior prin fluxul folosind componente RvRenderPDF, RvRenderRTF,
RvRenderHTML, RvRenderTEXT convertește acest fișier în formatul corespunzător și. a se vedea următoarele: .txt în linie naturală de tabele nu apare, textul bine, la .HTML - la fel ca și în RTF (Word) - tabel vporyade, numai grosimea liniei nu poate vedea, dar este afișat textul rusesc. sub formă de astrahan. PDF - la fel, vede doar grosimea liniei.
ÎNTREBARE: CUM SĂ FACEȚI, că textul rusesc în .RTF și .PDF a fost afișat în mod normal. Nu am făcut-o deja.
Îi închid codul, doar în cazul în care:
procedura TForm1.Button1Click (expeditor: TObject);
începe
Cu Form1.RvNDRWriter1 începe
Start;
SetFont ("Arial", 8);
OriginX: = 0,0;
Origine: = 0,0;
MoveTo (5,5);
LineTo (5,20);
LineTo (a + 190, b + 160);
PrintXY (a + 20, b + 65, "Exemplu");
Finish;
se încheie;
ReportStream: = TMemoryStream.Create;
încerca
ReportStream.LoadFromFile ("Primer1");
Form1.RvRenderRTF1.NDRStream: = ReportStream;
Form1.RvRenderRTF1.PrintRender (ReportStream, "Primer2");
Form1.RvRenderPDF1.NDRStream: = ReportStream;
Form1.RvRenderPDF1.PrintRender (ReportStream, 'Primer2');
în cele din urmă
ReportStream.Free;
se încheie;
se încheie;
Apropo, când am adus acest cod aici, sa întâmplat același gunoi - textul rusesc sa transformat în scrawl. poate acest lucru să vă spun ce spune?