FiveTech Support Forums

Please See this picture




I made
Function BuildExplorerBar( oPanelExplorer)
local nOption := 5
local aOre := { "5", "10", "15", "20", "30", "60"}
local oPanel


oApp():oExBar := TExplorerBar():New( 0, 0,oApp():oPanelExplorer:nwidth-15,;
oApp():oPanelExplorer:nbottom, oApp():oPanelExplorer )

oPanel := oApp():AddPanel( "Calendario", ".\bitmaps\CALEX.bmp", 480 )

@ 30, 5 CALENDAR oApp():oDtPick VAR oApp():dDateStart OF oPanel PIXEL SIZE 220, 450
oApp():bChange := { | o | ChangeDate( o ) }


1. the calendar is showed bad
2. when I click on arrow it start from feb to May why ?
3. when I change the size of explorerbar clicking on splitter the calendar is the same ( I wish on all panel )

any solution please ?

Silvio,

You could show how you got the colorful effect of the TAGS?

Silvio,

Here, I have a good behavior!

I have a class modify from me
but if you download that I found on list of fivetech is the same of fjhg
only I add this function
FUNCTION ColorData( nType )
local aGrad



DO CASE
case VAL(nType) = 1
aGrad = { { 1, RGB(0x9a,0xcd,0x32), RGB(0x9a,0xcd,0x32) } }

case VAL(nType) = 2
aGrad = { { 1, RGB(0x00,0x80,0xff) , RGB(0x00,0x80,0xff) } }

case VAL(nType) = 3
aGrad = { { 1, RGB(0xff,0xff,0x80), RGB(0xff,0xff,0x80) } }

case VAL(nType) = 4
aGrad = { { 1, RGB(0xff,0x00,0x00), RGB(0xff,0x00,0x00) } }

case VAL(nType) = 5
aGrad = { { 1, RGB(0xc0,0xc0,0xc0), RGB(0xc0,0xc0,0xc0) } }

ENDCASE

return aGrad




and then I call it from loaddates function

oApp():LoadDates( ( cAlias )->START,;
( cAlias )->END, ;
( cAlias )->DSTART, ;
( cAlias )->DSTART, ;
( cAlias )->TEXT, ;
( cAlias )->SUBJECT,;
( cAlias )->IDX, nColorText,;
ColorData(( cAlias )->status ),;
val(( cAlias )->status))

SGS wrote:Silvio,

Here, I have a good behavior!

I wish show 3 or 4 mounth

Many thanks Silvio.

Sorry I can not help you!

Silvio,

I can see the method: LoadDates()

Mine is not ready to receive the color parameters.