تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] ممكن كود وضع صوره بخلفيتهم الفورم
#1
السلام عليكم ورحمه الله وبركاته
على افتراض ان هناك فورم رئيسى (حاوى كافه فورمان البرنامج ) وقمنا بوضع خلفيه صوره بصيغه ping
وذلك عن طريق خصائص الفورم
وهناك فورم ثانى وليكن باسم ( معلومات الشركه ) ووضعنا بها اسم الشركه والتلفون والعنوان والجوال الخ الخ الخ
ووضعنا إمكانية اضافه و تغير شعار الشركه الذى سيظهر فى التقارير. خلافه
السؤال
ارغب ان أضيف حقل اخر لتغير خلفيه الفورم الرئيسى بمعنى :-
ليبل لكتابه اضافه خلفيه للبرنامج
ويليه ( تكست بكس ) + (بوتن لاختيار الصورة ) +( بوتن للحفظ )
بمجرد الضغط على البوتن يفتح بارتشنات الجهاز واحدد صوره الخلفيه
ومن ثم موافقه فيقوم التكست بكس يحجز مسار صوره الخلفيه
ثم نضغط بوتن الحفظ لحفظ الخلفيه

وفى عمليه الرن سنجد ان الخلفيه تغيرت وفقا لما تم شرحه أعلاه


ممكن اعرف من حضراتكم طريقه عمل ذلك
الرد
تم الشكر بواسطة:
#2
السلام عليكم أخي العزيز ورحمة الله وبركاته
يمكن إضافة مربع نص غير منضم إلى النموذج الأساسي أو الواجهة الرئيسية وزر أمر وOpenFileDialog، لنفترض أن إسم مربع النص txtPath وزر الأمر btnBrowse والـ openFileDialog إسمه البرمجي OPenBrowser ويستفاد منها في تحديد مسار الملف أو الصورة.

أولا بما أن مربع النص غير منضم بمعنى آخر غير متصل بقاعدة البيانات فلا بد من إيجاد طريقة ما لحفظ القيم (مسار الملف) بداخله، ما هي الطريقة يا أخي العزيز، ركز معي :
إتبع الخطوات التالية :
- إضغط في الشريط الأدوات للمشروع الخيار Project ثم إختر من اللائحة آخر خيار (خصائص مشروعك) وسيكون بإسم مشروعك وإلى جانبه كلمة Properties.
- حدد في خصائص المشروع خيار Setting سيظهر جدول يحتوي على الحقول : Name/Type/Scope/Value
- في السطر الفارغ ضع في حقل Name قيمة MyPath و Type واختر قيمة String زمن Scope قيمة USer ثم أخرج من خصائص المشروع.
- في حدث TextChaged لمربع النص txtPath ضع الكود التالي :
كود :
My.Settings.MyPath = txtPath.Text

        My.Settings.Save()
- في حدث التحميل Load للنموذج :
كود :
Me.txtPath.Text = My.Settings.MyPath
        Me.BackgroundImage = Image.FromFile(My.Settings.MyPath)
        My.Settings.Save()
في حدث FormClosed للنموذج :
كود :
My.Settings.Save()

أتمنى لك التوفيق

ونضع الكود التالي في زر الأمر btmBrowse :
كود :
If Me.OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            Me.TextBox1.Text = Me.OpenFileDialog1.FileName
            Me.BackgroundImage = Image.FromFile(TextBox1.Text)

        End If
إسرائيل إلى زوال ...  وسوف تثبت الأيام ذلك ... قريباً إن شاء الله.
الرد
تم الشكر بواسطة: مبرمج بلا حدود
#3
اخى الكريم
khodor1985
الشكر لله ثم الشكر لك ، أسال الله ان يبارك لك فى صحتك ومالك وأهل بيتك
لسان حالى عاجز عن الشكر والتقدير والثناء لما قدمته لّى فى هذا الشرح المميز ، كـ تميزك وحضورك فى هذا الصرح التعليمى الراقى
لك منى كل الحب والتقدير ،،،
اخوك
ابوثامر

ملاحظه
وسوف آتيك. بالتطبيق حال ما يتم ذلك من خلال ملف مرفق ليستفيد منه الجميع ويكون لمن يبحث عن ظالته فى هذا الشأن
الرد
تم الشكر بواسطة: مبرمج بلا حدود
#4
لا شكر على واجب أخي العزيز
في الحقيقة إن لم أعلم سأنفجر
إسرائيل إلى زوال ...  وسوف تثبت الأيام ذلك ... قريباً إن شاء الله.
الرد
تم الشكر بواسطة: مبرمج بلا حدود


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] وضع إسم الفورم و إسم البانيل في متغير sniperjawadino 1 37 22-02-19, 08:32 PM
آخر رد: elgokr
  هل البرنامج له عدد معين من الفورم Emam emam 10 189 19-02-19, 07:09 PM
آخر رد: حريف برمجة
  سؤال في الفورم الذي يظهر فيه التقرير Emam emam 2 52 17-02-19, 03:59 PM
آخر رد: Emam emam
  مساعدة في موقع panels على الفورم ؟؟؟ abdullhadi999 2 73 16-02-19, 02:45 AM
آخر رد: أحمد النجار
  [VB.NET] مشكلة في فتح الفورم اسامه الهرماوي 1 63 15-02-19, 04:45 AM
آخر رد: princelovelorn
  [VB.NET] اظهار النص في الفور الاول ومطابقته في الفورم الاخر اباذر 3 100 14-02-19, 06:36 AM
آخر رد: princelovelorn
  مساعدة هامة احتاج كود يقوم بعمل طباعة تلقائية ل ReportViwer مجرد فتح الفورم mohamedgadain61 1 99 11-02-19, 09:47 AM
آخر رد: mohamedgadain61
  طلب كود ضبط مكان الفورم مصمم هاوي 2 106 08-02-19, 03:38 AM
آخر رد: مصمم هاوي
  [سؤال] ما هو انسب حدث ف الفورم لتشفير ملف وفك تشفيره dametucorazon 5 151 05-02-19, 05:07 PM
آخر رد: asemshahen5
  ممكن طريقة انهاء يومية للكاشير atef_020 14 483 22-01-19, 03:58 AM
آخر رد: asemshahen5

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم