17-12-12, 04:46 AM
بسم الله الرحمن الرحيم
الشرح
اولا : قم بتحميل الادوات SkinCrafter
تحميل
الان بعد ان حملت الادوات
قم بفك الضغط وانسخ الملفين الموجودين الى C:\WINDOWS\system32
ثم قم بتسجيل الادوات عن طريقة
ثم قم بكتابة الامر التالي في run
مثل الصوره التاليه
ثم ستظهر لنا الرسالة التالية في الصور
ثم اعود الى run واكتب الكود التالي
مثل الصوره التالية
ستظهر لك ايضا رساله انه تم بنجاح
بعد ان تم تسجيل الادوات بنجاح قم بفتح vb6 واضيف الاداه مثل الصوره التاليه
سيظهر لك في القائمة التي موجوده الشكل التالي
الان ياتي دور الاكواد
نضع في General الكود التالي
ثم نضع في Form_Initialize
ثم نضع في Form_Load
واقصد Amazonite.skf هو اسم الشكل ويمكن تغييره من شكل لاخر وسيتم اضافة اشكال عده في المشاركات التالية
والمثال في المرفقات
ادعوا لي ولوالدي
الشرح
اولا : قم بتحميل الادوات SkinCrafter
تحميل
الان بعد ان حملت الادوات
قم بفك الضغط وانسخ الملفين الموجودين الى C:\WINDOWS\system32
ثم قم بتسجيل الادوات عن طريقة
ثم قم بكتابة الامر التالي في run
PHP كود :
Regsvr32 SCLabel.ocx
مثل الصوره التاليه
ثم ستظهر لنا الرسالة التالية في الصور
ثم اعود الى run واكتب الكود التالي
PHP كود :
Regsvr32 SkinCrafter.dll
مثل الصوره التالية
ستظهر لك ايضا رساله انه تم بنجاح
بعد ان تم تسجيل الادوات بنجاح قم بفتح vb6 واضيف الاداه مثل الصوره التاليه
سيظهر لك في القائمة التي موجوده الشكل التالي
الان ياتي دور الاكواد
نضع في General الكود التالي
PHP كود :
Public SkinOb As New SKINCRAFTERLib.SCSkin
ثم نضع في Form_Initialize
PHP كود :
Private Sub Form_Initialize()
SkinOb.InitLicenKeys "0", "SKINCRAFTER", "SKINCRAFTER.COM", "support@skincrafter.com", "DEMOSKINCRAFTERLICENCE"
SkinOb.DefineLanguage 2
SkinOb.InitDecoration 1
End Sub
ثم نضع في Form_Load
PHP كود :
Private Sub Form_Load()
SkinOb.LoadSkinFromFile App.Path & "\Amazonite.skf"
SkinOb.ApplySkin
End Sub
واقصد Amazonite.skf هو اسم الشكل ويمكن تغييره من شكل لاخر وسيتم اضافة اشكال عده في المشاركات التالية
والمثال في المرفقات
ادعوا لي ولوالدي