Page 1 of 2

Error in last version FWH 11.10 (Folder + get)

Posted: Fri Nov 04, 2011 6:40 am
by mauri.menabue
hello

After the latest updates made by Antonio at 4/11/2011 4.36 of the release FWH 11.10
The following error persists:
The TAB key does not guarantee the passage between the various edit boxes
I attach an example to verify the problem.

Code: Select all | Expand


#include "FiveWin.Ch"

FUNCTION MAIN()
LOCAL oWnd, oDlg, oFld, cVar1, cVar2

cVar1 := SPACE(10)
cVar2 := SPACE(15)

DEFINE DIALOG oDlg TITLE "Pruebas" SIZE 400,300

@ 0,0 FOLDER oFld PROMPT "Folder 1", "Folder 2" OF oDlg

#define PADRE1 oFld:aDialogs[1]

@ 1,0 GET cVar1 VALID ( MsgInfo("Valid 1"), .T. ) OF PADRE1
@ 2,0 GET cVar2 VALID ( MsgInfo("Valid 2"), .T. ) OF PADRE1

ACTIVATE DIALOG oDlg ;
         CENTER

RETURN NIL
 


I tried to compile the program with HARBOUR instead XHARBOUR but appears
the following error:


│ FiveWin Harbour for 11.10 - Oct. 2011 Harbour │ ▄ power development
│ (c) FiveTech, 1993-2011 │ █ 9X/NT/200X/ME/XP/Vista/7 for Microsoft Windows


Compiling ...
Harbour 2.1.0beta1 (rev 14559)
Copyright (c) 1999-2010, http://www.harbour-project.org/
Compiling 'folder.prg' and generating preprocessed output to 'folder.ppo' ...
Lines 3846, Functions / Procedures 2
Generating C source output to 'folder.c' ... Done.
Borland C + + 5.82 for Win32 Copyright (c) 1993, 2005 Borland
folder.c:
Turbo Incremental Link 5.69 Copyright (c) 1997-2005 Borland
Error: Unresolved external '_HB_FUN_NUMTOHEX' referenced from C: \ FWH \ lib \ FIVEH.L
IB | GETSYSIN
* Linking errors *

c: \ FWH \ samples>
c: \ FWH \ samples>

Re: Error in last version FWH 11.10 (Folder + get)

Posted: Fri Nov 04, 2011 10:14 am
by nageswaragunupudi
Please link \xharbour\lib\ct.lib also

Re: Error in last version FWH 11.10 (Folder + get)

Posted: Fri Nov 04, 2011 10:39 am
by Rimantas
nageswaragunupudi wrote:Please link \xharbour\lib\ct.lib also


He linked with Harbour , not with xHarbour ... I think that the problem is oldest Harbour . If you can renew Harbour from Fwh Ftp or from harbour-project and try again ...

Re: Error in last version FWH 11.10 (Folder + get)

Posted: Fri Nov 04, 2011 12:16 pm
by mauri.menabue
hello Rimantas

I downloaded harbour from site Fivetech Software.

hello nageswaragunupudy

i make my example through the batch : buildx where is alredy linked ct.lib (dir samples of FWH)

Thank

Re: Error in last version FWH 11.10 (Folder + get)

Posted: Fri Nov 04, 2011 1:07 pm
by Antonio Linares
Mauri,

This change is required in source\function\getsysin.prg

Code: Select all | Expand

function BorlandVersion()
   
   #ifdef __XHARBOUR__
      local cHexVer := NumToHex( BorlandC() )
   #else  
      local cHexVer := hb_NumToHex( BorlandC() )
   #endif

return SubStr( cHexVer, 1, 1 ) + "." + SubStr( cHexVer, 2 )
 

Re: Error in last version FWH 11.10 (Folder + get)

Posted: Fri Nov 04, 2011 4:40 pm
by mauri.menabue
Antonio,

solved the problem :
Error: Unresolved external '_HB_FUN_NUMTOHEX' referenced from C: \ FWH \ lib \ FIVEH.L
IB | GETSYSIN
now harbour is ok.

but the main problem is :

The TAB key or ENTER Key does not guarantee the passage between the various edit boxes (get)
Please try the above example to verify the problem.

Code: Select all | Expand


#include "FiveWin.Ch"

FUNCTION MAIN()
LOCAL oWnd, oDlg, oFld, cVar1, cVar2

cVar1 := SPACE(10)
cVar2 := SPACE(15)

DEFINE DIALOG oDlg TITLE "Pruebas" SIZE 400,300

@ 0,0 FOLDER oFld PROMPT "Folder 1", "Folder 2" OF oDlg

#define PADRE1 oFld:aDialogs[1]

@ 1,0 GET cVar1 VALID ( MsgInfo("Valid 1"), .T. ) OF PADRE1
@ 2,0 GET cVar2 VALID ( MsgInfo("Valid 2"), .T. ) OF PADRE1

ACTIVATE DIALOG oDlg ;
         CENTER

RETURN NIL
 


Also in harbour there is the same problem.

Thank

Re: Error in last version FWH 11.10 (Folder + get)

Posted: Wed Nov 09, 2011 9:24 am
by lucasdebeltran
Your sample with Tabs works fine in FW 11.09

Re: Error in last version FWH 11.10 (Folder + get)

Posted: Wed Nov 09, 2011 9:27 pm
by mauri.menabue
Hi Lucasdebeltran

I confirm the sample work fine in previus version 11.09

Thanks

Re: Error in last version FWH 11.10 (Folder + get)

Posted: Thu Nov 10, 2011 1:20 am
by Antonio Linares

Re: Error in last version FWH 11.10 (Folder + get)

Posted: Mon Nov 14, 2011 11:41 am
by ukservice
Hello,

Is there please any update?.

I can´t use FWH 11.10.

Also, is Fivetech´s Harbour updated to 3.x?.

Thank you.

Re: Error in last version FWH 11.10 (Folder + get)

Posted: Mon Nov 14, 2011 12:34 pm
by Antonio Linares
John,

Our more recent changes seem to be working fine. We have not published a revised build yet but if you need the libs we can email them to you.

We are using Harbour 3.1 since it was available :-) You can download it from:
http://code.google.com/p/harbour-and-xharbour-builds/

Re: Error in last version FWH 11.10 (Folder + get)

Posted: Mon Nov 14, 2011 2:49 pm
by ukservice
Antonio,

Thank you four quick response.

I am afraid they don´t work:
viewtopic.php?f=3&t=22853

Also, the Harbour at FTDN is not updated. So maybe the one at code.google is not the official Fivetech´s.

In addition, could be also be possible to uptoad most recent libs to FDTN zone?.

Thanks ;)

Re: Error in last version FWH 11.10 (Folder + get)

Posted: Mon Nov 14, 2011 11:44 pm
by Antonio Linares
John,

We have upgraded FTDN/FWH pages to point to the Harbour and xHarbour builds that we publish at Google code:

http://code.google.com/p/harbour-and-xharbour-builds/downloads/list

Image

We are going to double check the tab issue again

Re: Error in last version FWH 11.10 (Folder + get)

Posted: Tue Nov 15, 2011 2:04 pm
by Enrico Maria Giordano
Antonio Linares wrote:We are going to double check the tab issue again


Thank you, Antonio. Let me know if I can be of any help.

EMG

Re: Error in last version FWH 11.10 (Folder + get)

Posted: Wed Nov 16, 2011 10:37 pm
by mauri.menabue
Hi all

Please try this new example, i found a new problem when passing throught the gets using (TAB or CR key).

Code: Select all | Expand



#include "FiveWin.Ch"

FUNCTION MAIN()
LOCAL oWnd, oDlg, oFld, cVar1, cVar2, cVar3, oGet1, oGet2, oGet3

cVar1 := SPACE(10)
cVar2 := "My When is .F."
cVar3 := SPACE(20)

DEFINE DIALOG oDlg TITLE "Test" SIZE 400,300

@ 0,0 FOLDER oFld PROMPT "Folder 1", "Folder 2" OF oDlg

#define PADRE1 oFld:aDialogs[1]

@ 1,0 GET oGet1 VAR cVar1 VALID ( MsgInfo("Valid 1"), .T. )                 OF PADRE1
@ 2,0 GET oGet2 VAR cVar2 VALID ( MsgInfo("Valid 2"), .T. ) WHEN .F. OF PADRE1
@ 3,0 GET oGet3 VAR cVar3 VALID ( MsgInfo("Valid 3"), .T. )                 OF PADRE1

ACTIVATE DIALOG oDlg CENTER

RETURN NIL

 


thanks