請問 前輩們
為什麼 case 1 在某廠牌的影印機兼印表機上
都是列印出白紙一張,其它廠牌的印表機不會(HP,Epson....)
少了什麼指令,
請各位前輩幫幫忙,


// -------------------- case 1 --------------------------


pntView1->Canvas->Brush->Style = bsSolid;
pntView2->Canvas->Brush->Style = bsSolid;
pntView1->Transparent = false;
pntView2->Transparent = false;

if(PrintDialog1->Execute()){
Printer()->Title = sPrintName;;
Printer()->Orientation = poPortrait;
Printer()->BeginDoc();

Printer()->Canvas->CopyRect(Printer()->Canvas->ClipRect, pntView1->Canvas, pntView1->Canvas->ClipRect);

Printer()->EndDoc();
}

// -------------------- case 2 --------------------------

Printer()->Title = "ABC TEST";
Printer()->Orientation = poPortrait;
Printer()->BeginDoc();
int iScaleX = GetDeviceCaps(Printer()->Canvas->Handle, LOGPIXELSX);
int iScaleY = GetDeviceCaps(Printer()->Canvas->Handle, LOGPIXELSY);

Printer()->Canvas->TextOut(100,100,IntToStr(iScaleX));
Printer()->Canvas->TextOut(200,200,IntToStr(iScaleY));

Printer()->EndDoc();

編輯記錄