(24-06-20, 11:48 AM)awidan76 كتب : السلام عليكم اخي الغالي تم تعديل المثال حسب مافهمت منك ارجو ان يكون هذا المطلوب  قم باستعراض اي صورة ثم انقر على زر طباعة 

(25-06-20, 05:32 AM)Ahmed_Mansoor كتب : وعليكم السلام ورحمة الله وبركاته

أهلا بك أخي الكريم , هذا كود طباعة الصورة الموجوده في أداة الصور Picture1 بكامل حجم صفحة الطابعة , بالتوفيق :

PHP كود :

With Printer
    .PaintPicture Picture1.Picture, 0, 0, .Width, .Height
    .NewPage
    .EndDoc
End With 


(25-06-20, 06:28 AM)ahmed250 كتب :

(25-06-20, 05:32 AM)Ahmed_Mansoor كتب : وعليكم السلام ورحمة الله وبركاته

أهلا بك أخي الكريم , هذا كود طباعة الصورة الموجوده في أداة الصور Picture1 بكامل حجم صفحة الطابعة , بالتوفيق :

PHP كود :

With Printer
    .PaintPicture Picture1.Picture, 0, 0, .Width, .Height
    .NewPage
    .EndDoc
End With 


والله يعجز اللسان عن شكرا جزاك الله الف خير يااخي الكريم وبارك الله فيك

(25-06-20, 03:45 PM)عمور2016 كتب : السلام عليكم ورحمة الله وبركاته

كيف الحال اخي واستاذنا الفاضل احمد اسال ان تكون في اتم الصحة والعافية

سؤالي ايضا نفس الموضوع بس عند عرض الصورة في الاكتيف ريبورت  بالشكل الكامل(يعني عرض الصورة قبل الطباعة)

وانا واضع الصورة بوضع stretch 
الا انها تصغر بالحجم عند عرضها للطباعه بحيث يتغير حجم الصورة الى اقل من المثبت عليه
هل يوجد كود يجعل الصورة في نفس حجم الصورة (كما ان الصورة واخذه المساحة كاملة في الاكتيف ريبورت دون تغيير صورة اخرى)



 تحياتي للجميع

---

اسباب الاحتمال فيها (تثبيت vb6)
عندما كان الويندوز 7 شغال ميه ميه
عندما غيرت جهاز اخر ويندوز 10 صارت هذه المشكلة  

ايضا عندي تحميل الادوات الى الفورم مثل الكوماند يصير فارق بين الكوماند اللي انزلها والمكان اللى محدده؟
هل يوجد ضبط يحتاج الى تعديل