New FTDN April 2015 (FWH 15.04)

New FTDN April 2015 (FWH 15.04)

Postby Antonio Linares » Sat Apr 25, 2015 7:44 am

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:

viewtopic.php?p=174212#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.
viewtopic.php?f=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:

viewtopic.php?p=174911#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
User avatar
Antonio Linares
Site Admin
 
Posts: 41205
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: New FTDN April 2015 (FWH 15.04)

Postby luisduque » Wed Apr 29, 2015 8:27 pm

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
luisduque
 
Posts: 133
Joined: Mon May 12, 2008 4:13 pm
Location: Venezuela

Re: New FTDN April 2015 (FWH 15.04)

Postby Antonio Linares » Mon May 04, 2015 8:26 pm

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: 41205
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: New FTDN April 2015 (FWH 15.04)

Postby Antonio Linares » Wed May 06, 2015 3:34 pm

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-contributions/downloads/peinfo.exe
regards, saludos

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

Re: New FTDN April 2015 (FWH 15.04)

Postby fgondi » Wed May 06, 2015 10:42 pm

Un saludo
Fernando González Diez
ALSIS Sistemas Informáticos
User avatar
fgondi
 
Posts: 694
Joined: Fri Oct 07, 2005 6:58 am
Location: Palencia, España

Re: New FTDN April 2015 (FWH 15.04) Solucionado

Postby luisduque » Wed May 06, 2015 11:35 pm

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
luisduque
 
Posts: 133
Joined: Mon May 12, 2008 4:13 pm
Location: Venezuela

Re: New FTDN April 2015 (FWH 15.04)

Postby Antonio Linares » Thu May 07, 2015 6:12 am

gracias Fernando! :-)
regards, saludos

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


Return to WhatsNew / Novedades

Who is online

Users browsing this forum: No registered users and 7 guests