Funciona ZAP ?

Funciona ZAP ?

Postby Carles » Tue Sep 12, 2006 7:26 am

Antonio,

Funciona ZAP ? :(

Code: Select all  Expand view
FUNCTION Main()

    LOCAL cTable := Curdir() + '\Test.dbf'


    USE (cTable) NEW

    IF MsgYesNo( 'Borra ?' )

       __DbZap()

    ENDIF

RETU .F.
Salutacions, saludos, regards

"...programar es fácil, hacer programas es difícil..."

UT Page -> https://carles9000.github.io/
Forum UT -> https://discord.gg/bq8a9yGMWh
Skype -> https://join.skype.com/cnzQg3Kr1dnk
User avatar
Carles
 
Posts: 1105
Joined: Fri Feb 10, 2006 2:34 pm
Location: Barcelona

Postby Antonio Linares » Tue Sep 12, 2006 7:50 am

Carles,

Debería funcionar correctamente, ya que es algo propio de Harbour.

Te dá algún error ?
regards, saludos

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

Postby Carles » Tue Sep 12, 2006 8:36 am

Antonio,

Rectifico: Funciona, pero en la pocket, NO en el emulador.

Gracias.
Salutacions, saludos, regards

"...programar es fácil, hacer programas es difícil..."

UT Page -> https://carles9000.github.io/
Forum UT -> https://discord.gg/bq8a9yGMWh
Skype -> https://join.skype.com/cnzQg3Kr1dnk
User avatar
Carles
 
Posts: 1105
Joined: Fri Feb 10, 2006 2:34 pm
Location: Barcelona


Return to FiveWin para Pocket PC

Who is online

Users browsing this forum: No registered users and 1 guest