FiveTech Software tech support forums

... is a problem when I create the prg and the dialog have a folder then it not create any controls are into the folder I think we must modify the cGenPrg method of window class line 1304 if ! Empty( ::aControls ) cPrg += CRLF AEval( ::aControls, { | oCtrl | cPrg += oCtrl:cGenPRG( lDlgUnits ) } ...

... error ( NIL ) I replaced the info with ??? On TRADIO and TDATEPICK ::cVarName exists but returns NIL All other controls are working. from : METHOD cGenPRG( lDlgUnits ) CLASS TDatePick ... ... cPrg += CRLF + " @ " + cTop + ", " + cLeft + ; " DTPICKER " + ::cVarName ...

... COLORS clause has not been defined, or a style defined - Minor bug clause UPPERMENU: fixed * TBAR: Added clause DESIGN * FOLDEREX: Added METHOD cGenPRG * function FW_CdxCreate( [caTagList], [lMemory] ). Added new optional parameter lMemory to create indexes in memory. * fwh\samples\customer.dbf: ...

... is a problem when I create the prg and the dialog have a folder then it not create any controls are into the folder I think we must modify the cGenPrg method of window class line 1304 if ! Empty( ::aControls ) cPrg += CRLF AEval( ::aControls, { | oCtrl | cPrg += oCtrl:cGenPRG( lDlgUnits ) } ...

... now support bitmaps controls too: http://forums.fivetechsupport.com/viewtopic.php?p=196228#p196228 * Enhancement: Class TBitmap Method cGenPRG() was missing. * Fix: Classes TSay and TGet Method cGenPrg() were not using the supplied parameter lDlgUnits. Now it is ok: http://forums.fivetechsupport.com/viewtopic.php?p=196242#p196242 ...

Otto,

I have to check if METHODs cGenPrg() are respecting the TRUEPIXEL status

... BASE/1081 Argument error: + Args: [ 1] = C DEFINE WINDOW [ 2] = U Stack Calls =========== Called from: .\source\classes\WINDOW.PRG => TRADIO:CGENPRG( 1447 ) Called from: .\source\classes\WINDOW.PRG => (b)TWINDOW_CGENPRG( 1468 ) Called from: => AEVAL( 0 ) Called from: .\source\classes\WINDOW.PRG ...

...              WINDOW.PRG      598   682   776   776   782  1597  1664  1665  2359  2361                   2363  3445  3449  3451  3452  3456 CGENPRG()              (function  in ?)    WINDOW.PRG      598  1597  1620  1639  1649  1659 CHECKTOOLTIP()         (function  in ?)    WINDOW.PRG   ...

...            cCueText, cVarName ) CONSTRUCTOR  Pongo el metodo modificado que a mi si me funciona .: METHOD cGenPrg( lDlgUnits) CLASS TGet   // cambiado   local nFactorX, nFactorY   local cTop, cLeft, cWidth, cHeight   local cCode := ""DEFAULT ...

Es una mejora menor para el metodo cGenprg(): METHOD New( ).......//  DEFAULT cVarName := "oBtnBmp" + ::GetCtrlIndex()    ::cVarName = "oBtnBmp" + ::GetCtrlIndex()    //cVarName  ----- por añadir como parametro  ...

La mejora consiste en añadir el Metodo cGenprg ( que no tiene ) : METHOD New( )... ::cVarName := "oBmp" + ::GetCtrlIndex()...Return nilMETHOD cGenPRG( lDlgUnits )   CLASS TBitmap   local ...

Existe un pequeño bug en Tdialog , y es que no se asigna en el New la Data cVarName . Cuando queremos ejecutar el metodo cGenprg () lanza error al ser cVarName Nil .
Saludos.

... New: function SetPageUnit2Pixel() used from CgiPlus Class Graphics: http://forums.fivetechsupport.com/viewtopic.php?p=142316#p142316 * Fix: Method cGenPrg of font class is improved. Now the font generated with the output of the method exactly matches the original font. * Fix: There was a bug in ...

... &cText )//----------------------------------------------------------------------------//  Now, these functions and also cGenPrg method of oFont should work reliably

Dear Mr. Rao, this is the output of your file: {"Calibri", 0, -19, .F., .F., 0, 0, , .F., .F., .F., 0,3, 2, 1, ,34} This of method cGenPrg: 'Calibri', 0, -19, .f., .f., 0, 0, 400, .f., .f., .f., 0,3, 2, 1, , 34 ) There is a difference in one value. I think this value is ::nWeight . ...