DATA aHeads
METHOD HandleEvent( nMsg, hSender, uParam1, uParam2 ) CLASS TTableView
.....
do case
case nMsg == WM_BRWHEAD
if Empty(::aHeads)
Return nil
else
Return ::aHeads[uParam1 + 1 ]
endif
.....@implementation DataSource
- (NSString *)tableView:(UITableView *)tableView titleForHeaderInSection:(NSInteger)section
{
NSString * text;
hb_vmPushSymbol( symFPH );
hb_vmPushNil();
hb_vmPushLong( ( LONG ) tableView );
hb_vmPushLong( WM_BRWHEAD );
hb_vmPushLong( 0 );
hb_vmPushLong( section );
hb_vmDo( 4 );
text = [ [ [ NSString alloc ] initWithCString: ISCHAR( -1 ) ? hb_parc( -1 ) : "" ] autorelease ];
return text ;
}added timer events. New samples/timer.prg
Affected files expand all collapse all
Modify /trunk/include/fmsgs.h diff
Modify /trunk/include/windows.h diff
Modify /trunk/makefile diff
Modify /trunk/samples/buildmac.sh diff
Add /trunk/samples/timer.prg diff
Modify /trunk/source/sdkapi/timers.m diff
Modify /trunk/source/sdkapi/windows.m diff
Antonio Linares wrote:added timer events. New samples/timer.prg
Affected files expand all collapse all
Modify /trunk/include/fmsgs.h diff
Modify /trunk/include/windows.h diff
Modify /trunk/makefile diff
Modify /trunk/samples/buildmac.sh diff
Add /trunk/samples/timer.prg diff
Modify /trunk/source/sdkapi/timers.m diff
Modify /trunk/source/sdkapi/windows.m diff
mastintin wrote:Comenzado a implemetar los heads del tableview . La idea es tener una DATA aHeads , array con los encabezados de seccion . he escrito este c贸digo , pero no puedo probarlo ya que estoy fuera .
Si alguien quiere mirar si esta bien y compila ....
En tblview.prg
DATA 聽 aHeads METHOD HandleEvent( nMsg, hSender, uParam1, uParam2 ) CLASS TTableView 聽 聽..... 聽 聽do case 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽case nMsg == WM_BRWHEAD 聽 聽 聽 聽 聽 聽 聽if Empty(::aHeads) 聽 聽 聽 聽 聽 聽 聽 聽 Return nil 聽 聽 聽 聽 聽 聽 聽else 聽 聽 聽 聽 聽 聽 聽 聽 Return ::aHeads[uParam1 + 1 ] 聽 聽 聽 聽 聽 聽 聽endif 聽 聽 聽.....
en tableview.m
@implementation DataSource - (NSString *)tableView:(UITableView *)tableView titleForHeaderInSection:(NSInteger)section { NSString * text; 聽 hb_vmPushSymbol( symFPH ); 聽 聽hb_vmPushNil(); 聽 聽hb_vmPushLong( ( LONG ) tableView ); 聽 聽hb_vmPushLong( WM_BRWHEAD ); 聽 聽hb_vmPushLong( 0 ); 聽 聽hb_vmPushLong( section ); 聽 聽hb_vmDo( 4 ); 聽 聽 聽 聽text = [ [ [ NSString alloc ] initWithCString: ISCHAR( -1 ) ? hb_parc( -1 ) : "" ] autorelease ]; 聽 聽 聽 聽return text ; 聽 聽 聽 }
Manuel,
Enhorabuena 
Has visto mi post acerca del simulador del iphone ?
Antonio Linares wrote:Manuel,
Enhorabuena
Has visto mi post acerca del simulador del iphone ?
Por cierto ... me encuentro con un problemilla , como ves en las capturas de pantalla los views salen movidos hacia arriba , el ancho que corrsponde con la info del iphone ( la pila que queda, compa帽ia y demas ) .
Ya me hab铆a dado cuenta cuando colocaba con c贸digo los controles , pero lo sulucionaba bajandolos 20pxles. pero ahora con los recursos es muy evidente ....
como podemos solucionarlo ?
Saludos.
Muy buenas, estoy intentando compilar ahora desde un Mac, me podeis decir los pasos necesarios para compilar desde ah铆.
Un Saludo y Mil Gracias.
softruz wrote:Muy buenas, estoy intentando compilar ahora desde un Mac, me podeis decir los pasos necesarios para compilar desde ah铆.
Un Saludo y Mil Gracias.
Resuelto el Problema de "descuadre" de las view desde recursos .
A帽adido soporte para recursos a webview , imgview, y progress , aun no probados , pero ya estan subidos al repositorio .
Saludos.
function Main()
聽 聽local oWnd := TWindow():New(), oLabel
聽 聽
聽 聽oLabel = TLabel():New( oWnd, "Hello world!", 120, 100, 100, 50 )
聽 聽oLabel:SetColor( 255, 255, 255, 255 )
聽 聽
聽 聽oWnd:Activate()
聽 聽
聽 聽MsgLogo( "logo.png" )
聽 聽
return nil
He subido logo.prg al repositorio porque estaba desaparecido 
Saludos.