FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveMac / FivePhone (iPhone, iPad) he conseguido un iphone
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: he conseguido un iphone
Posted: Mon Nov 01, 2010 08:54 AM
A帽adida la primera implementaci贸n de la Clase TPickerView y samples/picker.prg

Code (fw): Select all Collapse
function Main()

   local oWnd    := TWindow():New()
   local aItems  := { "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday", "Sunday" }
   local oPicker := TPickerView():New( oWnd, aItems, 50, 0, 200, 200 )
 
   oWnd:Activate()
   
return nil

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1516
Joined: Thu May 27, 2010 02:06 PM
Re: he conseguido un iphone
Posted: Mon Nov 01, 2010 03:26 PM
Antonio , Daniel ... revisando codigo me encuentro en mainapp.m varios "int" , justo he leido esto http://www.nscodecenter.com/preguntas/58/cual-es-la-diferencia-entre-nsinteger-y-nsuinteger
驴 Se deber铆a cambiar no ? .
Saludos.
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: he conseguido un iphone
Posted: Mon Nov 01, 2010 03:50 PM

Manuel,

Depende del uso que se les de.

En el caso del TPickerView, se usa para pasar los elementos de un array al picker, y siempre va a ser un array con un numero de elementos no muy grande :-)

El problema viene cuando intentemos almacenar un valor muy grande en ellos. Por ejemplo, en FWH 64 tenemos que usar valores tipo "longlong" (64 bits) porque en un long (32 bits) no caben algunos valores de 64 bits (handles, principalmente).

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: he conseguido un iphone
Posted: Mon Nov 01, 2010 04:07 PM
Manuel

revisando la documentacion de apple

posiblemente podriamos resolverlo con typedef sin cambiar el codigo

Code (fw): Select all Collapse
typedef NSInteger int;
typedef NSUInteger uint;


NSInteger
Used to describe an integer.

#if __LP64__ || TARGET_OS_EMBEDDED || TARGET_OS_IPHONE || TARGET_OS_WIN32 || NS_BUILD_32_LIKE_64
typedef long NSInteger;
#else
typedef int NSInteger;
#endif
Discussion
When building 32-bit applications, NSInteger is a 32-bit integer. A 64-bit application treats NSInteger as a 64-bit integer.

NSUInteger
Used to describe an unsigned integer.

#if __LP64__ || TARGET_OS_EMBEDDED || TARGET_OS_IPHONE || TARGET_OS_WIN32 || NS_BUILD_32_LIKE_64
typedef unsigned long NSUInteger;
#else
typedef unsigned int NSUInteger;
#endif
Discussion
When building 32-bit applications, NSUInteger is a 32-bit unsigned integer. A 64-bit application treats NSUInteger as a 64-bit unsigned integer
Posts: 1516
Joined: Thu May 27, 2010 02:06 PM
Re: he conseguido un iphone
Posted: Mon Nov 01, 2010 07:04 PM

He subido al repositorio una nueva version de msgs.m . Esta implementado el MsgYesNoModal para que devuelva el numero de boton que se ha pulsado , pero no consiguo que me devuelva un n煤mero ... seguro que es una tontada pero estoy ofuscado y no consiguo terminarlo asi que aqui lo dejo ....
Si quereis hecharle un vistazo ...
Saludos.

-------------------------- editado--------------------
Resuelto . Ya esta funcionando msgYesNoModal..... , a帽adidas funciones MsgActivity() y delMsgActivity() mensajes sin boton y con un control activity ...
Un saludo.

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: he conseguido un iphone
Posted: Mon Nov 01, 2010 09:20 PM

Manuel,

Muy bien, gracias! :-)

Has visto algo de los sensores de proximidad, de aceleraci贸n, de movimiento ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1516
Joined: Thu May 27, 2010 02:06 PM
Re: he conseguido un iphone
Posted: Mon Nov 01, 2010 10:33 PM
Antonio Linares wrote:Manuel,

Muy bien, gracias! :-)

Has visto algo de los sensores de proximidad, de aceleraci贸n, de movimiento ?



He encontrado este codigo que puede servir de comienzo:
Code (fw): Select all Collapse
#define kAccelerationThreshold 2.2


//Somewhere in initialization

UIAccelerometer *accel = [UIAccelerometer sharedAccelerometer];

accel.delegate = self;

accel.updateInterval = 1.0f/10.0f;

 

- (void)accelerometer:(UIAccelerometer *)accelerometer didAccelerate:(UIAcceleration *)acceleration {

if (fabsf(acceleration.x) > kAccelerationThreshold || fabsf(acceleration.y) > kAccelerationThreshold || fabsf(acceleration.z) > kAccelerationThreshold) {

NSLog(@"Shaking!!!");

}

}
Posts: 1516
Joined: Thu May 27, 2010 02:06 PM
Re: he conseguido un iphone
Posted: Tue Nov 02, 2010 08:42 AM
Antonio Linares wrote:Manuel,

Muy bien, gracias! :-)

Has visto algo de los sensores de proximidad, de aceleraci贸n, de movimiento ?


A帽adida funcion de ajuste del sensor de proximidad ...SetProxiMonitor( lactivardesactivar) .
No est谩 aun probado y no se si funciona bien ( se me atraganta algo el pasar parametros bool :-) )
Saludos.
Posts: 1516
Joined: Thu May 27, 2010 02:06 PM
Re: he conseguido un iphone
Posted: Tue Nov 02, 2010 06:24 PM
por cierto en encontrado esto que nos puede venir muy bien :-) he visto que tenemos mal el codigo de control de color ya que alpha no divide entre 255 :-) )
Code (fw): Select all Collapse
#define RGBA(r,g,b,a) [UIColor colorWithRed:r/255.0 green:g/255.0 blue:b/255.0 alpha:a]
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: he conseguido un iphone
Posted: Tue Nov 02, 2010 07:43 PM
Manuel,

Creo que lo tenemos bien. Seg煤n la documentaci贸n de la Clase UIColor:
http://developer.apple.com/library/ios/#documentation/uikit/reference/UIColor_Class/Reference/Reference.html


Parameters
red
The red component of the color object, specified as a value from 0.0 to 1.0.
green
The green component of the color object, specified as a value from 0.0 to 1.0.
blue
The blue component of the color object, specified as a value from 0.0 to 1.0.
alpha
The opacity value of the color object, specified as a value from 0.0 to 1.0.


Todos los valores van de 0 a 1, y es correcto dividir por 255, si queremos usar un rango de 0 a 255 :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: he conseguido un iphone
Posted: Tue Nov 02, 2010 07:53 PM
mastintin wrote:
Antonio Linares wrote:Manuel,

Muy bien, gracias! :-)

Has visto algo de los sensores de proximidad, de aceleraci贸n, de movimiento ?


A帽adida funcion de ajuste del sensor de proximidad ...SetProxiMonitor( lactivardesactivar) .
No est谩 aun probado y no se si funciona bien ( se me atraganta algo el pasar parametros bool :-) )
Saludos.


Manuel,

Ligeramente modificado. Los valores l贸gicos los pasamos usando hb_parl() :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1516
Joined: Thu May 27, 2010 02:06 PM
Re: he conseguido un iphone
Posted: Tue Nov 02, 2010 07:58 PM
Antonio Linares wrote:Manuel,

Creo que lo tenemos bien. Seg煤n la documentaci贸n de la Clase UIColor:
http://developer.apple.com/library/ios/#documentation/uikit/reference/UIColor_Class/Reference/Reference.html


Parameters
red
The red component of the color object, specified as a value from 0.0 to 1.0.
green
The green component of the color object, specified as a value from 0.0 to 1.0.
blue
The blue component of the color object, specified as a value from 0.0 to 1.0.
alpha
The opacity value of the color object, specified as a value from 0.0 to 1.0.


Todos los valores van de 0 a 1, y es correcto dividir por 255, si queremos usar un rango de 0 a 255 :-)


Correcto para los colores , pero el canal alfa ( opacidad) creo que es mas "comprensible" si se usa de 0 a 100 ( porcentaje de opacidad ), como hace por ejemplo photoshop . 驴 no? .
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: he conseguido un iphone
Posted: Tue Nov 02, 2010 11:07 PM

Manuel,

Es que en realidad usar un rango de 0.0 a 1.0 es un porcentaje tambi茅n, pero en distinta escala.

Nosotros podemos usar la escala que queramos, pero tendremos que traducirla a la de ellos :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: he conseguido un iphone
Posted: Tue Nov 02, 2010 11:55 PM
Subida la Clase TAcceleroMeter basada en el c贸digo publicado por Manuel :-)
y samples/accel.prg

A煤n no funciona, pero ya lo solucionaremos :-)

Code (fw): Select all Collapse
function Main()

   local oWnd := TWindow():New(), oAccel
   
   TLabel():New( oWnd, "Shake me!" )
   
   oAccel = TAcceleroMeter():New()
   oAccel:bShaking = { || MsgInfo( "shaking!" ) }
   
   oWnd:Activate()
   
return nil
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: he conseguido un iphone
Posted: Wed Nov 03, 2010 12:16 AM

Arreglado, solo habia que variar la cantidad de acceleraci贸n :-)

define kAccelerationThreshold 1.07

regards, saludos

Antonio Linares
www.fivetechsoft.com