14-12-17, 09:40 PM
الصفحات : 1 2
14-12-17, 09:57 PM
14-12-17, 10:22 PM
السّلام عليكم و رحمة الله و بركاته
تسلم أخي الكريم " طالب برمجة " على رابط الملف الرّائع لعمل السكانر
الدّال على الخير كفاعله
جزاك الله أحسن من ذلك و نفع بك الاسلام و المسلمين إن شاء الله
بعد إذن صاحب الموضوع ..
أخي الكريم أوّل مرّة أرى فورم بالعديد من End Class
فلم أفهم بدايته من نهايته
فلو تكرّمت و كان ذلك بالإمكان إضافة زر الحفظ للصّورة بأي قرص من أقراص الجهاز و ليكن مثلاً C
بارك الله فيك و لك مقدّمًا و رزقك من حيث تحتسب و من حيث لا تحتسب
تحياتي
15-12-17, 12:46 AM
لم أتعامل من قبل مع الماسح الضوئي،
بالاضافة أنه ليس لدي ماسح ضوئي لتجربة المرفق،
عندما شاهدت الكود لم أفهمه.
بالاضافة أنه ليس لدي ماسح ضوئي لتجربة المرفق،
عندما شاهدت الكود لم أفهمه.
15-12-17, 02:24 AM
(15-12-17, 12:46 AM)طالب برمجة كتب : [ -> ]لم أتعامل من قبل مع الماسح الضوئي،
بالاضافة أنه ليس لدي ماسح ضوئي لتجربة المرفق،
عندما شاهدت الكود لم أفهمه.
السّلام عليكم و رحمة الله و بركاته
بارك الله فيك أخي الكريم و جزاك خير الجزاء بكل الحالات
" الباب لي يجيلك منّو ..........................سدّوا واستريح "
أنا كذلك استغنيت عن المشروع بما فيه لأنّي ببساطة تعبت في إيجاد الوسيلة لنسخ على الأقل محتوياته أو تكييفها لما يناسبني
تحياتي
15-12-17, 04:07 AM
لا يوجد .......................... ولا حاجة
المسألة في معرفة الكود
استطعت اختصار الكود وتوصلت للتالي:
اعمل مشروع وقم بتضمين المكتبتان التاليتان:
Leadtools.dll
Leadtools.Twain.dll
وفي الفورم ضع زرين وأداة صورة
تبقى مسألة تجربته على من عضو لديه ماسح ضوئي
المسألة في معرفة الكود
استطعت اختصار الكود وتوصلت للتالي:
اعمل مشروع وقم بتضمين المكتبتان التاليتان:
Leadtools.dll
Leadtools.Twain.dll
وفي الفورم ضع زرين وأداة صورة
PHP كود :
Public Class Form1
Private WithEvents TwainSession1 As New Leadtools.Twain.TwainSession
Private Sub TwainSession1_AcquirePage(ByVal sender As Object, ByVal e As Leadtools.Twain.TwainAcquirePageEventArgs) Handles TwainSession1.AcquirePage
If Not IsNothing(e.Image) Then
PictureBox1.Image = e.Image.ConvertToGdiPlusImage
End If
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
Me.TwainSession1.Startup(Me, "Scan Technologies, Inc.", "Abdulla Scanner .NET", "Version 16", "Abdulla Twain test sample", Leadtools.Twain.TwainStartupFlags.None)
Me.TwainSession1.Acquire(Leadtools.Twain.TwainUserInterfaceFlags.Show)
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
If Not IsNumeric(PictureBox1.Image) Then
Using save As New SaveFileDialog With {.Filter = "Images|*.png"}
If save.ShowDialog = vbOK Then
PictureBox1.Image.Save(save.FileName, Imaging.ImageFormat.Png)
End If
End Using
End If
End Sub
End Class
15-12-17, 12:22 PM
السّلام عليكم و رحمة الله و بركاته
بارك الله فيك و جزاك خير الجزاء و زادها بموازين حسناتك إن شاء الله
تحياتي
15-12-17, 04:10 PM
هل تم تجربة مشاركتي الأخيرة من عضو لديه ماسح ضوئي وعمل بنجاح؟
15-12-17, 06:48 PM
(15-12-17, 04:10 PM)طالب برمجة كتب : [ -> ]هل تم تجربة مشاركتي الأخيرة من عضو لديه ماسح ضوئي وعمل بنجاح؟
السّلام عليكم و رحمة الله و بركاته
مع الأسف المثال لم يعمل أخي الكريم .. عند محاولة تشغيل المشروع تأتي الرسالة التالية ..
تحياتي
15-12-17, 10:45 PM
قم بتعديل startup في الملف App.config الموجود ضمت قائمة ملفات المشروع
إن وجدت الملف App.config ولم تجد الجزء startup فاكتبه في نهاية الملف قبل السطر الأخير
إن وجدت الملف App.config ولم تجد الجزء startup فاكتبه في نهاية الملف قبل السطر الأخير
PHP كود :
<startup useLegacyV2RuntimeActivationPolicy="true">
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.0,Profile=Client"/>
</startup>
الصفحات : 1 2