FiveTech Software tech support forums

Code: Select all | Expand

void dummy(void)
{
    MsgInfo(@"nono");   
    
      hb_vmInit( HB_TRUE ); // inicializa la maquina virtual de Harbour   
    
    
    //if( symFPH == NULL )
    //  symFPH = hb_dynsymSymbol( hb_dynsymFindName( "MIA" ) );
    
      //  hb_vmPushSymbol( symFPH );
    
        //hb_vmPushNil();
    //  hb_vmDo( 0 );        

//  hb_vmQuit(); 
    
    MsgInfo(@"no"); 
    
}
 

Code: Select all | Expand

function Main()

   local oWnd := TWindow():New()
   local osegment = TSegment():New( oWnd, 77, 50, 207, 44 )
    
    osegment:addbutton("hola") 
    osegment:addbutton("Adios") 
    
   osegment:bChange:={|o| msginfo(str(o:nValue))    }

   
   oWnd:Activate()
   
return nil   

 

Code: Select all | Expand

function Main()

   local oWnd := TWindow():New()
   local osegment 
    
 @ 77,50 SEGMENTED oSegment  ITEMS {"hola","Adios" } OF oWnd ;
            ON CHANGE  {|o| msginfo(str(o:nValue)) }  SIZE 207,44     
   
   oWnd:Activate()

return nil   
 

Code: Select all | Expand

#import <UIKit/UIKit.h>

void hb_vmInit( BOOL );

int main(int argc, char *argv[]) {
    
    NSAutoreleasePool * pool = [[NSAutoreleasePool alloc] init];
    NSLog( @"antes de vmInit()" );
    hb_vmInit( TRUE );
    NSLog( @"despues de vmInit" );
    // int retVal = UIApplicationMain(argc, argv, nil, nil);
    [pool release];
    return 0; // retVal;
}
 

Code: Select all | Expand

function Main()

   NSLog( "Si" )
   
return nil   
 

Code: Select all | Expand

- (BOOL)application:(UIApplication *)application didFinishLaunchingWithOptions:(NSDictionary *)launchOptions {    
    
    // Override point for customization after application launch.
    NSLog( @"antra en appdelegate" );

    PHB_SYMB symMain = hb_dynsymSymbol( hb_dynsymFindName( "MAIN" ) );
    
    NSLog( @"aqui" );
    
    // app = self;
    
    hb_vmPushSymbol( symMain );
    hb_vmPushNil();
    hb_vmDo( 0 );
    
    // Add the view controller's view to the window and display.
    // [window addSubview:viewController.view];
    // [window makeKeyAndVisible];

    return YES;
}