السلام عليكم .اخواني لو يمكن المساعدة بهاذي المشكلة
لدي فورم و به 2 ازرار
الزر الاولاني لاستيراد الصورة و الثاني يحفظ الصورة . اريد حفظ الصورة بمجلد خاص على القرص D تنحفظ فيه الصورة .لما اختار صورة مرة ثانية و اعمل حفظ بزر2 يستبدل الصورة يلي كانات محفوظة بالصورة يلي اخترتها من جديد و هكذا يعني دائما احتفظ بالصورة الاخيرة فقط و بارك الله فيكم
السلام عليكم
الكود التالي لالغاء كل الملفات التي بداخل فولدر picture الموضوع في مجلد البرنامج
For Each file_path As String In Directory.GetFiles(CurDir() & "\picture\")
Try
File.Delete(file_path)
Catch ex As Exception
End Try
Next
هذا الجزء خاص بحفظ الصورة
Dim myimage As Image = PictureBox1.Image
Dim FPath As String = CurDir() & "\picture\"
myimage.Save(FPath & "ضع هنا اسم الصور" & ".jpg", System.Drawing.Imaging.ImageFormat.Jpeg)
هذا الكود لجلب الصورة الموجودة الى مربع الصورة في الفورم
PictureBox1.Image = Image.FromFile(مساء الصورة مع اسمها & ".jpg")
بارك الله فيك أخي
هل ممكن تعدلي على الملف بارك الله فيك لم تضبط معي اخي
اريد احفظ بمجلد اسمة CHAHADETE و الصورة تكون باسم PROFILE
اخي و الله كله مضبوط بارك الله فيك و في والديك .بقي لي بعد اذنك كيف لو اريد تغيير مسار المجلد و يكون المجلد بالقرص مثلا D و لا يكون بال curdir .و ارجو المعذرة تعبتك معي اخي
ولا يهمك يا غالي
شتبي بلغني وغن كان بيدي حاضر بإذن الله........
بالنسبة لسؤالك
اسم المجلد اللي انت عطيتني اياه حطه بجوار الملف التنفيذي مالك بيصير هو الوجهة مالتك وين ما تروح يروح معاك
ولو تبي تغييره بلغني
بارك الله فيك و جعلها بميزان حسناتك ان شاء الله .ما قصرت اخي كلو مضبوط الهي يسعدك يا رب
(01-04-21, 11:08 AM)محمد خيري كتب : [ -> ]بارك الله فيك و جعلها بميزان حسناتك ان شاء الله .ما قصرت اخي كلو مضبوط الهي يسعدك يا رب
ويسعد أيام ربنا
كل عام وأنت بألف خير وصحة