FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Se deben usar Alias con Tdatabase
Posts: 1276
Joined: Tue Dec 28, 2010 01:29 PM
Se deben usar Alias con Tdatabase
Posted: Mon Aug 22, 2011 01:15 AM

Buenas noches,

Es una buena practica usar la clase TDatabase y a la vez usar alias en el manejo de las DBFs?

FWH 25.12

Harbour/Hbmk2

Microsoft Visual C++

MySql 8.0

Antigravity

Posts: 1789
Joined: Tue Oct 11, 2005 05:01 PM
Re: Se deben usar Alias con Tdatabase
Posted: Wed Aug 24, 2011 03:29 PM
yo lo hago, sin problemas.
por ejemplo yo uso
Code (fw): Select all Collapse
USE clientes NEW ALIAS clie
DATABASE oCli

procedure edit( lNuevo )
  if lNuevo
     if CLIE-}( eof() )
         MsgAlert("Tabla vacia")
     endif
     oClie:blank()
  else
     oClie:load()
  endif

...

aca mi laptop tiene dañada la tecla de mayor por lo que la reemplaze por corchete :-)

salu2
Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)
Posts: 1276
Joined: Tue Dec 28, 2010 01:29 PM
Re: Se deben usar Alias con Tdatabase
Posted: Wed Aug 24, 2011 03:31 PM

Muchas gracias Carlos

FWH 25.12

Harbour/Hbmk2

Microsoft Visual C++

MySql 8.0

Antigravity

Posts: 652
Joined: Wed Oct 19, 2005 12:03 PM
Re: Se deben usar Alias con Tdatabase
Posted: Wed Aug 24, 2011 10:18 PM
Yo uso el alias de la clase de esta forma

Code (fw): Select all Collapse
  REDEFINE LISTBOX oBrw1 fields strzero((oAjuste:cAlias)->ncli,5),;
                                       strzero((oAjuste:cAlias)->recibo,8),;
                                       (oAjuste:cAlias)->detalle,;
                                        transform((oAjuste:cAlias)->importe, "@e 999,999.99"),;     
                                       transform((oAjuste:cAlias)->dolar,"@e 99.999") ID 103 UPDATE;
                    ON DBLCLICK  hnotas(oAjuste:recibo,oAjuste:ncli,oAjuste:importe,oAjuste,oBrw1)


Espero te sirva

Luis
Posts: 2064
Joined: Fri Jan 06, 2006 09:28 PM
Re: Se deben usar Alias con Tdatabase
Posted: Thu Aug 25, 2011 05:11 PM

Yo los uso asi,

  DBSELECTAREA("jlnotas") // MAESTRO NOTAS
     jlnotas->( OrdSetFocus(1) )
     jlnotas->( DBGOTOP() )
  DATABASE oDbfNOTAS
     oDbfNOTAS:GOTOP()
Dios no está muerto...



Gracias a mi Dios ante todo!
Posts: 1276
Joined: Tue Dec 28, 2010 01:29 PM
Re: Se deben usar Alias con Tdatabase
Posted: Thu Aug 25, 2011 05:46 PM

Muchas gracias Jose Luis

Saludos!

FWH 25.12

Harbour/Hbmk2

Microsoft Visual C++

MySql 8.0

Antigravity

Continue the discussion