iconos orden cabecera browse
Posted: Fri Jul 09, 2010 8:59 am
aun SIN PROBAR :
Code: Select all
HB_FUNC( BRWSETINDICATORDESCENT ) // obrw:hWnd , nCol
{
NSTableView * browse = ( NSTableView * ) hb_parnl( 1 );
[ browse setIndicatorImage : [NSImage imageNamed:@"NSDescendingSortIndicator" ]
inTableColumn: [ [ browse tableColumns ] objectAtIndex : hb_parnl( 2 ) - 1 ] ] ;
}
HB_FUNC( BRWSETINDICATORASCEND ) // obrw:hWnd , nCol
{
NSTableView * browse = ( NSTableView * ) hb_parnl( 1 );
[ browse setIndicatorImage : [NSImage imageNamed:@"NSAscendingSortIndicator" ]
inTableColumn: [ [ browse tableColumns ] objectAtIndex : hb_parnl( 2 ) - 1 ] ] ;
}
HB_FUNC(COLORCREATE)
{
NSColor * color = [ [ NSColor alloc ] colorWithCalibratedRed: hb_parnl( 1 ) green: hb_parnl( 2 ) blue: hb_parnl( 3 ) alpha: hb_parnl( 4 ) ] ;
hb_retnl( ( LONG ) color );
}
HB_FUNC(GRADIENTCREATE)
{
NSGradient * gradient = [ [ NSGradient alloc ] initWithStartingColor: (NSColor *)hb_parnl( 1 )
endingColor: (NSColor *)hb_parnl( 2 ) ];
hb_retnl( ( LONG ) gradient );
}
HB_FUNC( BRWSETBACKGRAUNDCOLOR )
{
NSTableView * browse = ( NSTableView * ) hb_parnl( 1 );
[ browse setBackgroundColor:(NSColor *)hb_parnl( 2 ) ];
}