+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم البرمجة بتقنية WPF (http://vb4arb.com/vb/forumdisplay.php?fid=86)
+--- الموضوع : [سؤال] كيف أدرج سمايلز بين كلمتين في الريتش بوكس ؟ (/showthread.php?tid=14295)
كيف أدرج سمايلز بين كلمتين في الريتش بوكس ؟ - السندبااد - 01-01-16
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
كيف أدرج سمايلز بين كلمتين في الريتش بوكس ؟
لقد حاولت محاولات عدة ولكن عند الإدراج السمايلز إما كانت تظهر لي في السطر التالي أو في نهاية الريتش بوكس
[attachment=8935]
هذه النتيجة التي أريدها :
[attachment=8934]
الملف مع الكود بالمرفقات أرجو التكرم بالمساعدة والتعديل على الكود
[attachment=8935]
هذه النتيجة التي أريدها :
[attachment=8934]
الملف مع الكود بالمرفقات أرجو التكرم بالمساعدة والتعديل على الكود
RE: كيف أدرج سمايلز بين كلمتين في الريتس بوكس ؟ - HASAN6.0 - 01-01-16
انظر هذا المثال .. وجرب كتابة
مثلا للحصول على :
RE: كيف أدرج سمايلز بين كلمتين في الريتس بوكس ؟ - السندبااد - 02-01-16
(01-01-16, 10:58 PM)HASAN6.0 كتب : انظر هذا المثال .. وجرب كتابة
السلام عليكم ورحمة الله وبركاته
ألف شكر لك أستاذي العزيز حسن
لا أخفيك ففي اليومين الماضين لم أترك صفحة في النت تتعلق بالموضوع إلا وبحثت فيها
فأنا لا أطرح السؤال إلا بعد أن أكون قد أشبعته بحثاً ووصلت لنقطة شبه مسدودة
وهذا المثال الذي أحلتني إليه اطلعت عليه ولم أجد فيه بغيتي
سأخبرك لماذا ؟
سأخبرك لماذا ؟
لأن صاحب المثال قام ببرمجة أداة جديدة شبيهة بالريتش بوكس من أجل تنفيذ الفكرة
وأنا غير مضطر لاستخدام أداة جديدة من مصدر غير موثوق قد تحل لي مشكلة ولكنها في الوقت نفسه قد تحتوي على مشاكل أخرى
لذلك المشكلة بالنسبة لي ما زالت قائمة وأنتظر مساعدة الإخوة
RE: كيف أدرج سمايلز بين كلمتين في الريتش بوكس ؟ - السندبااد - 03-01-16
السلام عليكم ورحمة الله وبركاته
تم الإجابة على سؤالي من قبل مجتمع مايكروسوفت :
شكراً لكم
RE: كيف أدرج سمايلز بين كلمتين في الريتش بوكس ؟ - الشاكي لله - 03-01-16
سبقتي في الحل اخوي السندباد
هذا الحل الذي قمت به :-
PHP كود :
Private Sub ImgEnter_MouseDown(sender As Object, e As MouseButtonEventArgs) Handles ImgEnter.MouseDown
Dim image As New Image()
image.Source = ImgEnter.Source
image.Width = 50
image.Height = 50
Dim pos = RichTxtPost.CaretPosition.GetInsertionPosition(LogicalDirection.Forward)
Dim MyUI As New InlineUIContainer(image, pos)
End Sub
RE: كيف أدرج سمايلز بين كلمتين في الريتش بوكس ؟ - السندبااد - 03-01-16
بارك الله فيك أستاذي الحبيب الشاكي لله
أنت دوماً سباق للخير وبالفعل الكود الذي أضفته حضرتك يقوم بالمهمة
لك مني كل الشكر والتقدير
شوقتنا لدروسك