FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Que reemplaza al comando DEFAULT de Clipper
Posts: 188
Joined: Wed Feb 01, 2006 06:59 PM
Que reemplaza al comando DEFAULT de Clipper
Posted: Tue Dec 18, 2007 05:54 PM

En mi migración de FW a FWH encuentro que el comando DEFAULT no es soportado por el compilador xHarbour (siempre me saca error donde esta ese comando); es porque no lo soporta y si es asi con que lo puedo reemplazar.

Saludos

Fernando Espinoza

Saludos



Fernando Espinoza
Posts: 682
Joined: Tue Feb 14, 2006 09:48 AM
Que reemplaza al comando DEFAULT de Clipper
Posted: Tue Dec 18, 2007 06:24 PM
Si usas el default de clipper, basta incluyas common.ch
# INCLUDE "common.ch"

o definas el comando.
#xcommand DEFAULT <v1> TO <x1> [, <vn> TO <xn> ] => ;
                                IF <v1> == NIL ; <v1> := <x1> ; END ;
                                [; IF <vn> == NIL ; <vn> := <xn> ; END ]

Fivewin implementa tambien un comando DEFAULT y no es exactamente igual, para usar el de fivewin, debes incluir fivewin.ch

# include "common.ch"
DEFAULT cVar TO "Algo"

# include "FiveWin.ch"
DEFAULT cVar:="Algo"
Saludos desde Mallorca
Biel Maimó
http://bielsys.blogspot.com/

Continue the discussion