فنون تصميم الفورم

السلام عليكم

يعطيك العافية اخ أندوو(undo) ,انا جديد على دوت نت و لكن فى أسئلة حولها هذا المثال الذي طرحتة بارك الله فيك

السؤال لماذا يعطى عندى خط ‘زرق تحت كلمة GetGraphicsObject المعلنة فى أول المثال انا حاولت أجربة عندى

ولم أعرف الحل و انا أعرف أنة يجب اعلان عن شى ما و انا لم أتوصل لحل هذا المشكلة

ممكن تعطينى أيميلك أخى العزيز لانى احتاج بعض الأسئلة حول الدوت نت أيميلى sami_eleiwa@hotmail.com لو ما فى اى مشكلة

و شكرا

مشكورة أخت Sister

مشكور أخ سامي وهناك نقص بسيط في الدرس تداركته في مشاركة رقم 4 ومشاركة رقم 5 في الصفحة الاولى وهو تضمن الفضاء التالي في بداية المشروع

Imports System.Drawing.Drawing2D

وهذا إيميلي seahmad76@yahoo.com

شكرا أخى على المجهود الرائع

وجزاك الله خيراً

أخي الكريم بارك الله فيك ولك على هذه السلسلة الأكثر من رائعة

وجعل الله كل حرف كتبته في ميزان أعمالك ، ولك منا جزيل الشكر والعرفان.

والله يقويك ،،، وتتحفنا بكل ما هو جديد ومفيد لأخوانك في شتى المعمورة.

طارق الكثيري :) :)

seahmad

السلام عليكم ورحمة الله وبركاته

ظهر لي خطأ في هذه الجملة...

...

Public Function

...

أتمنى أن لا تتأخر علي بالرد..

ولا تبخل علي بعلمك..فأنا مبتدئة في الفيجوال :( ...

salam

sister "مبتدئة في الفيجوال"

you can use the project included in the first page

or

tell me what the error message say

attach here your project

(i cant write by arabic becoause there is a problem with my compuetr)

السلام عليكم ورحمة الله وبركاته

بارك الله فيك يأستاذ/ seahmad

على هذا الدرس الممتاز جدا

سؤالي :-

في حالة أن مشروعي جميع النماذج به متساوية في الحجم ، فما هي طريقة صياغة الشفرة التي أستطيع بها أن يتم إستدعائها من قبل تلك النماذج المتعددة دون الحاجة إلى تكرارها في جميع النماذج ؟

you can write the code or procedure inside a MODULE

then call this procedure from "Loading Event" for every form

الف شكر اخوي (h)

و لكن هل هناك طريقة لجعل الصور أزرار كما في بعض البرامج مثل

system mechanic , registry mechanic , magic utilities ... :P

مشكور أخي seahmad على التقنية الجميلة والأفكار البديعة

وأرجو أن تعذرني لأنني أضفتك لقائمة الأصدقاء في الماسنجر وأرجو أن تعتبرني صديق لك

سأثقل عليك بالأسئلة فأرجو أن يجزيك الله عني كل الخير ودمت :P :lol:

يا سلام عليك يا أخي دروسك فعلا تفتح النفس :)

السلام عليكم ........... شكرا جزيلا على الدرس الرائع

وقد طبقت الدرس والنتيجه فعلا مذهله

ولكن ممكن شرح لهذا الكود

   Dim bmp As Bitmap
	   bmp = New Bitmap(W, H)
	   Dim G As Graphics = Graphics.FromImage(bmp)
	   Dim R As New RectangleF(0, 0, W, H)
	   Dim startColor As Color = Color.LightSkyBlue 'يمكنك من هنا اختيار أي لون يبدأ التلوين به
	   Dim EndColor As Color = Color.DarkBlue 'يمكنك من هنا اختيار أي لون ينتهي التلوين به
	   Dim LGBrush As New System.Drawing.Drawing2D.LinearGradientBrush(R, startColor, EndColor, LinearGradientMode.Vertical)
	   G.FillRectangle(LGBrush, New Rectangle(0, 0, W, H))
	   Return bmp