紧急求救！有关QRImage控件的打印怪问题！(200分)

小弟现在碰到一个奇怪无比的问题：我用三个QRImage控件打印三张.jpg图片，用
喷墨打印机打印一切正常，但用激光打印机时却出现预览正常，打印时有的图象却
打不出来的情况，而且这种情况是随机的。同一张图片某次打不出来，但在另一次
又可以打出来。打印机是好的。我用Canon和HP的激光打印机都试过，都出现同样的情况。
QRImage 的属性为：
Sketch:=True;
AutoSize:=False;
Height:=200;
Wdth:=230;
三个QRImage控件的属性都是一样的。
另外，用什么方法可以把一张1100 X 820像素的图片按比例（可以添家空白）
缩小为250 X 250像素的图片？

附：QRImage控件有关代码如下：
with frmIntPrintdo

begin

if tblIntPrint.FieldValues['pic1']<>null then

QRImage1.Picture.LoadFromFile (
PicPath+tblIntPrint.FieldValues['pic1']
+PicType);
if tblIntPrint.FieldValues['pic2']<>null then

QRImage2.Picture.LoadFromFile (
PicPath+tblIntPrint.FieldValues['pic2']
+PicType);
if tblIntPrint.FieldValues['pic3']<>null then

QRImage3.Picture.LoadFromFile (
PicPath+tblIntPrint.FieldValues['pic3']
+PicType);

if (tblIntPrint.FieldValues['建议训练方案']<>'') then

QRepInt.Preview;
QRepInt.Print;

Close;
end;

没有人理我？

我终于找出原因了，是QuickReport组件与打印机驱动程序不兼容！我用word 97在
一页中一共放了12张图片，均能够顺利打出来，由来又用Delphi单独写了一个测试程序，
用一个QuickReport和12个QImage控件打印12张图片，就发生了我提出的问题。可怜我们
机房没有激光打印机，测试一次就要跑大老远，不容易啊。可是原因找出来就让我更不
好办了，难道我要用PB把整个程序重写不成？有没有更新版本的QReport组件？（我用的是
Delphi 5.0）或者是另外的报表组件也可，不过要有类似与QRChart、QRImage/
QRDBchText/QRDBText等孔件。不知道Report Builder能不能实现同样的功能？我对
它不熟悉，知道的大虾能否告诉我下载地址和用法，有例子源代码就更好。各位大虾，
这个问题是400分啊！拜托了！
我的邮箱地址是：qg_li@263.net

分坛主：这个问题我自己解决了，可不可以把分还给我啊？

可以还给你，但是这个帖子就没了啊，因为只有你自己回答。
要不再等一个人进来分他几分，剩下还你？

那就取消帖子好了。因为我一不小心在“非技术问题”版也发了一个同样问题的帖子。
Sorry! ^_^!

多人接受答案了。