farzadkamali
جمعه 13 بهمن 1391, 11:32 صبح
سلام
با استفاده از فونت دیالوگ میشه فونت،سایز و رنگ متن ممو رو تغییر داد. حالا سوال اینه که چه جوری می شه فونت،سایز و رنگ متن انتخاب شده از ممو رو تغییر داد؟
دستور زیر تغییرات رو به کل متن اعمال میکنه ولی من می خوام تغییرات فقط به قسمت انتخاب شده از متن اعمال بشه.
if fontdialog1.Execute then
begin
memo1.Font:=fontdialog1.Font;
end;
یا
if fontdialog1.Execute then
begin
memo1.Font.Color := fontdialog1.Font.Color;
memo1.Font.Name := fontdialog1.Font.Name;
memo1.Font.Style := fontdialog1.Font.Style;
memo1.Font.Size := fontdialog1.Font.Size;
end;
کدهای فوق فرقی نمیکنه و کل متن رو تغییر میده. ممنون میشم راهنماییم کنین
با استفاده از فونت دیالوگ میشه فونت،سایز و رنگ متن ممو رو تغییر داد. حالا سوال اینه که چه جوری می شه فونت،سایز و رنگ متن انتخاب شده از ممو رو تغییر داد؟
دستور زیر تغییرات رو به کل متن اعمال میکنه ولی من می خوام تغییرات فقط به قسمت انتخاب شده از متن اعمال بشه.
if fontdialog1.Execute then
begin
memo1.Font:=fontdialog1.Font;
end;
یا
if fontdialog1.Execute then
begin
memo1.Font.Color := fontdialog1.Font.Color;
memo1.Font.Name := fontdialog1.Font.Name;
memo1.Font.Style := fontdialog1.Font.Style;
memo1.Font.Size := fontdialog1.Font.Size;
end;
کدهای فوق فرقی نمیکنه و کل متن رو تغییر میده. ممنون میشم راهنماییم کنین