منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : لعبة تحديد الكلمات
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2 3 4
السلام عليكم ورحمة الله وبركاته

كيف عمل مثل هذه اللعبة
لعبة تحديد الكلمات بحيث اضع الماوس على الاحرف واسحب لتحديد الكلمة ويظهر المستطيل فإذا كانت الكلمة صحيحة تظهر في Label



[ATTACH=CONFIG]2225[/ATTACH]
ممكن احد يعطيني ولو فكرة للقيام بذلك
بصراحة لعبة رائعة لكن اول مرة افكر بيهاSmile
باذن الله ان توصلت لشيء ولو شبه بعيد ساكتب موضوعا بذلك.
اتمنى ان يشاركونا بقية الاعضاء في هذا الموضوع
هذا الكود لكتابة على الداتا قريد وقد تم كتابة السطر الاول
كيف اتم باقي الاسطر

PHP كود :
Me.DataGridView1.DataSource Nothing
        Call Me
.DataGridView1.Columns.Clear()
        
Call Me.DataGridView1.Rows.Clear()
        
Me.DataGridView1.ColumnHeadersVisible False
        Me
.DataGridView1.RowHeadersVisible False
        Me
.DataGridView1.Refresh()
        
        
Me.DataGridView1.Columns.Add("Columns1""")
        
Me.DataGridView1.Columns(0).Width 30
        Me
.DataGridView1.Columns.Add("Columns2""")
        
Me.DataGridView1.Columns(1).Width 30
        Me
.DataGridView1.Columns.Add("Columns3""")
        
Me.DataGridView1.Columns(2).Width 30
        Me
.DataGridView1.Columns.Add("Columns4""")
        
Me.DataGridView1.Columns(3).Width 30
        Me
.DataGridView1.Columns.Add("Columns5""")
        
Me.DataGridView1.Columns(4).Width 30
        Me
.DataGridView1.Columns.Add("Columns6""")
        
Me.DataGridView1.Columns(5).Width 30
        Me
.DataGridView1.Columns.Add("Columns7""")
        
Me.DataGridView1.Columns(6).Width 30
        Me
.DataGridView1.Columns.Add("Columns8""")
        
Me.DataGridView1.Columns(7).Width 30
        Me
.DataGridView1.Columns.Add("Columns9""")
        
Me.DataGridView1.Columns(8).Width 30
        Me
.DataGridView1.Columns.Add("Columns10""")
        
Me.DataGridView1.Columns(9).Width 30
        Me
.DataGridView1.Columns.Add("Columns11""")
        
Me.DataGridView1.Columns(10).Width 30

        
For Each Row As DataGridViewRow In Me.DataGridView1.Rows
            Row
.DataGridView.RowsDefaultCellStyle.Alignment DataGridViewContentAlignment.MiddleCenter
            Row
.Cells(0).Value "U"
            
Row.Cells(1).Value "W"
            
Row.Cells(2).Value "E"
            
Row.Cells(3).Value "D"
            
Row.Cells(4).Value "N"
            
Row.Cells(5).Value "E"
            
Row.Cells(6).Value "S"
            
Row.Cells(7).Value "D"
            
Row.Cells(8).Value "A"
            
Row.Cells(9).Value "Y"
            
Row.Cells(10).Value "T"
        
Next 
حصلت علي برنامج مفتوح مصدر لكن بنسخة فيجوال بيسك 6



النقل للفائده فقط لا اكثر ... *_-


للتحميل الملف من الرابط التالي : ---

من هنا
اشكرك لهذا تمت التجربة

نريد مثل هذه الشبكة ولكن بدون تظليل مع امكانية التأشير والتظليل
لان المطلوب ليس الكلمات المتقاطعة بالظبط ولكن اختيار الكلمات من مربعات الشبكة واظهار الكلمة الصحيحة على Label
[COLOR="#0000FF"]السلام عليكم ورحمة الله وبركاته
تفضل أخي الكريم
هذا مثال يوضح لك طريقة لعمل ذلك

بالتوفيق[/COLOR]
وهذه تجربة اخرى
لكن تحتاج الى تعديل

اولاً ازرار Restoration لإعادة بدأ اللعبة من جديد أي مسح العلامات
ثانياً تثبيت علامة خاصة بكلمة اساسية وهي كما في الصورة الأولى SITDOWN
ثالثاً عند التأشير على كلمة خطأ يكون هناك امكانية لاعادة التصحيح بدون التأثير على الكلمات المختارة سابقاً
والف شكر اخي العزيز sooriaty03 على مثالك
واجهتني مشكلة في التأشير من اليسار الى اليمين في حالة كان النص غير عربي
الصفحات : 1 2 3 4