Search found 1502 matches

by mastintin
Tue Jan 16, 2018 10:29 am
Forum: FiveWin for Harbour/xHarbour
Topic: ximage rotate and save
Replies: 13
Views: 1663

Re: ximage rotate and save

Silvio , you can use tgdiplus :-) Function saveimage( cSaveName,  Hbitmap , nzoom, nrotate ) local oBmp:= GDIBmp():New( ) oBmp:hbmp := GdiPlusCreateImageFromhBitmap( Hbitmap ) obmp:rotate( nrotate ) obmp:resize(    obmp:GetWidth() * nzoom , obmp:GetHeight()*nzoom ) obmp:save ( cSaveName ) obmp:end()...
by mastintin
Tue Jan 16, 2018 9:31 am
Forum: FiveWin para Harbour/xHarbour
Topic: No existe DEFAULT en Harbour
Replies: 12
Views: 1602

Re: No existe DEFAULT en Harbour

si que existe ... en harbour/include/common.ch #xcommand DEFAULT <v1> TO <x1> [, <vn> TO <xn> ] => ;                                 IF <v1> == NIL ; <v1> := <x1> ; END ;                                 [; IF <vn> == NIL ; <vn> := <xn> ; END ]   si quieres que funcione con la igualdad , incluye en e...
by mastintin
Thu Jan 11, 2018 8:19 am
Forum: Off Topic / Otros temas
Topic: Cristobal Navarro´s birthday !!!
Replies: 10
Views: 1447

Re: Cristobal Navarro´s birthday !!!

Felicidades, Cristobal. :D
by mastintin
Wed Jan 10, 2018 12:02 pm
Forum: FiveWin for Harbour/xHarbour
Topic: error on compilation c++
Replies: 5
Views: 786

Re: error on compilation c++

for bcc7 in prg file .... //------------------------------------------------------------------------------ #pragma BEGINDUMP     #include <windows.h>     #include <hbapi.h>     #include <hbvm.h>     #include <hbapiitm.h>     #include <hbstack.h>  #include <commctrl.h> #include <commoncontrols.h> sta...
by mastintin
Tue Jan 09, 2018 8:12 am
Forum: FiveWin for Harbour/xHarbour
Topic: XIMage Compatibility with Image
Replies: 13
Views: 1745

Re: XIMage Compatibility with Image

Yes. Silvio . HB_FUNC( GDIPLUSIMAGEFROMICO ) from fwh has a bug, in my gdiplus.cpp version is corrected. I have reported it to Cristobal for correction. The code propose by nages is more good solution : :-) static function carga( cFile , oImage ) local hicon := ICON_EXEREAD( cFile, 4  ) local   hBmp...
by mastintin
Mon Jan 08, 2018 9:51 pm
Forum: FiveWin for Harbour/xHarbour
Topic: XIMage Compatibility with Image
Replies: 13
Views: 1745

Re: XIMage Compatibility with Image

other approach is --- static function carga( cFile , oImage ) local hicon := ICON_EXEREAD( cFile, 4  ) local ogbmp := GdiBmp():new() ogbmp:hBmp:= GDIPLUSIMAGEFROMICO( hicon ) ogbmp:save( "icono.png") oimage:SetSource( memoread( "icono.png" ) ) oImage:Refresh() ferase("icono....
by mastintin
Mon Jan 08, 2018 9:31 pm
Forum: FiveWin for Harbour/xHarbour
Topic: XIMage Compatibility with Image
Replies: 13
Views: 1745

Re: XIMage Compatibility with Image

this is good for me ... #include "fivewin.ch" //----------------------------------------------------------------------------// function Main()    local aImages, oWnd, oFont, oBrush, oBrw, oImage    FW_SetUnicode( .t. )    HB_SETCODEPAGE( "UTF8" ) // Harbour (not xHarbour) to disp...
by mastintin
Mon Jan 08, 2018 7:13 pm
Forum: FiveWin for Harbour/xHarbour
Topic: XIMage Compatibility with Image
Replies: 13
Views: 1745

Re: XIMage Compatibility with Image

Silvio .

Code: Select all

ogbmp:hBmp:= GDIPLUSIMAGEFROMICO( hicon )
ogbmp:save( "icono.png")  // is posible png,jpg,bmp,tif 

oImagePreview:SetSource("icono.png" )
oImagePreview:Refresh()
ferase( "icono.png" ) 
ogbmb:end()

 
by mastintin
Mon Jan 08, 2018 3:19 pm
Forum: FiveWin for Harbour/xHarbour
Topic: XIMage Compatibility with Image
Replies: 13
Views: 1745

Re: XIMage Compatibility with Image

Silvio , you resize icon to oPanelPreview:nRight, oPanelPreview:nbottom
in
ogbmp:resize( nWidth,nHeight)

and that is the result exactly what do you get...
by mastintin
Wed Dec 27, 2017 9:28 pm
Forum: FiveWin para Harbour/xHarbour
Topic: OT.: RDP para Windows 10 Home
Replies: 1
Views: 443

Re: OT.: RDP para Windows 10 Home

Si se puede, no se exactamente como de legal es, pero existe un proyecto que consigue hacerlo funcionar perfectamente ( probado ) hasta con la última versión de win10 . mira aqui ... https://github.com/stascorp/rdpwrap/releases se descarga el zip , descarga ( depende de la version ) rfxvmt.dll ( la ...
by mastintin
Fri Dec 15, 2017 5:51 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Building Harbour 3.4 for BCC outside MSYS
Replies: 87
Views: 13820

Re: Building Harbour 3.4 for BCC outside MSYS

mastintin I must be jinxed or hexed .. I made your change I'm running out of ideas :-) ok ,is correct /NODEFAULTLIB:libc see this http://fivetechsupport.com/forums/viewtopic.php?f=3&t=31895&start=0 .. go back to fivehcM.lib and include last xfw.lib https://bitbucket.org/fivetech/fivewin-con...
by mastintin
Thu Dec 14, 2017 8:14 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Building Harbour 3.4 for BCC outside MSYS
Replies: 87
Views: 13820

Re: Building Harbour 3.4 for BCC outside MSYS

if you change this ? %vcdir%\bin\link @msvc.tmp /nologo /NODEFAULTLIB:LIBC /NODEFAULTLIB:msvcrt /force:multiple /nxcompat:NO /subsystem:windows,5.01 /machine:X86 /Ignore:4006 /LIBPATH:c:\Msvc17\lib   to %vcdir%\bin\link @msvc.tmp /nologo  /NODEFAULTLIB:msvcrt /force:multiple /nxcompat:NO /subsystem:...
by mastintin
Thu Dec 14, 2017 4:03 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Building Harbour 3.4 for BCC outside MSYS
Replies: 87
Views: 13820

Re: Building Harbour 3.4 for BCC outside MSYS

Rick Lipkin in link line see : /LIBPATH:c:\vc\lib ok ... in c:\fwh\samples\ For harbour ...create buildhms.bat @ECHO OFF CLS ECHO ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ECHO ³ FiveWin for Harbour 14.09 (MSVC++) Sep. 2014     Harbour development power ³Ü ECHO ³...
by mastintin
Thu Dec 14, 2017 3:12 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Building Harbour 3.4 for BCC outside MSYS
Replies: 87
Views: 13820

Re: Building Harbour 3.4 for BCC outside MSYS

mi compiler line ... %C_BIN_INSTALL%\cl.Exe -TP -W2 -O2 -nologo -c -GA -GS- -EHsc -D_USING_V110_SDK71_ -I%C_INC_INSTALL% -I%HB_INC_INSTALL% -Fo%OBJ% %C%   Mi program run ok ( harbour ) here . console output ... [1]:link.exe @fivemsh.vcl /nologo /force:multiple  /nxcompat:NO /subsystem:windows,5.01 /...
by mastintin
Thu Dec 14, 2017 8:27 am
Forum: FiveWin for Harbour/xHarbour
Topic: Building Harbour 3.4 for BCC outside MSYS
Replies: 87
Views: 13820

Re: Building Harbour 3.4 for BCC outside MSYS

FiveHCM.lib(KEYBRD.obj) : error LNK2019: unresolved external symbol _SendInput referenced in function _HB_FUN_SENDKEY FiveHCM.lib(MENUDRAW.obj) : error LNK2019: unresolved external symbol _GetMenuInfo referenced in function _HB_FUN_HBMPBACK FiveHCM.lib(MENUDRAW.obj) : error LNK2019: unresolved exte...