ثامر أبو بلقيس
29-10-2014, 03:18 PM
السلام عليكم ورحمة الله وبركاته
استكمالا للمجهودات التي تبذل من طرف الزملاء
أردنا اليوم أن نحذف سطر أو أسطر وخاصة اذ كانت مكتوبة باللغة العربية في RichText
RichText.SetSelection("RichText1", 1, -1);
c = RichText.GetSelectionFormat("RichText1", true);
undo ={FaceName=c.FaceName,Height=c.Height};
RichText.SetSelection("RichText1", 1, -1);
belkiss={FaceName="Wingdings 3", Height=2};
RichText.SetSelectionFormat("RichText1", belkiss, true)
strText = RichText.GetLine("RichText1", 1);
------------------------------------------------------------
RichText.SetSelectionFormat("RichText1", undo, true)
find = RichText.FindText("RichText1", strText, 1, -1, true, true)
RichText.SetSelection("RichText1", find.Start, find.End)
RichText.Delete("RichText1")
RichText.Delete("RichText1")
في هذا المثال وبالضبط في السطر السابع من الكود حددنا حذف السطر الأول من RichText
السلام عليكم :abc_138:
استكمالا للمجهودات التي تبذل من طرف الزملاء
أردنا اليوم أن نحذف سطر أو أسطر وخاصة اذ كانت مكتوبة باللغة العربية في RichText
RichText.SetSelection("RichText1", 1, -1);
c = RichText.GetSelectionFormat("RichText1", true);
undo ={FaceName=c.FaceName,Height=c.Height};
RichText.SetSelection("RichText1", 1, -1);
belkiss={FaceName="Wingdings 3", Height=2};
RichText.SetSelectionFormat("RichText1", belkiss, true)
strText = RichText.GetLine("RichText1", 1);
------------------------------------------------------------
RichText.SetSelectionFormat("RichText1", undo, true)
find = RichText.FindText("RichText1", strText, 1, -1, true, true)
RichText.SetSelection("RichText1", find.Start, find.End)
RichText.Delete("RichText1")
RichText.Delete("RichText1")
في هذا المثال وبالضبط في السطر السابع من الكود حددنا حذف السطر الأول من RichText
السلام عليكم :abc_138: