چاپ کوچکتر از اندازه واقعی فرم با TPrinter - اساتید جواب...

[mojtaba_z]

سلام
وقتی من از یه فرم پیرینت میگیرم از اندازه واقعی فرم خیلی خیلی کوچکتر پیرینت میگیرد.
البته با دستور زیر :

Printer.Canvas.Copyrect(Rect(0,0,Form1.Wid  th,Form1.Height),Form1.Canvas,Rect(0,0,For  m1.Width,Form1.Height)) 

اما اگر دستور زیر را اجرا کنم اندازه چاپ بزرگتر میشود ولی فونتها نقطه مانند شده
و از حالت Smooth خارج میشوند :

Image1.Canvas.Copyrect(Rect(0,0,Form1.Widt  h*10,Form1.Heigth*10),Form1.Canvas,Rect(0,  0,Form1.Width,Form1.Heigth))

لطفا راهنمایی کنید .

[mojtaba_z]

یکی جواب بده لطفا...

[said ali]

با سلام
فکر کنم dpi فرمت چند برابر dpi پرینتر. من همچین مشکلی داشتم. فکر کنم مال تو هم همین باشه.

[mojtaba_z]

سلام
لطفا بگین چطور DPI فرم یا پرینتر رو تغییر بدم .

خیلی متشکرم.

[said ali]

با سلام
یکی از property های فرم dpi یا (Dot Per Inch) اون که اگه بگردی پیداش میکنی و یه راه دیگه هم هست و اون Printscale که استفاده نکردم ولی فکر کنم جواب بده. :? :? :?