Code: Alles auswählen
// das ist der Parent von nachfolgenden XbParts
::oScroll:setPos( { 0, ::nSbarheight } )
::oScroll:clientSize := aCalSize
IF ::cView = "MONTH"
ELSEIF ::cView = "WEEK5" .OR. ::cView = "WEEK7"
ELSEIF ::cView = "DAYS"
IF ::cTimeScale = "24"
::oKal:setPosAndSize( { ::n1StCol, 0 }, { aCalSize[ 1 ] - ::n1StCol, ( aCalSize[ 2 ] * 1 ) } )
ELSE
::oKal:setPosAndSize( { ::n1StCol, 0 }, { aCalSize[ 1 ] - ::n1StCol, ( aCalSize[ 2 ] * 2 ) } )
ENDIF
::oKal:setRowHeight( NurInt( aCalSize[ 2 ] / ::oKal:maxRow , 0 ))
die Werte errechne ich so
Code: Alles auswählen
FUNCTION NurInt(nVal,nDec)
LOCAL nRet
DEFAULT nDec TO 0
nRet := INT( ROUND(nVal + 0.05,nDec ))
ONDUMMY(time(),nVal,ProcName(1),Procline(1),ProcName(2),Procline(2) )
RETURN nRet
er geht also von 21 auf 23 aber es passt nicht ?Logfile Start 20150216 23:32:19
23:32:19 21.02 OWCAL:SHOWCALENDER 7367 MAIN 379
23:32:19 21.02 OWCAL:SHOWCALENDER 7403 MAIN 379
ToolTip atStart() DAYS 23:32:19
23:32:19 21.02 OWCAL:DLGRESIZE 4123 (B)OWCAL:INIT 365
23:32:19 21.02 OWCAL:DLGRESIZE 4133 (B)OWCAL:INIT 365
23:32:23 23.63 OWCAL:DLGRESIZE 4123 (B)OWCAL:INIT 365
23:32:23 23.63 OWCAL:DLGRESIZE 4133 (B)OWCAL:INIT 365
23:32:25 21.02 OWCAL:DLGRESIZE 4123 (B)OWCAL:INIT 365
23:32:25 21.02 OWCAL:DLGRESIZE 4133 (B)OWCAL:INIT 365
Logfile Stop 20150216 23:32:31