شكل شفاف (التعتيم)
هذه المرة أريد أن أظهر مثال صغير في البصرية الأساسية. صافي التي أعجبتني عندما فعلت في المرة الأولى. انها ليست شيئا التي نستخدمها كل يوم ولكن أنا متأكد من أنها سوف تحب، وسوف تجد فيها. وأحب بصفة خاصة في استخدامه عندما تبين لي أن الصورة "حول ..." في بعض التطبيقات الخاصة بي ...
هذا هو الظهور التدريجي لشكل، ويبدأ حتى يبدو واضحا بنسبة 100٪. لذلك نحن بحاجة إلى استخدام عنصر تحكم مؤقت والخاصية التعتيم من النموذج.
في المثال فإننا سنضع ما نموذجين (Form1 وForm2)، وForm1 مع زر وعمل على هذا الزر لاستدعاء النموذج الثاني. والنموذج الثاني تظهر تدريجيا، وسوف تفعل الشيء نفسه عندما نغلق. ينبغي أن تبدو في الصورة أدناه:
جيد، والحصول على العمل، هاها.
أول زر فوق الحدث لتحميل النموذج الثاني:
خاصة الفرعية Button1_Click (الأساسية ByVal مرسل بواسطة البريد الالكتروني System.Object الأساسية ByVal، كما System.EventArgs) يعالج Button1.Click كما جديد vForm2 خافت Form2 vForm2.ShowDialog () نهاية الفرعية
في إدراج 2 مكونين النموذج الموقت (Timer1 وTimer2). ثم نسخ التعليمات البرمجية التالية:
Form2_Load خاصة الفرعية (المرسل الأساسية ByVal البريد الالكتروني System.Object الأساسية ByVal، كما System.EventArgs) يعالج MyBase.Load Me.Opacity = 0 Timer1.Interval = 25 Timer1.Enabled = صحيح نهاية الفرعية الفرعية الخاصة Form2_FormClosing (المرسل الأساسية ByVal بواسطة البريد الالكتروني، وجوه الأساسية ByVal كما System.Windows.Forms.FormClosingEventArgs) مقابض Me.FormClosing Timer2.Interval = 25 Timer2.Enabled = صحيح إذا Me.Opacity> 0 ثم e.Cancel = صحيح نهاية إذا نهاية الفرعية Timer1_Tick خاصة الفرعية (المرسل الأساسية ByVal البريد الالكتروني System.Object الأساسية ByVal، كما System.EventArgs) مقابض Timer1.Tick إذا Me.Opacity = 1 ثم Timer1.Enabled = خطأ آخر Me.Opacity Me.Opacity + 0.02 = Me.Refresh () نهاية إذا نهاية الفرعية Timer2_Tick خاصة الفرعية (المرسل الأساسية ByVal البريد الالكتروني System.Object الأساسية ByVal، كما System.EventArgs) مقابض Timer2.Tick إذا Me.Opacity = 0 ثم Timer2.Enabled = خطأ Me.Close () آخر Me.Opacity Me.Opacity = - 0.02 Me.Refresh () نهاية إذا نهاية الفرعية
سأشرح بإيجاز ما تقوم به:
أشكال النوافذ تحتوي على خاصية تسمى التعتيم الذي يخزن قيمة من 0 إلى 1. تشير هذه القيمة النسبة المئوية للغموض النموذج، حيث 1 100٪ 0 0٪ غير واضحة ومبهمة، والتي ستكون هي نفسها قوله ان 100٪ شفاف. لذلك بقيمة 0.5 سوف يكون لها شكل 50٪ 50٪ غير شفاف أو شفاف (حسب رغبتك).
ما الذي يجعل التحكم الموقت لتشغيل التعليمات البرمجية في توقيت الحدث التجزئة قد miestras تمكين الخاصية إلى True وكل فترة زمنية تحددها الخاصية الفاصل الزمني.
ثم لدينا لTimer1 عند فتح النموذج (وبالتالي acrivo "Timer1.Enable = صحيح" في الحدث Load وTimer2 عندما أغلقت (في النموذج الحدث الختامي).
حسنا، أنا لن بالتفصيل عن تفسيرات لأن رمز قصيرة وأعتقد أن هناك أكثر بكثير من مجرد توضيح.
إذا كنت مثل هذا المثال ترك تعليق. وأود أن أعرف ما هي تفضيلات من بلدي الزوار.
20 الردود على "نموذج شفاف (التعتيم)"
تعليق
معلومات Bitacoras.com ...
معدل في Bitacoras.com: هذه المرة أريد أن أعرض مثالا الصغيرة التي أحببت عندما فعلت في المرة الأولى. انها ليست شيئا التي نستخدمها كل يوم ولكن أنا متأكد من أنها سوف تحب، وسوف تجد فيها. Particularm ...
شكرا لك!
gmn negc ... bingung ... الدكتور مانا دولو مولاي نيا ..
gmn الجانبي لوبوا KLU الكياك؟
تفو هذا هاها Buno جدا impreciono لي
شكرا
هذا الرجل السوبر غرامة، ولكن اذا كنت اذا كنت تستطيع ان ترسل لي أغنيات جديدة إلى بريدي، وسأكون ممتنا كثيرا من الرجال ...
الدهون الجيدة بعد ظهر اليوم، وسوف لا يكون لديك أي مثال للسيطرة على (إما التسمية، زر، والإطار) شفافة؟ شكرا
بفضل هذا الرجل هو رمز جيد وهذا هو ما estava رجل يبحث ..... شكرا
شكرا لكم بشكل جيد هذا ESPLICADO
شكرا AC إخوانه وقت كنت أشاهد هذا، فإنه يحقق للمحترفين ACR د خلاف ذلك لا يريد س، الآن مشكلة لم يتم تحقيق ACR تأثير QL س يحدث عندما يرد في شكل آخر waaaaaaaaaaaa.
شكرا
ESAT جيدا ....
ولكني أود أن أعرف كيف لعرض الصور س UA بعد آخر، ولكن desvanescan أن تصبح أو غموض شفاف ....
grasias مساعدة نأمل لي!
أنا أبحث لجعله شفافا، أو تغيير التعتيم لها، تحكم واحد، وليس النموذج. أحد يعرف؟
ليس كل الضوابط لديها هذه الخاصية، يجب دراسة كل عنصر معين.
جيدة جدا شكرا جزيلا
يحظى بتقدير جيد جدا متابعة مزيد من المعلومات يرجى ..... هذا مثير جدا للاهتمام
عظيم.
بحثت في عدة مواقع explicanción سهلة لإدارة المكونات من Visual Studio. algunso هم من الفقراء جدا، والبعض الآخر ليست واضحة وأخرى تأخذ الكثير من الامور وتعقيد.
أريد أن أهنئكم على انتخابكم بلوق. عمليا، "واحد" لشرح ومفيدة للغاية.
شكرا ساعدتني كثيرا.
لا نزال نرى أمثلة لإكمال قريبا مشروع لدي في بيتي.
دوغلاس سالسيدو
معجزة - الاكوادور
شكرا جزيلا على تعليقك، وهذه هي الروح التي تحرك هذا بلوق: لا نعرف كل شيء، ولكن في كل مقال كتبه لتفسير ذلك كما تخضع كل بسيطة وعملية قدر الإمكان.
التحيات
إليشا
عمل جيد
من فضلك، أنا عالقة السوبر أنا، ولست بحاجة لمعرفة رمز لاسترداد محتويات خلية حيث أنا النقر على داتاغريدفيف في Visual Studio، وأود أن نقدر ذلك حقا، وآمل أن الجواب ... شكرا
مرحبا
لديك لكتابة التعليمات البرمجية في الحدث نقرة من خلية وقراءة قيمة datagridview1.currentCell.value
أو
datagridview1.currentrow.cell (ن). قيمة حيث n هو مؤشر العمود في السؤال
وآمل أن تكون
GrdDatos_MouseDoubleClick خاصة الفرعية (المرسل الأساسية ByVal البريد الالكتروني System.Object الأساسية ByVal، كما System.Windows.Forms.MouseEventArgs) مقابض GrdDatos.MouseDoubleClick
إذا Convert.ToInt32 (GrdDatos.CurrentRow.Index) <= Convert.ToInt32 (GrdDatos.Rows.Count - 2) ثم
txtOrdeninter.Text GrdDatos.CurrentRow.Cells = (0). Value.ToString ()
نهاية إذا
txtOrdeninter.Text GrdDatos.CurrentRow.Cells = (0). Value.ToString ()
txtPartinter.Text = GrdDatos.CurrentRow.Cells (1). Value.ToString ()
txtCant_ter1inter.Text = GrdDatos.CurrentRow.Cells (4). Value.ToString ()
txtcantdisp.Text = GrdDatos.CurrentRow.Cells (5). Value.ToString ()
txtCant_EnvioInter.Text = GrdDatos.CurrentRow.Cells (6). Value.ToString ()
txtLotinter.Text = GrdDatos.CurrentRow.Cells (10). Value.ToString ()
txtMedidaInter.Text = GrdDatos.CurrentRow.Cells (13). Value.ToString ()
ActDesBotones (صواب)
إذا Convert.ToInt32 (GrdDatos.CurrentRow.Cells (4). القيمة) = 0 ثم
btnModificarInter.Enabled = خطأ
نهاية إذا
txtCant_EnvioInter.Focus ()
نهاية الفرعية
أنا آمل تقدمون