Форум: "Начинающим";
Текущий архив: 2008.08.10;
Скачать: [xml.tar.bz2];
Вниз
Печатаются крякозябры Найти похожие ветки
← →
Циркуль (2008-07-06 12:49) [0]Имеется метод, выводящий нумерацию страниц на канву. В него передается либо канва, на которой рисуем превью, либо канва принтера. Так вот, иногда, на отдельных клиентских компах бывает такая ситуация, что при печати на принтере русский текст (переменная PageText) выводится всякими левыми символами, причем этот же метод в превью на тех же компах все рисует корректно. И воспроизводится не со всеми шрифтами, например, для Arial или Times New Roman - воспроизводится, для Bookman Old Style - нет, и в превью и на печати все пучком.
procedure TSomeClass.DrawFooter(ACanvas: TCanvas; ARect: TRect; APageNumber, AFontSize: Integer);
var
AFooterFont: TFont;
AOldFontHandle: hFont;
DC: hDC;
begin
AFooterFont := TFont.Create;
try
AFooterFont.Assign(FFooterFont);
AFooterFont.Size := AFontSize;
DC := ACanvas.Handle;
AOldFontHandle := SelectObject(DC, AFooterFont.Handle);
try
SetBkMode(DC, TRANSPARENT);
...
DrawText(DC, PChar(SysUtils.Format(PageText + " %d/%d", [APageNumber, PageCount])),
-1, ARect, DT_BOTTOM or DT_SINGLELINE or DT_CENTER);
...
finally
SelectObject(DC, AOldFontHandle);
end;
finally
AFooterFont.Free;
end;
end;
Где грабли?
← →
KilkennyCat © (2008-07-06 19:07) [1]Грабли в настройках компов. Это не только Ваш код так может чудить, например, недавно так чудил на одной из машин вполне добротный Акробат Реадер с невполне добротным драйвером ньюлетта-паккарда.
← →
Anatoly Podgoretsky © (2008-07-06 21:02) [2]> KilkennyCat (06.07.2008 19:07:01) [1]
> вполне добротный Акробат Реадер с невполне добротным драйвером ньюлетта-паккарда.
Вообще то ни то, ни другое добротным назвать нельзя.
← →
Anatoly Podgoretsky © (2008-07-06 21:04) [3]В настройках принтрера поставить печать шрифтов битмапами.
← →
Циркуль (2008-07-06 23:55) [4]Спасибо :)
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2008.08.10;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.006 c
