New FTDN April 2015 (FWH 15.04)

Post Reply
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

New FTDN April 2015 (FWH 15.04)

Post by Antonio Linares »

April 2015
==========

* New: Class TBar Method Redefine(). We explain here why this should not
be used, though anyhow we have implemented it in case someone needs it:

http://forums.fivetechsupport.com/viewt ... 12#p174212
Sample: barfrmrc.prg, barfrmrc.rc

* New: Buttonbar and buttons can now be defined along with defining dialog.
It is not any more necessary to define bar and buttons in ON INIT clause.
sample: barondlg.prg

* Enhancement: dialog.prg: Data or codeblocks assigned to lCentered, lCenterInWnd,
lModal, bLClicked, bRClicked, bWhen, bValid, bInit, bPainted are used by
Activate() method if not overriden in the ACTIVATE command.

* Enhancement: XBrowse MakeTotals(): It is now possible to total calculated
values of a column. If oCol:bSumCondition is assigned with a codeblock,
this block is evaluated with two parameters Column's Value and Column
Object. The value is considered for totalling only if the return value
is .T.. Now the codeblock can replace the value with a calculated value
In that case the replaced value is considered for totalling instead of
the original value.
Example:
oCol:nFooterType := AGGR_SUM
oCol:bSumCondition := { |nValue, o| If( oBrw:DRCR:Value == 'D', nValue := -nValue, nil ), .T. }

* New: XBrowse METHOD RefreshHeaders() to repaint Headers only.

* Fix: database.prg. Long fieldnames are not properly recoginized. now fixed.
http://forums.fivetechsupport.com/viewt ... =6&t=30447

* Improvement: TScrollPanel class (scrlpanl.prg) is now touch friendly.
User can push up or pull down the panel with finger or pressing the mouse
anywhere on the panel area (not occupied by controls)

* Enhancement: TMataFile class (tmetafil.prg) can now handle WMF files too

* Fix: Class TImage had some 64 bits bugs. Now it is ok:

http://forums.fivetechsupport.com/viewt ... 11#p174911

* Enhancement: TSwitch.prg: Now Checkbox style is painted using programmer
specified colors instead of using hardcoded colors.

* Enhancement: Pivot functions in adofuncs.prg now accept complex sql
select statements too instead of table names.

* New: function OfficeExtractImage( cOfficeFileX, [ lReExtract := .f. ] ).
--> cThumbNailFile ( Empty string when fails )
Similar to IExtractImage function, this function Extracts thumbnail
emf, wmf, jpg from docx,xlsx,pptx if the file is saved with thumbnail.
file \source\function\olefuncs.prg

* Enhancement: BtnBmp: COLOR clause added to BtnBmp command.

* Fix: Translate SQL UPDATE in fwsqlcmd.ch: Converting single quotes in
where clause to double quotes. Fixed now.

* New: TXBrowse and TXBrwColumn: Methods AddVar( uVar, uVal )
We can create new DATA for specific instances of browse or column.
Eg: oBrw:AddVar( "aMySelect", {} )
AAdd( oBrw:aMySelect, RECNO() )
We can also add codeblocks:
Eg:
oBrw:AddVar( "ToggleRec", ;
< |Self|
local nAt
if ( nAt := AScan( ::aMySelect, RECNO() ) ) > 0
ADel( ::aMySelect, nAt, .t. )
else
AAdd( ::aMySelect, RECNO() )
endif
return nil
> )
Now, we can use this like a method:
oBrw:ToggleRec()
This can also be used for any specific column

* Enhancement: XBrowse: Now support for viewing EMF files also as image files,
using oCol:cDataType := 'F'

* Enhancement: TRect():New(...) now accepts windows RECT structue as character
buffer, in addition to array or t,l,b,r coordinates.

* New function in TMetaFil.prg
GETEMFSIZE( hMeta/cMetaFile, [ hDC/lScreen/NIL ], [ @nWidth ], [ @nHeight ] )
--> { nWidth, nHeight }
If second parameter is omitted or NIL, width and height are returned in MM
If hDC or lScreen, width and height are in pixels for the device context

* New function ISENHMETA( hobj ) --> lIsEnhMeta

* New: Simple stack implementation though xcommand/xtranlate directives
in fivewin.ch:
StackPush( v1, v2, ... vn )
StackPeek() --> last item pushed
StackPop() --> Last Item pushed and removes it from stack
IsStachEmpty() --> logical
Example Usage:
StackPush( recno(), ordsetfocus(), select() )
...
Select( StackPop() )
OrdSetFocus( StackPop() )
DbGoTo( StackPop() )
regards, saludos

Antonio Linares
www.fivetechsoft.com
luisduque
Posts: 133
Joined: Mon May 12, 2008 4:13 pm
Location: Venezuela
Contact:

Re: New FTDN April 2015 (FWH 15.04)

Post by luisduque »

Maestro Antonio.

En windows XP al ejecutar un simple ejemplo TestGet me sale Aplicación WIN32 no es valida, trabajo con

if exist "%ProgramFiles%\Microsoft Visual Studio 12.0\VC\vcvarsall.bat" call "%ProgramFiles%\Microsoft Visual Studio 12.0\VC\vcvarsall.bat"
if exist "%ProgramFiles(x86)%\Microsoft Visual Studio 12.0\VC\vcvarsall.bat" call "%ProgramFiles(x86)%\Microsoft Visual Studio 12.0\VC\vcvarsall.bat"

y bien en windows 7 y windows 8

es mas en 64bit me trabaja bien en windows 7 y windows 8

en 64bits en windows server 2012 tambien me da error

Gracias

Fivewin 15.04
Fivewin 16.11
Harbour 3.2.0
Visual Studio 2015 community
MariaDb/MySql

Ing. MSc. Luis Duque
http://www.accasoft.net
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Re: New FTDN April 2015 (FWH 15.04)

Post by Antonio Linares »

New FWH 15.04 build 2:

* Fix: function OfficeExtractImage() in olefuncs.prg: This was not working
with Harbour due to some issues with the version of HB_UnzipFile() of
Harbour. Workaround implemented.

* Enhancement: TXImage class. New Method Rotate( nDegrees )

* Fix: XBrowse: OrdKeyGoTo(n) is not working for ADS when there is
no controlling index. Workaround implemented.

* Visual Studio Community Edition (free) is supported
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Re: New FTDN April 2015 (FWH 15.04)

Post by Antonio Linares »

Luis,
En windows XP al ejecutar un simple ejemplo TestGet me sale Aplicación WIN32 no es valida
He intentado usar XP en VirtualBox en Windows 10 (build 10074) pero no funciona asi que de momento no puedo probarlo.

Imagino que el EXE intentará usar alguna función de una DLL que no esté en Windows 10.

Si usas este programa podrás ver las referencias externas y te ayudará a identificar cual puede ser la que no proporciona XP:
https://bitbucket.org/fivetech/fivewin- ... peinfo.exe
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
fgondi
Posts: 636
Joined: Fri Oct 07, 2005 6:58 am
Location: Palencia, España
Contact:

Re: New FTDN April 2015 (FWH 15.04)

Post by fgondi »

Un saludo
Fernando González Diez
ALSIS GHE Sistemas Informáticos
luisduque
Posts: 133
Joined: Mon May 12, 2008 4:13 pm
Location: Venezuela
Contact:

Re: New FTDN April 2015 (FWH 15.04) Solucionado

Post by luisduque »

fgondi,

Efectivamente era eso, claro anteriormente con mi buildh32 servia porque tenia estos parametros
"%VCINSTALLDIR%"bin\link @msvc.tmp /nologo /subsystem:windows,5.01 /force:multiple /NODEFAULTLIB:msvcrt /machine:X86 /nxcompat:NO /Ignore:4006

Muchas gracias solucionado.
Fivewin 16.11
Harbour 3.2.0
Visual Studio 2015 community
MariaDb/MySql

Ing. MSc. Luis Duque
http://www.accasoft.net
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Re: New FTDN April 2015 (FWH 15.04)

Post by Antonio Linares »

gracias Fernando! :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
Post Reply