[سعود]

المرفق

حل مشكلة اختلاف الاصدار

[عدنان الشمري]

السلام عليكم
ممكن مساعدة في برنامج يقوم بسحب صورة من ال scanner وحفظها بصيغة PDF 
او كود يقوم بتحويل الصورة المحملة في ال Picture box الى صيغة PDF وحفظها مثلا في D 
مع الشكر والتقدير

[سعود]

(19-02-15, 03:22 PM)عدنان الشمري كتب : السلام عليكم
ممكن مساعدة في برنامج يقوم بسحب صورة من ال scanner وحفظها بصيغة PDF 
او كود يقوم بتحويل الصورة المحملة في ال Picture box الى صيغة PDF وحفظها مثلا في D 
مع الشكر والتقدير

الصراحة لم اتناول هذا الامر من قبل لكن بحثت ووجدت هذا المقال
http://www.codeproject.com/Articles/2860...les-to-PDF

[عدنان الشمري]

اخي سعود
شكراً لاهتمامك بالموظوع ولكن احتاج الى برنامج يقوم بسحب الصور من السكنر وحفظها بصيغة PDF

[سعود]

(08-03-15, 09:19 PM)عدنان الشمري كتب : اخي سعود
شكراً لاهتمامك بالموظوع ولكن احتاج الى برنامج يقوم بسحب الصور من السكنر وحفظها بصيغة PDF

الجزء الاخر موجود
http://vb4arb.com/vb/Thread-ImgToPdfconverter
اما السحب من السكنر فلم اتطرق لها من قبل
لو لديك مثال ارفعه لاعدل عليه لاضيف الباقي.

[عدنان الشمري]

(09-03-15, 10:20 AM)سعود كتب :

(08-03-15, 09:19 PM)عدنان الشمري كتب : اخي سعود
شكراً لاهتمامك بالموظوع ولكن احتاج الى برنامج يقوم بسحب الصور من السكنر وحفظها بصيغة PDF

الجزء الاخر موجود
http://vb4arb.com/vb/Thread-ImgToPdfconverter
اما السحب من السكنر فلم اتطرق لها من قبل
لو لديك مثال ارفعه لاعدل عليه لاضيف الباقي.

السلام عليكم
في المرفقات مثال يقوم بسحب الصورة من السكنر ومن ثم حفظها في قاعدة بيانات 
احتاج تعديل على البرنامج لاتمكن من:-
1- تحديد السكنر الذي سوف نستخدمة في سحب الصورة في حال وجود اكثر من سكنر مثبت على الكمبيوتر.
2- حفظ الصورة في ملف وليس في قاعدة بيانات كما في المثال المرفق وتكون بصيغة PDF.
4- في حال وجود اكثر من صورة لسحبها من السكنر تحفظ في ملف PDF  واحد مثل كتاب الكتروني.

مع التقدير

[سعود]

المعذرة فلم اعرف الا النقطة رقم 2 وهي سهلة

كود :

Dim doc As New PdfDocument()
        doc.Pages.Add(New PdfPage())
        Dim xgr As XGraphics = XGraphics.FromPdfPage(doc.Pages(0))
        Dim img As XImage = XImage.FromFile(TextBox1.Text)
        xgr.DrawImage(img, 0, 0)
        doc.Save(TextBox2.Text & an & ".pdf")
        doc.Close()

المكتبة موجةدة بالمثال اللي كتبت رابطه
فقط استبدل الغير معرفة بماعندك

[عدنان الشمري]

شكرا جزيلاً