+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : Main Menu (/showthread.php?tid=12917)
Main Menu - سليم 2024 - 11-04-2025
السلام عليكم
هل يوجد طريقة لتلوين الخط او الكتابه في (Main Menu) المين منيو ام هو اللون الاسود المعتمد فقط في الدلفي 7 .
RE: Main Menu - brave - 29-04-2025
أولا مكون TMainMenu في فيرموارك ال Vcl هو مجرد تغليف لمكون نظام التشغيل Menu
ثانيا نوع الخط أو الفونت تأتي تلقائيا من نوع الخط الخاص بالأوبجكت Screen و هي لا تعود للدلفي سبعة
ثالثا لتغيير نوع الخط و ال Size و حتى الستايل (bold or italic etc) لجميع ال Items المندرجة بقوائم المكون MainMenu يمكن تغيير فقط الفونت الخاص بالأوبجكت Screen كالأتي:
كود :
procedure UpdateScreenMenuFont(
const aScreenMenuFontName: string;
aScreenMenuFontSize: Integer);
var
LScaledFontSize: Integer;
begin
LScaledFontSize := MulDiv(aScreenMenuFontSize, Screen.PixelsPerInch, 96);
Screen.MenuFont.Name := aScreenMenuFontName;
Screen.MenuFont.Size := LScaledFontSize;
end;--
و تستعمل الميثود قبل خلق المكون TMainMenu داخل كود البرنامج Dpr
--
الحل الثاني هو استعمال خاصية OwnerDraw للتحكم الكامل في جميع القوائم و من ضمنها الفونت و اللون ووو الخ