Hola, es muy interesante eso pero porque no prueba a traducir tu intervención en ingles para que toda la lista pueda comprender y a la vez agregar tus modificaciones? Un saludo cordial.
El 11/09/09, Rodrigo Machado <[email protected]> escribió: > Buenos Dias > > Hace algun tiempo he modificado el contrib para postgresql agregandole la > posibilidad de acceder a los datos de la siguiente manera > En vez de: > oQuery:getrow( oQuery:recno() ):fieldget('codigo') > Se puede usar asi: > oQuery:codigo > > Este metodo ha facilitado y mucho la programación, y por esto vengo a > compartir con ustedes. > > Me gustaria que se incluyera a los fuentes en el SVN. > Saludos > > > ***************************** > *** Rodrigo Machado *** > *** rodrigo at flaro.net *** > *** 30/08/2008 - 7:26 *** > ***************************** > METHOD SetFieldsValues() CLASS TPQquery > Local i > Local aData > > if ::nRecno > 0 > aData := array( len( ::aStruct ), 2 ) > for i := 1 to len(::aStruct) > if ! __objHasData( SELF, ::aStruct[i,1] ) > __objAddData( SELF, ::aStruct[i,1] ) > endif > aData[ i, HB_OO_DATA_SYMBOL ] := ::aStruct[i,1] > aData[ i, HB_OO_DATA_VALUE ] := ::GetRow():Fieldget( i ) > next > __ObjSetValueList( SELF, aData ) > endif > > RETURN nil > > > > ¿Estas buscando algún numero telefónico? www.teleguia.com.py > > *:-.,_,.-:*'``'*:-.,_,.-:*:-.,_,.-:*'``'*:-.,_,.-: > :: Rodrigo Machado :: > FlaRo Sistemas > www.flaro.net > > Telef: 0673 221 480 > *:-.,_,.-:*'``'*:-.,_,.-:*:-.,_,.-:*'``'*:-.,_,.-: > -- Enviado desde mi dispositivo móvil Ing. Carlo Borelli Caracas, Venezuela Tel. +58 0412 6319387 / +58 0212 5170479 Registered Linux User #249354 _______________________________________________ Harbour mailing list [email protected] http://lists.harbour-project.org/mailman/listinfo/harbour
