تبليغاتX
برنامه نویسی

برنامه نویسی
آموزش گام به گام برنامه نویسی توسط مهرداد راهی


امکانات

آموزش استفاده از SkinCrafter

سلام هموطن

بنا به درخواست دوستان و عزيزان هموطنم اين مقاله رو آماده ميكنم


با همكاري دوست عزيزم زهره

روش هاي افزودن كنترل SkinCrafter به برنامه هاي شما بستگي به زبان برنامه نويسي شما دارد كه در زير به چند مورد اشاره ميكنم :

Visual C++ 6.0

به قسمت Class Wizard (Ctrl + W) و در پنجره"Add Class"/"From a type library"  گزينه skincrafter.dll را انتخاب كنيد و سپس گزينه Ok را فشار دهيد. اينك كلاس ISCSkin2  براي شما ساخته شد.
 

Visual C++ 7.0

Project -> "Add Class" -> "MFC class from TypeLib" -> "Skin Crafter Type Library"

Visual Basic

Project ->References -> Check "Skin Crafter Type Library"

.NET

Add SkinCrafter.dll into COM references

Add reference -> COM -> "Skin Crafter Type Library"


Delphi

Project -> Import from Type Library -> Choose "Skin Crafter Type Library"



نمونه كدهايي براي مثال و نحوه كاربرد در برنامه


VB

   Private SkinOb As New SKINCRAFTERLib.SCSkin2

   ' The code in CODE SECTION has to be called in  Form_Initialize() function

   ' --------- Begin of CODE SECTION ---------- '
   SkinOb.InitLicenKeys "SKINCRAFTER","SKINCRAFTER.COM","support@skincrafter.com","DEMOSKINCRAFTERLICENCE"
   SkinOb.DefineLanguage 2
   SkinOb.InitDecoration 1
   ' --------- End of CODE SECTION ---------- '

   SkinOb.LoadSkinFromFile "D:\\Skin.skf"
   SkinOb.ApplySkin

VC++

   ISCSkin2 *m_pSkin = new ISCSkin2;

   // The code in CODE SECTION has to be called in InitInstance() function,
   // before creation of a main window
   
   /* ------------ Begin of CODE SECTION ------------- */
   CoInitialize(NULL);
   m_pSkin->CreateDispatch("SkinCrafter.SCSkin2");
   m_pSkin->InitLicenKeys("SKINCRAFTER","SKINCRAFTER.COM","support@skincrafter.com","DEMOSKINCRAFTERLICENCE");
   m_pSkin->DefineLanguage(0);
   m_pSkin->InitDecoration(1);
   /* ------------ End of CODE SECTION ------------- */

   m_pSkin->LoadSkinFromFile("D:\\Skin.skf");
   m_pSkin->ApplySkin();

Delphi
   var
    CSkin:CoSCSkin2;
    ISkin:ISCSkin2;
   begin
     Application.Initialize;
     ISkin := CSkin.Create;
     ISkin.InitLicenKeys('SKINCRAFTER','SKINCRAFTER.COM','support@skincrafter.com','DEMOSKINCRAFTERLICENCE');
      ISkin.DefineLanguage(3);
      ISkin.InitDecoration(1);
     ISkin.LoadSkinFromFile('D:\\Skin.skf');
     ISkin.ApplySkin();
   end

CBuilder
   Application->Initialize();
   
    IID IID_ISCSkin2 = {0x7235966D,0x13A0,0x4C2B,{0xAA,0x81,0xE8,0x6C,0xE0,0x61,0x88,0xB3}};
   CLSID CLSID_SCSkin2 = {0x4A1AD3DC,0xC299,0x4481,{0x9E,0x79,0x8A,0x65,0x10,0x78,0x2F,0x03}};

   CoInitialize(NULL);
   ISCSkin2* pUnk;
   
   pUnk = NULL;
   CoCreateInstance(CLSID_SCSkin2,NULL,CLSCTX_SERVER,IID_ISCSkin2,(void**)&pUnk);
   
   TCOMISCSkin2 SkinOb(pUnk);
   SkinOb.InitLicenKeys(L"SKINCRAFTER",L"SKINCRAFTER.COM",L"support@skincrafter.com",L"DEMOSKINCRAFTERLICENCE");
   SkinOb.DefineLanguage(3);
   SkinOb.InitDecoration(1);
   SkinOb.LoadSkinFromFile(L"Stylish.skf");
   SkinOb.ApplySkin();
   
   Application->CreateForm(__classid(TForm1), &Form1);
   Application->Run();
   SkinOb.DeInitDecoration()

Power Builder
   OLEObject SkinOb
   SkinOb = CREATE oleobject
   SkinOb.ConnectToNewObject("SkinCrafter.SCSkin2")
   SkinOb.InitLicenKeys("SKINCRAFTER", "SKINCRAFTER.COM", "support@skincrafter.com", "DEMOSKINCRAFTERLICENCE")
   SkinOb.InitDecoration(1)
   SkinOb.LoadSkinFromFile("C:\Program Files\SkinCrafter\Skins\Stylish.skf")
   SkinOb.ApplySkin()

اطمينان حاصل كنيد كه dll هاي زير كه برنامه شما از توابع انها استفاده كرده در سيستم شما موجود باشد :

GDIPLUS.DLL
MFC42.DLL
MSVCRT.DLL
MSVCP60.dll

ورژن هاي بالاي دو اين برنامه نياز دارند كه ريجستر شوند و رايگان نيستند.
نویسنده: مهرداد راهی ׀ تاریخ: جمعه هشتم شهریور 1387 ׀ موضوع: ׀

درباره وبلاگ

سلام...خوش اومدید
آموزش برنامه نویسی با وی بی 6
من مهرداد هستم 20 ساله
-------------------------------
با تشکر دوست شما
My ID : Artam_Shan


لینکدونی

جستجوی مطالب


طراحي و پياده سازي توسط مهرداد راهی