+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : قائمة رقمية في RichTextBox (/showthread.php?tid=26250)
قائمة رقمية في RichTextBox - معاذ_ابراهيم - 27-08-18
السلام عليكم وكل عام وانتم بخير
السؤال وكما هو موضح من عنوانه كيف اعمل قائمة رقمية في اداة الريتش تيكست
وليس نقطيه كما الكود التالي
PHP كود :
RichTextBox1.SelectionBullet = True.
RE: قائمة رقمية في RichTextBox - elgokr - 28-08-18
(27-08-18, 12:01 PM)معاذ_ابراهيم كتب : السلام عليكم وكل عام وانتم بخير
السؤال وكما هو موضح من عنوانه كيف اعمل قائمة رقمية في اداة الريتش تيكست
وليس نقطيه كما الكود التالي
PHP كود :
RichTextBox1.SelectionBullet = True
وعليكم السلام ورحمة الله وبركاته
لا اعلم اذا كان متوفر فى هذا الاداء تغيير علامة * الى ارقام او احرف ام لا
لكن حبيت ان انشاء كود للفكرة المطلوب واتمنى ان فكرة الكود ان تنال وان تكون المطلوب تماماً
اليك الكود التالى قم بوضعه فى حدث RichTextBox1_KeyDown
كود :
Dim ListLine As New List(Of String)(RichTextBox1.Lines)
For i As Integer = 0 To ListLine.Count - 1
ListLine(i) = ListLine(i).Replace(i + 1 & "- ", "")
ListLine(i) = i + 1 & "- " & ListLine(i)
Next
RichTextBox1.Lines = ListLine.ToArray
RichTextBox1.Focus()
RichTextBox1.SelectionStart = RichTextBox1.TextLengthفبمجرد ما تكتب اى جملة فى السطر ستجد انه يقوم بالترقيم تلقائي
طبعاً يمكنك استغلال الكود والتعديل عليه ليعمل حسب الحاجة
تحياتى لك
وتمنياتى لك التوفيق
RE: قائمة رقمية في RichTextBox - ابراهيم ايبو - 28-08-18
السلام عليكم ورحمة الله وبعد
شكرا اخي elgokr هكذا يفكر المبرمج فالاكواد ليست قوالب جاهزة copy ثم paste ينبغي لعقولنا ان تسلك منهج التفكير والتفاعل والبحث لايجاد علاقات صحيحة بين عبارات اللغة البرمجية لتنفيذ فكرة ما وهذا هو السر في البرمجة فالمبرمج الناجح يعمل عقله والمبرمج المعتمد على الغير يعمل نقله وشتان مابين العاقل والناقل بصراحة حاولت ايجاد الكود وفكرت بأن ات بالنقطة واستبدالها برقم عبر جملة تكرار ولم انجح واستفدت كثيرا رغم فشلي بالنتيجة لانني اعملت عقلي وهنا كان النجاح لانني في مرات اخرى ستكون المهمة اسهل علي بسبب التجربة التي مررت بها اتمنى من الجميع قبل ان يسأل سؤالاً ان يقوم بالتجربة والمحاولة وان لم يحالفه التوفيق (وما التوفيق الا من عند الله) يقوم بعرض مشكلته ومعضلته ليقوم الاخوة في المنتدى مشكورين بتقديم المساعة اتمنى ان يكون هذا نهجنا جميعا لنتعلم وترتقي بالعلم دمتم اخوة غاليين على قلبي ودامت اسرة فيجوال بيسك العرب
RE: قائمة رقمية في RichTextBox - ابو روضة - 28-08-18
(28-08-18, 12:09 AM)elgokr كتب :(27-08-18, 12:01 PM)معاذ_ابراهيم كتب : السلام عليكم وكل عام وانتم بخير
السؤال وكما هو موضح من عنوانه كيف اعمل قائمة رقمية في اداة الريتش تيكست
وليس نقطيه كما الكود التالي
PHP كود :
RichTextBox1.SelectionBullet = True
وعليكم السلام ورحمة الله وبركاته
لا اعلم اذا كان متوفر فى هذا الاداء تغيير علامة * الى ارقام او احرف ام لالكن حبيت ان انشاء كود للفكرة المطلوب واتمنى ان فكرة الكود ان تنال وان تكون المطلوب تماماً
اليك الكود التالى قم بوضعه فى حدث RichTextBox1_KeyDown
كود :
Dim ListLine As New List(Of String)(RichTextBox1.Lines)
For i As Integer = 0 To ListLine.Count - 1
ListLine(i) = ListLine(i).Replace(i + 1 & "- ", "")
ListLine(i) = i + 1 & "- " & ListLine(i)
Next
RichTextBox1.Lines = ListLine.ToArray
RichTextBox1.Focus()
RichTextBox1.SelectionStart = RichTextBox1.TextLength
فبمجرد ما تكتب اى جملة فى السطر ستجد انه يقوم بالترقيم تلقائيطبعاً يمكنك استغلال الكود والتعديل عليه ليعمل حسب الحاجة
تحياتى لكوتمنياتى لك التوفيق
عبقرى والله ماشاء الله عليك اخى الجوكر...
كان فيه سؤال لو تكرمت
هو ازاى اخلى يمين الماوس تعمل وتقوم مثلا بعمل نسخ او لصق داخل الاداه RichTextBox ؟؟
لآن يمين الماوس لا تعمل اطلاقا داخل هذه الاداة
RE: قائمة رقمية في RichTextBox - elgokr - 30-08-18
(28-08-18, 06:59 AM)ابو روضة كتب :عبقرى والله ماشاء الله عليك اخى الجوكر...كان فيه سؤال لو تكرمتهو ازاى اخلى يمين الماوس تعمل وتقوم مثلا بعمل نسخ او لصق داخل الاداه RichTextBox ؟؟لآن يمين الماوس لا تعمل اطلاقا داخل هذه الاداة
هذا من اصلك الطيب اخى ابو روضة
بخصوص الكلك يمين ستحتاج الى عمل اضافة اداء
ContextMenuStrip1
ثم وضع القائمة مثل نسخ ولصق .. الخ وربطها بـ RichTextBox
وبكده تكون لديك القائمة كلما قمت بعملم كلك يمين
قم بالبحث عن شروحات هذه الاداء وستجد لها الكثير وامرها ابسط مما يكون
فكل التحية لك
وتمنياتى لك التوفيق
RE: قائمة رقمية في RichTextBox - ابو روضة - 30-08-18
(30-08-18, 02:04 PM)elgokr كتب :هذا من اصلك الطيب اخى ابو روضة
بخصوص الكلك يمين ستحتاج الى عمل اضافة اداءContextMenuStrip1
ثم وضع القائمة مثل نسخ ولصق .. الخ وربطها بـ RichTextBoxوبكده تكون لديك القائمة كلما قمت بعملم كلك يمين
قم بالبحث عن شروحات هذه الاداء وستجد لها الكثير وامرها ابسط مما يكون
فكل التحية لكوتمنياتى لك التوفيق
حمدلله على سلامتك أخى والله كنت لسة فى سيرتك مع اولادى أمس ودعولك اقسم بالله العظيم
RE: قائمة رقمية في RichTextBox - elgokr - 30-08-18
(30-08-18, 03:05 PM)ابو روضة كتب :حمدلله على سلامتك أخى والله كنت لسة فى سيرتك مع اولادى أمس ودعولك اقسم بالله العظيم
الله يسلمك يارب وتسلملى يارب اخى ابو روضة
ولا يحلمك من اولادك ابداً ودائماً تسعدهم ويكون مصدر ساعدتك دائماً
فكل التحية لك
وتمنياتى لك التوفيق
RE: قائمة رقمية في RichTextBox - ابو روضة - 30-08-18
(30-08-18, 03:48 PM)elgokr كتب :(30-08-18, 03:05 PM)ابو روضة كتب :حمدلله على سلامتك أخى والله كنت لسة فى سيرتك مع اولادى أمس ودعولك اقسم بالله العظيم
الله يسلمك يارب وتسلملى يارب اخى ابو روضة
ولا يحلمك من اولادك ابداً ودائماً تسعدهم ويكون مصدر ساعدتك دائماً
فكل التحية لكوتمنياتى لك التوفيق
شاهدت درس كما وجهتنى وتعلمت منه وقمت بعمله
بفضل الله اخى الجوكر وهذا هو لمن يريده من المبتدئين امثالى