با سلام به همگی
من یه مشکل دارم اون هم اینه که وقتی گزارشم چاپ شد نمی خوام بقیه صفحه رو بده بالا یعنی چاپ که تمام شد صفحه رو اجکت نکنه همونجا کاغذ رو نگه داره کسی از دوستان میتونه کمکم کنه ؟
با سلام به همگی
من یه مشکل دارم اون هم اینه که وقتی گزارشم چاپ شد نمی خوام بقیه صفحه رو بده بالا یعنی چاپ که تمام شد صفحه رو اجکت نکنه همونجا کاغذ رو نگه داره کسی از دوستان میتونه کمکم کنه ؟
متاسفانه من هم این مشکل رو دارم و تا حالا هم راهی برای اون پیدا نکردم . البته یک پیغامی در اینترنت پیدا کردم که سپوال کننده همین مشکل رو داشته و جوابی که بهش داده بودن براش کارساز بوده ولی من که چیزی متوجه نشدم . اگه شما متوجه شدید به من هم بگید . لطفاٌ
اینهم پیام :
In a previous case I had a similar problem.
What I did was I defined a NEW printer based on an existing printer.
That new printer had a custom page as it's default page.
In that custom page I did setup the size printmargins et cetera.
In the code I did as follows:
LOCAL lcOldPrinter as string
lcOldPrinter = set("Printer",2)
set printer to name "WindowsPrinterName"
* replace WindowsPrintername with the name of the new printer
report form MyReport to print noconsole noeject
set printer to name &lcOldPrinterName.
This completely solved my problem. Hope it can help you too.
البته همونطور که گفتم کسی که سپوال کرده بود خیلی راضی بود و کلی تشکر کرده بود . بنظر مشکلش حل شده بود .
یکنفر هم پیغام زیر رو برام فرستاده بود ولی عمل نمیکنه :
The entry for PrintJob was omitted from the printed book. It's reproduced here in its entirety:
PrintJob ... EndPrintJob, _PBPage, _PCopies, _PECode, _PEject, _PEPage, _PSCode, _PWait
This command pair and the whole slew of associated system variables are remnants of a printer control system that first appeared in FoxPro 1. In that DOS-dominated, application-centric, dot-matrix, tractor-feed world, it was a clever way to avoid providing printer drivers but still give you control over output. In a Windows world, most of this is totally irrelevant. Only one of these variables still does anything, and it doesn't do it very well. The table shows what these variables were originally intended to do. Except for _PCOPIES, they're all ignored in Visual FoxPro.
Variable Type Meaning
_PBPage Numeric The number of the first page to be printed.
_PCopies Numeric The number of copies to print.
_PECode Character Printer control codes to send after printing.
_PEject Character Determined whether ejects were sent before the report, after the report, both or neither.
_PEPage Numeric The number of the last page to be printed.
_PSCode Character Printer control codes to send before printing.
_PWait Logical Determined whether to wait for paper to be loaded before printing each page.
PRINTJOB ... ENDPRINTJOB is a wrapper that says everything inside is to be treated as one group. If _PCOPIES is greater than 1, PRINTJOB ... ENDPRINTJOB creates a de facto loop. Although _PCOPIES works, it's no better than simply wrapping your call to REPORT FORM in a FOR loop. It still generates the report multiple times and sends each to the printer independently. We suggest you forget these are even in the language. Saying this makes us very unhappy, since _PBPage and _PEPage used to let us print only part of a report, but they don't do it in VFP. Starting in VFP 5, the RANGE clause of REPORT FORM is the solution to that one.
Example PRINTJOB _PCOPIES = 3 REPORT FORM MyReport TO PRINTENDPRINTJOB
ای بابا چرا نوشته های انگلیسی چپکی شد ؟؟؟ :shock:
سلام
دوست گرامی اولا نگفتی گزارشی که طراحی کرده اید به چه صورتی هست
اگر از طراح گزارش استفاده کرده اید هنگام چاپ گزارش از پارامتر NOPAGEEJECT استفاده کنید
من با VFP7 کار میکنم و این پارامتر هم جواب نمیدهد
منم هم اینکار کردم ولی جواب نداد :?: :? :shock:
حالا باید چکار کنیم ؟؟؟ این موضوع هم برام خیلی حیاتیه اگه جواب نده برنامه ای که نوشتم قابل قبول براشون نیست لطفا کمکم کنید
تا به حال کسی با این مشکل برخورد نکرده ؟
اگر راه حل آنرا میدانید لطفا به بقیه هم بگویید
با تشکر
راهش رو پیدا کردم . :lol: بعد از 3 شبانه روز تلاش توی اینترنت و اونترنت بالاخره خودم راهشو پیدا کردم :cake: :سکوت:
جناب معمار بفرمائید تا ما هم یاد بگیریم باید چیکار کنیم
در تندیس های تخت جمشید هیچ کس در حال تعظیم نیست ، هیچ کس عصبانی نیست ، هیچ کس سرافکنده و شکست خورده نیست ، هیچ کس سوار بر اسب نیست ، هیچ قومی بر قوم دیگر برتر نیست ، هیچ کس برده نیست و هیچ تصویر خشنی دیده نمیشود.
************************************************** ******************************************
اندیشه کن , آنگاه سخن گو تا از لغزش بر کنار باشی
آقای معمار یاد دانشمند یونانی افتادم با اون جمله معروفش که میگفت : یافتم یافتم
جناب معمار بفرمائید تا ما هم یاد بگیریم باید چیکار کنیم
ممنون
در تندیس های تخت جمشید هیچ کس در حال تعظیم نیست ، هیچ کس عصبانی نیست ، هیچ کس سرافکنده و شکست خورده نیست ، هیچ کس سوار بر اسب نیست ، هیچ قومی بر قوم دیگر برتر نیست ، هیچ کس برده نیست و هیچ تصویر خشنی دیده نمیشود.
************************************************** ******************************************
اندیشه کن , آنگاه سخن گو تا از لغزش بر کنار باشی
اقای معمار کجایی که بی صبرانه منتظر کشفتون هستیم :) خیلی حیاتیه
همچنان منتظریم :shock:
سلام
اهه خرج داره!
____________________________
همه چیز را همگان دانند و همگان هنوز از مادر زاده نشده اند. (بزرگمهر حکیم)
شماره حسابتونو لطف کنید
میخواستی یاد بگیری که خرج نداشت
میخوای یاد بدی خرج داره :twisted:
سلام
دوستان من تمام این کدها را دارم باید انها را توی سی دی هایم براتون ییدا کنم به محضی که ییدا کردم اینجا می گذارم
سلام
دست شما درد نکنه.
من منظورم از اینکه خرج داره مزاح بود.
____________________________
همه چیز را همگان دانند و همگان هنوز از مادر زاده نشده اند. (بزرگمهر حکیم)
سلام
دوست عزیز اینقدر حساسیت نشون ندهدست شما درد نکنه.
من منظورم از اینکه خرج داره مزاح بود.
هدف ما کمک به دوستان است نه چیز دیگه
سلام
حلا از شوخی و مزاح گذشته کسی نمیخواد جواب من و بده ؟
آخر این قصه چی شد ؟ کسی پیدا نکرد ؟
چون من هنوز این مشکل و دارم .
نوشته بودید:
با تشکر از همه .
اما باید با کمال شرمندگی عرض کنم مشکل از بی تجربیگیه من بود.
من کاغذ رو از بالا تغذیه می کردم . بعد از راه رول ، کاغذ رو گذاشتم دیدم بدون هیچ تغییر دادنی خودش بعد از پرینت کاغذ دیگه اجکت نمی کنه
اگر اینطور نبوده پس دوباره یه نگاه به لینک زیر بکنید
http://www.barnamenevis.org/sh...ad.php?t=57971
درسته اما الان چند مشکل دارم که حل نشد و کارم خوابیده :
وقتی چاپ می شه باید اتوماتیک با یک کد کاری کنم که کاغذ به لبه برگرده اما نتونستم و با دکمه بر می گرده . البته اگه کدی داشته باشم که tear را off کنه فکر کنم حل بشه.
مشکل دوم باید کاری کنم که ابعاد ایجاد شده در سیستم دیگر هم حفظ شود و یا توسط برنامه ایجاد شود نه توسط کنترل پنل و دستی.
سوم اینکه نمی دونم چرا بطور پیش فرض فونت تهوما را bold چاپ می کنه .