Database Fwh

Database Fwh

Postby Gabri » Mon Dec 26, 2005 1:00 pm

Hola Grupo

Estoy haciendo pruebas con la clase database de fwh y tengo una duda para crear un nuevo registro hago lo siguiente:

oDb:Blank()
Redefine Get ...

oDb:append()
oDb:Save()


Pero algo pasa que los get no me los muestra en blanco, me muestra los datos del registro donde apunta el puntero en el browse, que estoy haciendo mal ?


Un saludo y feliz navidad
Gabri
 
Posts: 14
Joined: Mon Oct 10, 2005 12:28 pm

Postby Antonio Linares » Mon Dec 26, 2005 5:52 pm

Estás usando el objeto database también en el browse ? En tal caso, el browse al dibujarse, esta modificando el buffer de la clase TDatabase.

Si el browse va a estar visible mientras editas, la solución es hacer igual a "" la DATA cAlias del browse: <oBrw>:cAlias := ""

Y luego restaurarla una vez que termines de editar un registro.
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42127
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Gabri » Wed Dec 28, 2005 11:54 am

Gracias Antonio ya me funciona perfectamente, aunque no acabo de entender muy bien lo que hace el metodo Blank() , no se por que tiene que ir al último registro, despues mover un registro ...



METHOD Blank( nRecNo ) INLINE ( ::nArea )->( nRecNo := RecNo(),;
DBGoBottom(), ;
DBSkip( 1 ), ;
::Load(),;
DBGoTo( nRecNo ) )


un saludo
Gabri
 
Posts: 14
Joined: Mon Oct 10, 2005 12:28 pm

Postby Antonio Linares » Wed Dec 28, 2005 1:06 pm

Gabri,

Al mover un registro, pasado el último, se genera un registro vacio y se cargan sus valores en el buffer.

Se podría hacer lo mismo rellenando el buffer con valores vacios de los campos.
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42127
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: FiveWiDi, Google [Bot], groiss and 41 guests