كيف نغير الوان واحجام الخط في memo's text
#1
[صورة: picture0001h.png]

كيف يمكن تغير الالوان والاحجام في text مثلا في memo؟

هذه الصورة من word micro soft
هل هناك كمبوننت تسهل العملية
ولكم كل الشكر
الرد
#2
لم أفهم سؤالك
شاهد المرفق وعسا يفيدك


الملفات المرفقة
.rar   project2.rar (الحجم : 1.6 ك ب / التحميلات : 23)
.rar   project1.rar (الحجم : 1.02 ك ب / التحميلات : 14)
الرد
#3
شكرا على المحاولة ولكن ليس هذا ما ابحث عنة
الصورة واضحة هل يمكنك ان تصنع مثلها بالدلفي؟
لا ينبغي ان يشمل التغير كل text ولكن البعض فقط وليس الكل
هذا العبارة
كود :
This Delphi 2010 Development Essentials manual covers the fundamentals and the new
features in Delphi 2010, 2009 and 2007 compared to Delphi 7.
تحويلها مثل الصورة
[صورة: picture0001h.png]
الرد
#4

استخدم TRichEdit
بالتوفيق
الرد
#5
ممكن توضح بمثال اذا تكرمت
الرد
#6
كود :
procedure AddColoredLine(ARichEdit: TRichEdit; AText: string; AColor: TColor);
begin
  with ARichEdit do
  begin

    SelStart := Pos(AText, Text) - 1;
    SelLength := Length(AText);
    SelAttributes.Color := AColor;
    SelAttributes.Size := 16;
    SelAttributes.Style := [fsBold];
    SelAttributes.Name := 'MS Sans Serif';
    SelText := AText;

    //    Lines.Add(AText);
  end;

end;

كود :
procedure TForm1.Btn1Click(Sender: TObject);
begin
AddColoredLine(RichEdit1, 'delphi, clGreen);
AddColoredLine(RichEdit1, 'Hallo', clred);
end;
الرد
#7
اخي B.M.AbdelAziZ انت حقا خبير ومتواضع وصاحب معرفة ليس لها حدود
انا اهنيك واشكرك جزيل الشكر واتمنى ان تضل معنا في هذا المنتدى الرائع.
الرد
#8
السلام عليكم ورحمة الله وبركاته ،
ممكن تستعين بالمثال المرفق مع الدلفي ،
تجده في المسار :
C:\Program Files\Borland\Delphi7\Demos\RichEdit

وفقك الله لكل خير.
اللهم اجعلني من أهل القرآن ، الذين هم أهلك و خاصتك.
تذكر بأن الوقت الذي تلهو فيه ، غيرك يبني مجده فيه.
الرد


التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم