رنگ فونت را به یکی از 12 شکاف رنگ theme آفیس با یک تنظیم tint اختیاری تنظیم میکند. همراه theme با
Font.Color — از آن استفاده کنید وقتی برنامه میخواهد از palette theme workbook پیروی کند به جای اینکه یک RGB واقعی را ثابت کند. از v2.61.0 موجود است (موج D فاز 4 backlog نمودار)
نحو
procedure SetThemeColor(ThemeIdx: Word; Tint: Double);
پارامترها
ThemeIdx — شکاف theme مبتنی بر صفر (0=lt1, 1=dk1, 2=lt2, 3=dk2, 4..9=accent1..6, 10=hlink, 11=foHlink)
Tint — تنظیم روشنتر/تیرهتر به سبک spec در محدوده -1.0 .. +1.0 در XFExt FullColorExt به عنوان یک عدد صحیح علامتدار Q15 در nTintShade رمزگذاری میشود
ملاحظات
setter رفتاری یکسان با
Interior.SetThemeColor دارد، اما شکاف rsFont XFExt $087D extType ($000D) را مینویسد. ورودی Font XF همچنان یک icv اندیسشده با بهترین تطابق دریافت میکند تا اکسل 97-2003 یک تقریب ببیند؛ اکسل 2007+ theme idx دقیق + tint را از شکاف XFExt FullColorExt بازیابی میکند
خواندن مجدد از طریق
Font.Color RGB برطرفشده از طریق palette theme BIFF workbook را برمیگرداند، بنابراین برنامه همیشه یک LongWord مشخص میبیند صرفنظر از اینکه setter اصلی RGB بود یا مبتنی بر theme
مثال
یک ستون حسابرسی را با accent3 + tint تگ میکند تا رنگ فونت theme workbook را دنبال کند
Workbook.Sheets[1].Range['D2', 'D50'].Font.SetThemeColor(6, - 0.25);
Workbook.SaveAs('AuditColumn.xls', xlExcel97);
همچنین ببینید