topic-20861

Posts: 564

Joined: Thu Oct 13, 2005 09:23 AM

alanit TInforme class
Posted: Thu Feb 10, 2011 03:05 PM

Hello,
As I said, I leave as a contribution the TInforme class I use in my programs of alanit. In the package is the source code of the class, a couple of examples of usage and a document describing the class. The examples in the packet are taken from my program el Puchero, which you can download from http://www.alanit.com and here you have some screen captures

This class is derived from one developed by Manuel Calero Solis, whom I thank for permission to publish the code.

The link to download the class is http://www.box.net/shared/vkvflziqyv
Regards,
José Luis Sánchez

Bayron

Posts: 883

Joined: Thu Dec 24, 2009 12:46 AM

Re: alanit TInforme class
Posted: Thu Feb 10, 2011 08:13 PM

Thanks for sharing, It's for programmers like you, that apprentices like me can actually explore all the possibilities of (x)Harbour and FiveWin...

=====>

Bayron Landaverry
xBasePHP.com
(215)2226600 Philadelphia,PA, USA
MayaBuilders@gMail.com
Guatemala

FWH25.06--Harbour 3.0.0--BCC7.7--UEstudio 10.10
Windows 10

FiveWin, One line of code and it's done...

Silvio

Posts: 3107

Joined: Fri Oct 07, 2005 06:28 PM

Re: alanit TInforme class
Posted: Thu Feb 10, 2011 10:26 PM

Josè, Great !

I not found Ut_BrwRowConfig( oApp():oGrid )

I made a correction on your Tfsdi ...

::nTop = oApp():nHeight-1
instead of ::nTop := oApp():nHeight + 4

because on top you can see a line and the dialog is not near to oBar
this error can be seen when we use xbrowse in that special dialog fsdi

then when on the main window there is Ribbon menu we must change measure of ::nGridBottom !!

IF oApp():ClassName() == "TRIBBONBAR"
::nGridBottom := (::nBottom / 2) - 90
ELSE
::nGridBottom := (::nBottom / 2) - oApp:nHeight
ENDIF

instead of ::nGridBottom := (::nBottom / 2) - oApp():nHeight

Best Regards, Saludos

Falconi Silvio

Silvio

Posts: 3107

Joined: Fri Oct 07, 2005 06:28 PM

Re: alanit TInforme class
Posted: Fri Feb 11, 2011 11:44 AM

Josè,

where I can found these function to test your tInforme class ?

Error: Unresolved external '_HB_FUN_DLGCENTER' referenced from C:\WORK\PRG\FSDI2006\FSDI2006\OBJ\PPROVEED.OBJ
Error: Unresolved external '_HB_FUN_ADJUSTWND' referenced from C:\WORK\PRG\FSDI2006\FSDI2006\OBJ\PPROVEED.OBJ
Error: Unresolved external '_HB_FUN_REGISTRAME' referenced from C:\WORK\PRG\FSDI2006\FSDI2006\OBJ\PPROVEED.OBJ
Error: Unresolved external '_HB_FUN_AGETFONT' referenced from C:\WORK\PRG\FSDI2006\FSDI2006\OBJ\TINFORME.OBJ
Error: Unresolved external '_HB_FUN_SWAPUPARRAY' referenced from C:\WORK\PRG\FSDI2006\FSDI2006\OBJ\TINFORME.OBJ
Error: Unresolved external '_HB_FUN_SWAPDWARRAY' referenced from C:\WORK\PRG\FSDI2006\FSDI2006\OBJ\TINFORME.OBJ
Error: Unresolved external '_HB_FUN_ASCANN' referenced from C:\WORK\PRG\FSDI2006\FSDI2006\OBJ\TINFORME.OBJ
Error: Unresolved external '_HB_FUN_BTITULO' referenced from C:\WORK\PRG\FSDI2006\FSDI2006\OBJ\TINFORME.OBJ
Error: Unresolved external '_HB_FUN_BCAMPO' referenced from C:\WORK\PRG\FSDI2006\FSDI2006\OBJ\TINFORME.OBJ
Error: Unresolved external '_HB_FUN_BPICTURE' referenced from C:\WORK\PRG\FSDI2006\FSDI2006\OBJ\TINFORME.OBJ

Best Regards, Saludos

Falconi Silvio

FiveTech Support Forums

Continue the discussion