Codejock Shortcutbar

[unixkd]

Hi Jimmy

Please send me the complete sample program for the attached dialog, preferably in Express++ syntax.

Thanks.

[Auge_Ohr]

hi,

Please send me the complete sample program for the attached dialog, preferably in Express++ syntax.

sorry i´m not a Express++ User.

Code is from my Framework Class for Codejock using ImageManager, Ribbonbar, Shortcutbar, Calender, Datepicker, Printpreview and DSOframer with some Ownerdraw Classes.

i did have extract those lines to create Codejock Shortcut but i did not have a Sample ready yet in my HX_Class ( pure Xbase++ and some API using ot4xb)

missing Function

Code: Select all

FUNCTION ICON2DIM()
LOCAL aIcon := {;
               {"100_FILE_NEW.ico"            ,ID_FILE_NEW          },;
               {"101_FILE_OPEN.ico"           ,ID_FILE_OPEN         },;
               {"102_FILE_SAVE.ico"           ,ID_FILE_SAVE         },;
               {"103_FILE_DEL.ico"            ,ID_FILE_DEL          },;
...
               {"SAVE_AS.ico"                 ,ID_FILE_SAVE_AS      } }
RETURN aIcon

Imagelist is the Windows Way to hold Icons for "Common Controls" like Toolbar, Statusbar, Treeview, Listview or Buttons.
have a look into c:\ALASKA\XPPW32\Source\SYS\activex.prg and c:\ALASKA\XPPW32\Source\SYS\axctrls.prg

[unixkd]

Hi Jimmy

In codejock taskpanel, Iam trying to make selected item highlighted but no effect as follows:

oTaskPanel:ColorSet:HighlightSelected := CJ_Color(GRA_CLR_RED)

Any idea ?

Thanks

Joe

[Auge_Ohr]

In codejock taskpanel, Iam trying to make selected item highlighted but no effect as follows:

oTaskPanel:ColorSet:HighlightSelected := CJ_Color(GRA_CLR_RED)

not sure if you can call Colorset this Way ...

divide into Parts like this

Code: Select all

*  create Codejock TaskPanel Control

   ::oPanel := XbpActiveXControl():new(,, {0,0}, {0,0} )
   ::oPanel:CLSID := "Codejock.TaskPanel ..."
   ::oPanel:Create()

   ::oTaskPanelColorSet := ::oPanel:ColorSet()
   ::oTaskPanelColorSet:HighlightSelected := AutomationTranslateColor( xValue,.f.)

p.s. you need XP Manifest.