Para Antonio - Problema con las fechas Fwh 7.05

[jacgsoft]

Antonio antes con la version de Abril de 2005 las fechas funcionaba ok, pero ahora aparece la fecha bien pero cuando quiero modificar se corre, osea desaparecen los slash"/" y no reconoce el formato de la fecha.

Probe el ejemplo TESTGET_ de Samples y cuando por ejemplo ingreso 20/20/2007 me sale el siguiente error, cuando antes lo validaba y no me dejaba pasar.


Error description: Error BASE/42 Scope Violation
(protectec): TCLIPGET:_TYPEOUT

Stack_list
---------------------------------------
Called From: => TCLIPGET:_TYPEOUT(0)
Called From: => TGET:LOSTFOCUS(0)
Called From: => TGET:KILLFOCUS(0)
Called From: => TCONTROL:HANDLEEVENT(0)
Called From: => TGET:HANDLEEVENT(0)
Called From: .\source\classes\WINDOW.PRG => _FW
Called From: => CALLWINDOWPROC(0)
Called From: => TGET:LBUTTONDOWN(0)
Called From: => TWINDOW:HANDLEEVENT(0)
Called From: => TCONTROL:HANDLEEVENT(0)
Called From: => TGET:HANDLEEVENT(0)
Called From: .\source\classes\WINDOW.PRG => _FW
Called From => DIALOGBOXINDIRECT(0)
Called From => TDIALOG:ACTIVATE(0)
Called From: testget_.prg => MAIN(27)

[Antonio Linares]

Por favor vuelve a descargar e instalar Harbour desde:

www.fivetechsoft.com/files/harbour.exe

[jacgsoft]

Gracias antonio funciono perfecto

[Carlos Mora]

Antonio,
tengo el mismo problema. Me he bajado el harbour de Fivetech y lo he instalado, tiene fecha 05/11/2007, pero no he podido solucionarlo.
De hecho me falla el enlazado

Code: Select all

Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland
Error: Unresolved external '_HB_FUN_HB_GT_WIN' referenced from C:\HARBOUR711\LIB\RTL.LIB|gtsys

Por que el gtsys pide GT_WIN? No es suficiente con GT_GUI?


::oGet:TypeOut = .f. en LostFocus es lo que dá el problema, luego de mecanizar una fecha inválida. Aparentemente desde que se fijó como PROTECTED TypeOut no va a poder ser asignada.
He probado reemplazando oGet:TypeOut con el método Home() pero me vacía el buffer del get, que no es lo que busco.

Un saludo,

Carlos.

[Antonio Linares]

Carlos,

El sistema GT se ha cambiado en Harbour. Ya no es como antes y hay que incluir cambios que están en FWH 7.11

Puedes construir samples\TestGet2.prg y comprobar si falla ? Aqui funciona bien

[Carlos Mora]

Antonio,

Compilando con el build de Harbour publicado en Octubre junto a FWH 7.10 anterior en TGet,

Code: Select all

┌────────────────────────────────────────────────────────────────────────────┐
│ FiveWin for Harbour 7.07 - July 2007            Harbour development power  │▄
│ (c) FiveTech, 1993-2007      for Microsoft Windows 95/98/NT/2000/ME and XP │█
└────────────────────────────────────────────────────────────────────────────┘█
  ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
Compiling...
Harbour devel build 1.1-1 Intl.
Copyright 1999-2007, http://www.harbour-project.org/
Compiling 'TESTGET2.prg' and generating preprocessed output to 'TESTGET2.ppo'...

Lines 3496, Functions/Procedures 2
Generating C source output to 'TESTGET2.c'... Done.
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TESTGET2.c:
Borland Resource Compiler  Version 5.40
Copyright (c) 1990, 1999 Inprise Corporation.  All rights reserved.
Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland
* Application successfully built

C:\FWH707\samples>

definitivamente es el typeout, que ahora es protected y no se puede asignar.

Que simpático cambio el de Harbour.

Un saludo,

Carlos.

[Antonio Linares]

Carlos,

> definitivamente es el typeout, que ahora es protected y no se puede asignar

Si, así es, por eso hay que modificar la clase TGet y eliminar el uso de typeout

[Carlos Mora]

Con que se reemplaza el uso del typeout?

[Antonio Linares]

Carlos,

Sí se puede usar, lo que no puede hacerse es asignarle un valor, que es lo que se estaba haciendo antes, ya que es un dato de solo lectura

[Carlos Mora]

Eso lo entiendo, la pregunta es: ¿Cual es la modificación en FiveWin para que el comportamiento sea el mismo que antes?

[Antonio Linares]

Carlos,

No hay que realizar ningún cambio. Solo quitar la asignación que se le hacía a typeout. Ya no es necesaria.