امتیاز موضوع:
  • 0 رأی - میانگین امتیازات: 0
  • 1
  • 2
  • 3
  • 4
  • 5
سوال:چگونه یک فرم را به همان شکلی که هست در پرینتر چاپ کنیم
نویسنده پیام
mohpersia آفلاین
تازه وارد

ارسال‌ها: 2
موضوع‌ها: 2
تاریخ عضویت: بهمن ۱۳۸۹

تشکرها : 0
( 0 تشکر در 0 ارسال )
ارسال: #1
سوال:چگونه یک فرم را به همان شکلی که هست در پرینتر چاپ کنیم
سوال:چگونه یک فرم را به همان شکلی که هست در پرینتر چاپ کنیمAt
۲۹-بهمن-۱۳۸۹, ۱۸:۵۹:۳۴
ارسال‌ها
پاسخ
mirn96 آفلاین
تازه وارد

ارسال‌ها: 8
موضوع‌ها: 2
تاریخ عضویت: اسفند ۱۳۸۸

تشکرها : 2
( 6 تشکر در 4 ارسال )
ارسال: #2
RE: سوال:چگونه یک فرم را به همان شکلی که هست در پرینتر چاپ کنیم
سلام دوست عزیز
من این جواب رو با امید این که شما با کامپوننت Quick Report آشنایی داشته باشین براتون ارسال میکنم.
اول یه فرم با تمامی Object هایی که دوست دارین روش قرارا بدین طراحی میکنین. بعد یک فرم دوم به پروژه تون لضافه میکننین و یک Object از نوع QuickRep به اون اضافه میکننین بعد روی این QuickRep یک Object ازنوع QRSubDetail گذاشته و پهنا و ارتفاع اونو ست میکنین . و روی اونم یه دونه QRImage قرار میدین . حالا میایین یه دونه مثلا دکمه روی فرم یکتون قرار میدین و کد زیر رو بهش اضافه میکنین و کلی باهاش صفا میکنید.
کد:
procedure TForm1.Button1Click(Sender: TObject);
var bmp:TBitmap;
begin
bmp:=TBitmap.Create;
bmp.Width:=form1.Width;
bmp.Height:=form1.Height;
bmp.Canvas.CopyRect(rect(0,0,width,Height),
form1.Canvas,
rect(0,0,width-8,Height-35));
form2.QRImage1.Width:=bmp.Width;
form2.QRImage1.Height:=bmp.Height;
form2.QRImage1.Picture:=TPicture(bmp);
form2.QuickRep1.Preview;
bmp.Free;
end;
امیدوارم مشکلتون حل شده باشه.
(آخرین ویرایش در این ارسال: ۰۴-اردیبهشت-۱۳۹۱, ۱۶:۳۴:۰۶، توسط lord_viper.)
۰۴-اردیبهشت-۱۳۹۱, ۱۳:۰۲:۲۹
ارسال‌ها
پاسخ
تشکر شده توسط : lord_viper, The.Ghost


موضوعات مرتبط با این موضوع...
موضوع نویسنده پاسخ بازدید آخرین ارسال
  [سوال] چگونه با hook کردن keylogger بسازیم hameds606 1 417 ۰۲-تير-۱۳۹۸, ۱۲:۱۲:۳۷
آخرین ارسال: Ghoghnus
Question ساختن Label در فرم! The.Ghost 4 2,506 ۲۱-دى-۱۳۹۴, ۰۱:۰۶:۴۷
آخرین ارسال: fg5849
  سوال در مورد Redirection Handling با WinInet veyskarami 1 1,321 ۲۲-خرداد-۱۳۹۳, ۱۶:۵۵:۰۷
آخرین ارسال: veyskarami
  تشخیص فشردن کلید های کیبورد موقعی که فرم فوکوس نداره siroosss 4 2,785 ۲۷-مهر-۱۳۹۲, ۱۴:۴۶:۳۱
آخرین ارسال: veyskarami
Question [سوال] معرفی برنامه پیشفرض برای خواندن یک فرمت به ویندوز samavi2020 7 5,073 ۱۲-شهریور-۱۳۹۲, ۱۱:۱۳:۴۷
آخرین ارسال: samavi2020
  نحوه انتخاب یک فایل تکست و ریختن اطلاعات آن در دیتا بیس fariba.sa 3 3,235 ۱۰-مهر-۱۳۹۱, ۱۷:۵۸:۰۹
آخرین ارسال: lord_viper
  مشکل چاپ فاکتور در rave tak-fanar 1 1,839 ۰۴-اردیبهشت-۱۳۹۱, ۰۹:۲۰:۲۲
آخرین ارسال: mirn96
Question بدست آوردن مدل سی پی یو و شماره سریال سی پی یو که در 64 بیتی هم کار می کند. The.Ghost 0 2,310 ۱۶-فروردین-۱۳۹۱, ۰۶:۱۹:۵۴
آخرین ارسال: The.Ghost
  چگونه تايم را از هم كم كنيم kazifasa 10 6,684 ۲۰-آبان-۱۳۹۰, ۲۳:۰۱:۴۱
آخرین ارسال: a_mogheimi
  ایجاد یک عنصر در زمان اجرای برنامه iman-63 1 2,127 ۱۷-شهریور-۱۳۸۹, ۱۸:۳۶:۵۲
آخرین ارسال: lord_viper

پرش به انجمن:


کاربرانِ درحال بازدید از این موضوع: 1 مهمان

صفحه‌ی تماس | IranVig | بازگشت به بالا | | بایگانی | پیوند سایتی RSS