+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : التعديل على كود حفظ الصورة في مجلد من picturebox (/showthread.php?tid=48497)
التعديل على كود حفظ الصورة في مجلد من picturebox - صالح عبدالله - 14-05-24
السلام عليكم ورحمة الله وبركاته
اريد فقط التعديل على الكود التالي حيث انه يأخذ الضورة من السكانر ثم يخزنها في المجلد الموضح في الكود بحيث يكون File name يكون مصدره picturebox1 وليس السكانر ثم يتم بعد ذلك الحفظ على هيئة PDF ( السطر المطلوب للتعديل عليه هو السطر باللون الاحمر ) شاكراً لكم تعاونكم
My.Computer.FileSystem.CreateDirectory("C:\aa_merge")
Dim intPath1 As Integer = 0
intPath1 = intPath1 + 1
Dim filename As String
My.Computer.FileSystem.CreateDirectory("C:\aa_merge\" & intPath1)
filename = TwainHandler.ScanIt("C:\aa_merge\" & intPath1)
PictureBox1.Image = Image.FromFile("C:\aa_merge\" & intPath1 & "\" + filename)
txtSource.Text = "C:\aa_merge\" & intPath1
txtDestination.Text = "C:\aa_merge\" & intPath1 & "\save.pdf"
RE: التعديل على كود حفظ الصورة في مجلد من picturebox - أبو خالد الشكري - 14-05-24
مرحبا بك
جرب كتابة السطر بالشكل التالي :
كود :
filename = TwainHandler.ScanIt("C:\aa_merge\" & intPath1.ToString())RE: التعديل على كود حفظ الصورة في مجلد من picturebox - صالح عبدالله - 14-05-24
السلام عليكم ورحمة الله وبركاته
الشكر الجزيل لك أستاذ خالد ربما لطول للشرح لم تتوضح الفكرة التي أريدها
وللتوضيح يقوم السطر بحفظ الصورة في المسار المحدد من خلال السكانر والذي أريده أن يتم التعديل ليصبح حفظ الصورة من خلال picturebox1
أتمنى أن يكون المطلوب واضح وقد عملت السطر التالي للتعديل ولكن لم ينجح معي
PictureBox1.Image = Image.FromFile("C:\aa_merge\" & intPath1)
مع التحية والشكر
RE: التعديل على كود حفظ الصورة في مجلد من picturebox - أبو خالد الشكري - 14-05-24
جرب النعديل التالي أخي العزيز
كود :
PictureBox1.Image.Save ("C:\aa_merge\" & intPath1)