PDA

View Full Version : سوال: پرینت کردن نصف فرم !


Hamed-Beckham
پنج شنبه 21 آبان 1388, 11:45 صبح
سلام .
من یه فرم دارم و وقتی می خوام پرینتش کنم نصف فرم میفته .
چطور می تونم این مشکل رو حل کنم ؟؟؟
نصف سمت چپ فرم نمیفته !!:ناراحت::عصبانی::عصبانی++:
ممنون میشم کمکم کنید . :بوس:

ویرایش : برگه من A5 هستش .
mpmsoft
پنج شنبه 21 آبان 1388, 12:03 عصر
توضیحات کافی نیست ؟
از چه ابزاری برای چاپ استفاده می کنید ؟ (کریستال - دیتا ریپورت و ...)
تنظیمات چاپ را به چه صورت انجام دادید ؟
صالحي پناه
پنج شنبه 21 آبان 1388, 12:15 عصر
3 راه حل وجود داره
1- كاغذ شما بايد به آ4 تبديل بشه
2- از قابليت Zoom to پرينتر استفاده كني
3- موقع طراحي فرم چاپي آنر كوچك طراحي كني يعني روي همان آ5 (البته اگر از كريستال يا ... استفاده كرده باشي ميتواني ولي اگر با آبجكت Printer كار كرده باشي يه خورده سخت تره ! )
farzinf
پنج شنبه 21 آبان 1388, 12:31 عصر
مي شه بيشتر توضيح بدين در اين ضمينه آخه منم مشكل دارم
صالحي پناه
پنج شنبه 21 آبان 1388, 12:42 عصر
شما بايد مشكلتان را كامل توضيح بدهيد . با ذكر كامل مثال
Hamed-Beckham
پنج شنبه 21 آبان 1388, 12:58 عصر
راستشو بخواین من اصلا از دیتا ریپورت و کریستال سرم نمیشه !! :ناراحت:
فقط با دستورات کد پرینت رو نوشتم !!!
من یه فرم ( کاغذ ) دارم و یه برنامه نوشتیم واسش !!
اگه بخواین عکسو هم واستون میزارم ! ( عکس اسکن شده )
می خواستم ساده ترین راه و سریع ترین راه و بهم پیشنهاد بدین .

ویرایش : اینم از عکس :

http://www.img98.com/images/3b2f9kyt5fq0kg15g0w.jpg

کسی می تونه واسم کمک کنه و یه ریپورت واسه این بنویسه ؟؟؟
ممنون میشم . جبران می کنم .
صالحي پناه
پنج شنبه 21 آبان 1388, 13:21 عصر
خداييش اگه اين گزارش رو با Printer نوشتي بايد بگم خيلي با حالي .!:متعجب:
بهر حال بايد با قابليت هاي Printer.Height و printer.Width پهنا و ارتفاع كاغذت رو تنظيم كني ( قبل از ارسال دستورات پرينت )
در ضمن براي اينكه مطمئن بشم با دستورات پرينت كار كردي لطفا چند سطري از برنامت را بزار .
Hamed-Beckham
پنج شنبه 21 آبان 1388, 13:32 عصر
خداييش اگه اين گزارش رو با Printer نوشتي بايد بگم خيلي با حالي .!:متعجب:
بهر حال بايد با قابليت هاي Printer.Height و printer.Width پهنا و ارتفاع كاغذت رو تنظيم كني ( قبل از ارسال دستورات پرينت )
در ضمن براي اينكه مطمئن بشم با دستورات پرينت كار كردي لطفا چند سطري از برنامت را بزار .


Private Sub Command3_Click()
Image1.Visible = False
Command1.Visible = False
Command2.Visible = False
Command3.Visible = False
Form1.PrintForm
Image1.Visible = True
Command1.Visible = True
Command2.Visible = True
Command3.Visible = True
End Sub

میشه یه نمونه مثال بزنید واسه اون ارتفاع و عرض ؟؟؟ ممنون
:خجالت:
Tasiyan
پنج شنبه 21 آبان 1388, 15:16 عصر
من یه فرم ( کاغذ ) دارم و یه برنامه نوشتیم واسش !!
فرم شما دنگ و فنگ زياد داره بايد از يه گزارش ساز درست و حسابي استفاده كنيد
آموزش كريستال ريپورت تو سايت هست بهتره از همين كريستال استفاده كنيد
موفق باشيد/:لبخند:
Hamed-Beckham
پنج شنبه 21 آبان 1388, 17:50 عصر
یادمی یکی از دوستان همین سایت کد تنظیمات پرینتر رو داده بود که رو A5 پرینت کنه .
ممنون میشم یکی دوباره اون کد رو بده !
:لبخند:
Hamed-Beckham
پنج شنبه 21 آبان 1388, 18:55 عصر
آقا ما بدون کریستال و ریپورت اینو اوکی کردیم !! :لبخند:
فقط یه سوال ؟؟؟
من یه Button واسه پرینت گذاشتم . با اون پرینت می کنم ! ولی متاسفانه 1 بار میشه اینو زد . دومین بار ارور میده . :عصبانی:کسی کد این قسمت رو داره که بی نهایت پرینت کنم ؟؟؟
ممنون .
90 % برنامه اوکی هستش .
butterfly8528
جمعه 22 آبان 1388, 00:57 صبح
آخر دستورات پرینت گرفتن نوشتی Printer.EndDoc ؟
صالحي پناه
شنبه 23 آبان 1388, 09:58 صبح
دوست عزيز دنبال معجزه نباش . كاري كه ميخواهي انجام بدي اساسا اشتباه هست .
من تجربه زيادي براي كار با پرينتر دارم . شما يا بايد از آبجكت پرينتر استفاده بكني و يا از ريپورت سازهاي ديگه (كريستال ).
saeedzx
شنبه 23 آبان 1388, 23:32 عصر
جناب Hamed-Beckham (http://barnamenevis.org/forum/member.php?u=121336) من یک سوال از شما دارم؟
شما از دستور
form1.PrintForm
استفاده کردی ؟
یا نه
اگه از این دستور استفاده کنی به اندازه a4 پرینت می گیره