Clipper/FiveWin - Con que reemplazo.....

hola amigos con que comando reemplazo el SET CENTURY ON y el SET DATE BRIT del clipper a fivewin, gracias

Set Century , Set Date son comandos de Clipper , recuerda que Fivewin es una libreria para Clipper.
Asi no tienes por que reemplazarlos.

bueno pero los puse y no me funciona, en todo caso a donde los pongo, porque en clipper es al inicio, porque si es asi me marca errores

Morellana :

Supongo que el error que da es este :
Error C2006 Statement not allowed outside procedure or function

Si ese es el error , es poque estas declarando mal los Set.
Para corregirlo declaralos despues de la funcion Main() del .prg principal o tambien los puedes declarar en el INIT PROCEDURE.

Por ejemplo :

/*
Programa : Test.prg
Fecha : 17-Oct-2002
Autor : Víctor Manuel Tomás Díaz [ Vikthor ]
*/
#include \"FiveWin.ch\"
FUNCTION Main()
LOCAL oSay , nHeight
SET CENTURY ON
SET DATE TO BRITISH
PUBLIC oWnd
DEFINE FONT oFont NAME \"Tahoma\" SIZE 0, -12
nHeight := oFont:nHeight
DEFINE WINDOW oWnd TITLE \"Ejemplo\" MDI MENU MENU()
@ nHeight*2 , 10 Say oSay PROMPT \"SET CENTURY ON\" OF oWnd UPDATE FONT oFont PIXEL SIZE 200 , nHeight+2
@ nHeight*3 , 10 Say oSay PROMPT \"SET DATE TO BRITISH\" OF oWnd UPDATE FONT oFont PIXEL SIZE 200 , nHeight+2
@ nHeight*4 , 10 Say oSay PROMPT Date() OF oWnd UPDATE FONT oFont PIXEL SIZE 200 , nHeight+2
ACTIVATE WINDOW oWnd
RETURN
FUNCTION MENU()
local oMnu
MENU oMenu
ENDMENU
RETURN oMenu

En el INIT lo haces de esta forma :
INIT PROCEDURE Inicial
LOCAL oIni
SET CENTURY ON // Ver la fecha con 4 digitos para el año
SET EPOCH TO ( Year(Date())-50 )
SET DATE BRITISH // Formato dd-mm-aaaa
SET 3DLOOK ON // Vistas en 3D
SET EXCLUSIVE OFF // Abrir Bases en forma compartida.
SET AUTOPEN OFF // No Abrir automat

muchas gracias Victor, ahora me funciona, otra conculta tu tienes el blinker 5.1 pero que no sea demo, gracias nuevamente