CommonDialog1.ShowFont

[Hadi_VB]

CommonDialog1.ShowFont
كد بالا وقتي در ويندوز 98 اجرا مي كنم به راحتي ديالوگ فونت ويندوز رو باز ميكنه
اما در ويندوز ايكس پي ديالوگ مربوطه باز نميشه و يك پيغام مربوط به ويندوز (نه مربوط به برنامه
من) آشكار ميشه دليلش چيه ضمنا در ويندوز 98اس اي هم همين مشكل وجود داشت
بايد چكار كنم؟

[Mamad2003]

دوست من سلام

اينطور ديالوگ رو باز كن :

کد:

CommonDialog1.Flags = 1
CommonDialog1.ShowFont

مشكل حل ميشه ! :roll:

[Darg]

مي توني از عبارت زير استفاده كني تا تمام امكانات در اختيارت باشه

کد:

ComDlg1.flags = cdlCFBoth Or cdlCFEffects