Hallo Forum,
ich versuche gerade mit Rave ein Bitmap auf meinen Ausdruck zu bringen. Dazu verwende ich im groben folgenden Code:
Delphi-Quellcode:
procedure test(Report: TBaseReport);
var
bmp : TBitmap;
begin
with Report do
begin
bmp := TBitmap.Create;
try
bmp.LoadFromResourceName(hInstance,'XY')
PrintBitmap(X,Y,1,1,bmp);
finally
bmp.Free;
end;
end;
end;
Das funktioniert soweit auch alles super, in der Vorschau sieht alles wunderbar aus. Wenn ich das Ding dann auf den Drucker ausgebe, befinden sich auch genau die richtigen Bilder an der Stelle, an der ich sie haben möchte, nur sind sie dort mindestens 10fach kleiner! Ich vermute da irgendwie ein Problem mit der Druck/Bildschirmauflösung.
Kennt jemand das Problem, welche Lösungsmöglichkeiten habe ich?
Habe schon überlegt, ob ich beim Druck abfragen kann, ob es sich um eine Vorschau oder einen tatsächlich Druck handelt. Allerdings wird mein Code nicht nochmal durchlaufen, wenn ich direkt aus der Vorschau drucke!
Bin für jeden Hinweis dankbar,
Gruß!