FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveMac / FivePhone (iPhone, iPad) ventana about
Posts: 1516
Joined: Thu May 27, 2010 02:06 PM
ventana about
Posted: Tue Sep 07, 2010 10:08 AM
Una posible implementacion del aboutMsg , sin comprobar si funciona correcto , ( estoy sobre win2003 ):
Code (fw): Select all Collapse
HB_FUNC( ABOUTMSG ) 
{
//[ NSApp orderFrontStandardAboutPanel : nil ];

聽 聽 NSString * cImg = [ [ [ NSString alloc ] initWithCString: ISCHAR( 1 ) ? hb_parc( 1 ) : "" ] autorelease ];
聽 聽 NSString * cVersion = [ [ [ NSString alloc ] initWithCString: ISCHAR( 2 ) ? hb_parc( 2 ) : "" ] autorelease ];
聽 聽 NSString * cAppName = [ [ [ NSString alloc ] initWithCString: ISCHAR( 3 ) ? hb_parc( 3 ) : "" ] autorelease ]; 聽
聽 聽 NSString * cCopyright = [ [ [ NSString alloc ] initWithCString: ISCHAR( 4 ) ? hb_parc( 4 ) : "" ] autorelease ];
聽 聽 NSString * cappVer = [ [ [ NSString alloc ] initWithCString: ISCHAR( 5 ) ? hb_parc( 5 ) : "" ] autorelease ];
    NSString * cCredit = [ [ [ NSString alloc ] initWithCString: ISCHAR( 6 ) ? hb_parc( 6 ) : "" ] autorelease ]; 
聽 聽 聽 
聽 聽 NSDictionary *options;
聽 聽 NSImage *img;

聽 聽 img = [NSImage imageNamed: cImg ];
聽 聽 options = [NSDictionary dictionaryWithObjectsAndKeys:
聽 聽 聽 聽 聽 cVersion, @"Version",
聽 聽 聽 聽 聽 cAppName, @"ApplicationName",
聽 聽 聽 聽 聽 img, @"ApplicationIcon",
聽 聽 聽 聽 聽 cCopyright, @"Copyright",
聽 聽 聽 聽 聽 cAppVer, @"ApplicationVersion",
         cCredit, @"Credits",
聽 聽 聽 聽 聽 nil];
聽 聽 聽 聽 [[NSApplication sharedApplication] orderFrontStandardAboutPanelWithOptions:options]; 聽 聽 聽 
}
Posts: 1516
Joined: Thu May 27, 2010 02:06 PM
Re: ventana about
Posted: Tue Sep 07, 2010 05:44 PM
Lo he estado probando y hay algunios parametros que no van ( realmente no se el motivo ) , y otros se pueden omitir ( el icono por ejemplo) .
Comentar que si colocamos un archivo con nombre "Credits.html" en el subdirectorio resources , su contenido lo tomar谩 como Creditos y se presentar谩 en el Dialogo .
Esta soluci贸n funciona bien :
Code (fw): Select all Collapse
Function MsgAbout()

local cVersion := "4.1"
local cAppName := "Mi visor"
local cCopyr:= "Copyright 2005-2010, My Great Company"
ABOUTMSG(cVersion,cAppName,cCopyr)
Return nil



HB_FUNC( ABOUTMSG )
{
//[ NSApp orderFrontStandardAboutPanel : nil ];
聽 聽 
聽 聽 NSString * cVersion = [ [ [ NSString alloc ] initWithCString: ISCHAR( 1 ) ? hb_parc( 1 ) : "" ] autorelease ];
聽 聽 NSString * cAppName = [ [ [ NSString alloc ] initWithCString: ISCHAR( 2 ) ? hb_parc( 2 ) : "" ] autorelease ]; 聽
聽 聽 NSString * cCopyright = [ [ [ NSString alloc ] initWithCString: ISCHAR( 3 ) ? hb_parc( 3 ) : "" ] autorelease ];
聽 
聽 聽 NSDictionary *options;
聽 聽
聽 聽 options = [NSDictionary dictionaryWithObjectsAndKeys:
聽 聽 聽 聽 聽 聽 聽 聽cVersion, @"Version",
聽 聽 聽 聽 聽 聽 聽 聽cAppName, @"ApplicationName",
聽 聽 聽 聽 聽 聽 聽 聽cCopyright, @"Copyright",
聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽nil];
聽 聽 
聽 聽 
聽 聽 [[NSApplication sharedApplication] orderFrontStandardAboutPanelWithOptions:options];

la imagen :



Comentar que tambien se puede a帽adir este codigo al buidl.sh , para mejorar nuestro archivo info.plist

Code (fw): Select all Collapse
echo '   <key>CFBundleVersion</key>' >> $1.app/Contents/Info.plist
   echo '   <string>776.0</string>' >> $1.app/Contents/Info.plist
   echo '   <key>NSHumanReadableCopyright</key>' >> $1.app/Contents/Info.plist
   echo '   <string>Manuel Avarez 2010</string>' >> $1.app/Contents/Info.plist
Posts: 82
Joined: Mon Jan 19, 2009 04:40 PM
Re: ventana about
Posted: Wed Sep 08, 2010 04:58 AM

Estimado ...

Has visto algo que muestre en el aboutmsg, algo asi como tipo cine cuado termina una pelicula, es decir que pasen diferentes frases de abajo hacia arriba y se desaparescan ?
Te acuerdas del scroll de clipper ?

Saludos

P.S. Excelente trabajo!!! Dime, tienes algun proyecto ya implementado y corriendo?

Posts: 1516
Joined: Thu May 27, 2010 02:06 PM
Re: ventana about
Posted: Wed Sep 08, 2010 07:43 AM
ramirezosvaldo2 wrote:Estimado ...

Has visto algo que muestre en el aboutmsg, algo asi como tipo cine cuado termina una pelicula, es decir que pasen diferentes frases de abajo hacia arriba y se desaparescan ?
Te acuerdas del scroll de clipper ?

Saludos

P.S. Excelente trabajo!!! Dime, tienes algun proyecto ya implementado y corriendo?


Pues no he visto nada parecido y dudo que exista a nivel de framework , una idea que se me ocurre es que al ser un html lo que se muestra , si se implementa en ese archivo puede que funcione ,ser铆a cuesti贸n de mirarlo.
No , no tengo implementado nada funcionando . Ten en cuenta que ahora no me dedico a la programaci贸n ( en estos momentos vivo de la fotografia ) lo que no me da oportunidad de tener proyectos. Me he propuesto hacer un programa de uso personal para la gestion de mis clientes , pero no tengo mucha prisa y fivemac no deja de estar en sus primeros pasos ( piensa en los a帽os que tiene fivewin) , asi que hay que ir haciendo cosas sobre la marcha . Para algo sencillo pienso que ya est谩 , para algo mayor le faltan cosas .
Un reto en este momento es la gesti贸n de pictures de los gets , algo tan fundamental para nosotros a煤n no lo tenemos , pero todo se andar谩.
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: ventana about
Posted: Wed Sep 08, 2010 08:02 AM

Manuel,

Muy bueno! gracias :-)

A ver si publicamos el nuevo build de FiveMac lo antes posible...

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1516
Joined: Thu May 27, 2010 02:06 PM
Re: ventana about
Posted: Wed Sep 08, 2010 08:54 PM
ramirezosvaldo2 wrote:Estimado ...

Has visto algo que muestre en el aboutmsg, algo asi como tipo cine cuado termina una pelicula, es decir que pasen diferentes frases de abajo hacia arriba y se desaparescan ?
Te acuerdas del scroll de clipper ?


He estado investigando un poco y el scroll en codigo html no funciona ( mismo codigo en el navegador si ) .
He visto ejemplos que hacen lo que tu dices pero lo que hacen es generar sus propias ventanas y con un textbox y un Timer hacen el scroll ..
Creo que se puede hacer perfectamente desde fivemac
Saludos.

Continue the discussion