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

[mojtaba_z]

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

Printer.Canvas.Copyrect(Rect(0,0,Form1.Width,Form1 .Height),Form1.Canvas,Rect(0,0,Form1.Width,Form1.H eight)) اما اگر دستور زیر را اجرا کنم اندازه چاپ بزرگتر میشود ولی فونتها نقطه مانند شده
و از حالت Smooth خارج میشوند :

Image1.Canvas.Copyrect(Rect(0,0,Form1.Width*10,For m1.Heigth*10),Form1.Canvas,Rect(0,0,Form1.Width,Fo rm1.Heigth))

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

[mojtaba_z]

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

[said ali]

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

[mojtaba_z]

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

خیلی متشکرم.

[said ali]

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