Natter

Natter

Postby Natter » Sun Mar 09, 2008 11:14 am

Hi, all
I have Codejock.SkinFrameWork.11.2.0

Try this code

Code: Select all  Expand view  RUN
include "FiveWin.ch"

function Main()
   local oWnd, oActiveX
   DEFINE WINDOW oWnd TITLE "FiveWin ActiveX Support with Skin"
   ACTIVATE WINDOW oWnd ON INIT CodeJockSkin_InitDlg(oWnd)
return nil

FUNCTION CodeJockSkin_InitDlg( oDlg )
LOCAL oActiveX, cStylesPath := "d:\Styles\"
   oActiveX := TActiveX():New( oDlg, "Codejock.SkinFrameWork.11.2.0" )
   oActiveX:Do( "LoadSkin", cStylesPath+"aa.msstyles", "" ) 
   oActiveX:Do( "ApplyWindow", oDlg:hWnd )
return nil


In resul I get window with mark S/F

Could you tell me how to remove the S/F mark ?
Natter
 
Posts: 1221
Joined: Mon May 14, 2007 9:49 am

Postby richard-service » Mon Mar 10, 2008 1:41 am

Hi Natter,

I have a solution for it.
But FWH's Menu system incompatible with Codejock Skin OCX

Regards,

Richard
User avatar
richard-service
 
Posts: 803
Joined: Tue Oct 16, 2007 8:57 am
Location: New Taipei City, Taiwan

Postby Natter » Mon Mar 10, 2008 9:07 am

Thank, Richard !

I read post http://fivetechsoft.com/forums/viewtopic.php?t=5917&highlight=skin and think that all right :?
Natter
 
Posts: 1221
Joined: Mon May 14, 2007 9:49 am

Postby richard-service » Mon Mar 10, 2008 2:27 pm

Natter wrote:Thank, Richard !

I read post http://fivetechsoft.com/forums/viewtopic.php?t=5917&highlight=skin and think that all right :?


I hope it will help you.

Regards,

Richard
User avatar
richard-service
 
Posts: 803
Joined: Tue Oct 16, 2007 8:57 am
Location: New Taipei City, Taiwan


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 65 guests