سوال : نحوه قرار دادن اسکین های SKF توی ویژال بیسیک

[Terminat0r]

سلام

می خواستم نحوه ی قرار دادن اسکین های skf رو توی ویژوال بیسیک رو بدونم چطوری میشه به فرم اضاف کرد ؟:قلب:

ممنون میشم با عکس و توضیح بهم یاد بدید .

سرچ کردم نبود چیزی در موردش !!

[mehran901]

خیلی سادست عکس میخوای چیکار !
skin1.applyskin me.hwnd

البته قبلش باید از طریق دستی و راست کلیک کردن روی کنترل یا متد loadskin آدرس اسکین روبدی .... درضمن اگه loadskin دستی انجام دادی نیازی به نگه داری اسکین به طور مجزا نیست

منظور از me.hwnd هندل هر بخشی از برنامت میتونه باشه مثلا فقط کلیدت اسکین میگیره : button1.hwnd

[mehran901]

اینم از همون سرچی که شما زدینش و پیداش نشد !

https://www.google.com/webhp?source=search_app#hl=en&tbo=d&sclient=psy-ab&q=%D9%86%D8%AD%D9%88%D9%87+%D8%A7%D8%B3%D8%AA%D9%8 1%D8%A7%D8%AF%D9%87+%D8%A7%D8%B2+Active+skin+%D8%A F%D8%B1+%D9%88%DB%8C%D8%A8%DB%8C&oq=%D9%86%D8%AD%D9%88%D9%87+%D8%A7%D8%B3%D8%AA%D9% 81%D8%A7%D8%AF%D9%87+%D8%A7%D8%B2+Active+skin+%D8% AF%D8%B1+%D9%88%DB%8C%D8%A8%DB%8C&gs_l=hp.3...3595.6050.1.6345.8.7.0.0.0.0.540.540.5-1.1.0.les%3B..0.0...1c.1.tufBCV4lqPY&pbx=1&bav=on.2,or.r_gc.r_pw.r_qf.&bvm=bv.41642243,d.cGE&fp=120d4f84709c5f1&biw=1024&bih=587

https://www.google.com/webhp?source=search_app#hl=en&tbo=d&sclient=psy-ab&q=%D9%86%D8%AD%D9%88%D9%87+%D8%A7%D8%B3%D8%AA%D9%8 1%D8%A7%D8%AF%D9%87+%D8%A7%D8%B2+Active+skin+%D8%A F%D8%B1+%D9%88%DB%8C%D8%A8%DB%8C&oq=%D9%86%D8%AD%D9%88%D9%87+%D8%A7%D8%B3%D8%AA%D9% 81%D8%A7%D8%AF%D9%87+%D8%A7%D8%B2+Active+skin+%D8% AF%D8%B1+%D9%88%DB%8C%D8%A8%DB%8C&gs_l=hp.3...3595.6050.1.6345.8.7.0.0.0.0.540.540.5-1.1.0.les%3B..0.0...1c.1.tufBCV4lqPY&pbx=1&bav=on.2,or.r_gc.r_pw.r_qf.&bvm=bv.41642243,d.cGE&fp=120d4f84709c5f1&biw=1024&bih=587

[Terminat0r]

ممنون ازتون ولی این ها در سطح حرفه ای گفته شده برای من مبتدی نا مفهوم هست ممنون میشم عکس یا فیلمی تهیه کنید ازش ..!

[ali-a2]

سلام !

به طور خلاصه بخوام بگم ، شما فایل اسکینت رو بزار کنار فایل VB بعد با کدی که بالا گفته شد یا به صورت زیر فراخوانی کن اسکین رو :

Skin1.LoadSkin ("SKIN NAME.skn")
Skin1.ApplySkin hWnd

موفق باشید !

[mehran901]

اسیکین گذاری با Active skin ساده ترین حالت ممکن هست.... کلا حرفه ای نداره !
بعد از نصب active skin از بخش کامپوننت Active skin رو ادد میکنین در ضمن اینکه قبلا اون رو کرک کردین ... ( اغلب به همراه کرک ارائه میشه ) ، بعد از گذاشتن کنترل skin روی فرم روش راست کلیک کنید و اون اسکین رو لود کنین ، حالا تو event فرم لود ، اون کدی که گفتم رو بنویسین

موفق باشین

[vbhamed]

سلام

البته فايلهاي skf مربوط به كامپوننت SkinCrafter هست نه اكتيو اسكين

[mehran901]

آها راست میگین active Skin پسوندش skn بود


Option Explicit
Dim b$
Private skin As New SKINCRAFTERLib.SCSkin2



Private Sub Form_Initialize()
skin.InitLicenKeys "SKINCRAFTER", "SKINCRAFTER.COM", "support@skincrafter.com", "DEMOSKINCRAFTERLICENCE"
skin.DefineLanguage 2
skin.InitDecoration 1
End Sub


Private Sub Form_Load()
skin.LoadSkinFromFile "c:\a.skf"
skin.ApplySkin
End Sub