Проблема с выводом данных в QRPrinter

← →
mefodiy (2007-08-30 10:50) [0]

Использую для вывода информации QRPrinter. Вот необходимый для анализа кусок кода:

with QRPrinter do
begin
Cleanup;
Orientation := poPortrait;
PaperSize := A5;
BeginDoc;
with QRPrinter.Canvas do
begin
Font.Size := 8;
Font.Style := [fsBold];
...
<Здесь я вывожу на канву то, что мне нужно>
...
end;
EndDoc;
if <условие выбирается пользователем> then
PreviewModal
else
Print;
end;

Проблема в том, что в режиме предварительного просмотра и последующей печати все нормально. Но при непосредственной печати шрифт принтера увеличивается и вместо 8 становится 12 или 14 (определяю на глаз).
В чем тут дело?
Заранее спасибо.

← →
Anatoly Podgoretsky © (2007-08-30 11:43) [1]

> mefodiy (30.08.2007 10:50:00) [0]

Какой шрифт?

← →
mefodiy (2007-08-30 12:39) [2]

Шрифт "Arial".

← →
Anatoly Podgoretsky © (2007-08-30 12:50) [3]

К шрифту претензий нет.
Вероятно проблема превью, у него же примерно 96 точек на дюйм, а принтера много больше, да и другие шрифты могут использоваться.
Эта же проблема наблюдается например и у Экселя.

← →
mefodiy (2007-08-31 07:53) [4]

У кого-нибудь есть еще предположения?

Проблема с выводом данных в QRPrinter Найти похожие ветки