Search found 85 matches

Go to advanced search

by MaxP
Fri Apr 03, 2020 10:58 am
Forum: FiveWin for Harbour/xHarbour
Topic: Number to Char like Excel
Replies: 3
Views: 424

Re: Number to Char like Excel

Try this FUNCTION cGExcCol( nCol )         LOCAL   cCol := "", nTmp         IF nCol > 26                 nTmp := INT( nCol / 26 )                 IF nTmp > 26                         RETURN 0                 ENDIF                 cCol += CHR( ASC( "@" ) + nTmp )         ENDIF    ...
by MaxP
Wed Mar 25, 2020 2:50 pm
Forum: All products support
Topic: Interlinea in Word
Replies: 2
Views: 2889

Re: Interlinea in Word

Ciao Romeo,

aggiungi queste righe

Code: Select all

oSel:ParagraphFormat:LineSpacingRule := 0
oSel:ParagraphFormat:SpaceAfter = 0
Buona serata
Massimo
by MaxP
Wed Mar 25, 2020 2:48 pm
Forum: FiveWin for Harbour/xHarbour
Topic: vertical line spacing in Word
Replies: 4
Views: 1926

Re: vertical line spacing in Word

Ciao Romeo,

add this lines

Code: Select all

oSel:ParagraphFormat:LineSpacingRule := 0
oSel:ParagraphFormat:SpaceAfter = 0
Buona serata
Massimo
by MaxP
Mon Feb 17, 2020 7:33 am
Forum: FiveWin for Harbour/xHarbour
Topic: Bug in TBTNBMP Class FWH 19.12 ?
Replies: 8
Views: 1303

Re: Bug in TBTNBMP Class FWH 19.12 ?

Hi Carlos, I propose you to modify your source as below    Function Main()       LOCAL oDlg, oBtn1, oBtn2, oRad, nOpr:=1       LOCAL lSelecc:=.F. , lNoEsc := .F.       LOCAL aItems := {"Opcion 1","Opcion 2","Opcion 3","Opcion 4","Opcion 5"}       DEF...
by MaxP
Fri Feb 07, 2020 2:15 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Date of the last file change
Replies: 8
Views: 1123

Re: Date of the last file change

Hi Marco, I send you an example with LastAccess and LastWrite #include "Fivewin.ch" FUNCTION MAIN()         LOCAL   dDate                 dDate := FCREATEDATE( "C:\TEST.PDF" )                                 MsgStop( dDate )                 dDate := FLACCESSDATE( "C:\TEST.PD...
by MaxP
Fri Feb 07, 2020 6:33 am
Forum: FiveWin for Harbour/xHarbour
Topic: Date of the last file change
Replies: 8
Views: 1123

Re: Date of the last file change

Another solution #include "Fivewin.ch" FUNCTION MAIN()         LOCAL   dDate                 dDate := FCREATEDATE( "C:\TEST.PDF" )                         MsgStop( dDate ) RETURN NIL #pragma BEGINDUMP #include <windows.h> #include "hbapi.h" HB_FUNC( FCREATEDATE ) {     ...
by MaxP
Thu Feb 06, 2020 11:03 am
Forum: FiveWin for Harbour/xHarbour
Topic: Change the bitmap of GET ACTION
Replies: 2
Views: 492

Re: Change the bitmap of GET ACTION

Hi, try this code REDEFINE GET oPsw VAR cPsw ID 102 OF oDlg FONT oFont PASSWORD UPDATE ;     BITMAP "BTN_SHOWPSW" ;     ACTION ( oPsw:lPassword := !oPsw:lPassword, ;              oPsw :oBtn:LoadBitmap( IIF( oPsw:lPassword, "BTN_SHOWPSW", "BTN_HIDEPSW" ) ), ;            ...
by MaxP
Thu Jan 23, 2020 4:53 pm
Forum: FiveWin for Harbour/xHarbour
Topic: oPen with printer
Replies: 5
Views: 478

Re: oPen with printer

Try

DEFINE PEN oPen1 WIDTH nPixel COLOR CLR_HBLUE OF oPrn
by MaxP
Thu Jan 23, 2020 4:23 pm
Forum: FiveWin for Harbour/xHarbour
Topic: oPen with printer
Replies: 5
Views: 478

Re: oPen with printer

How the pen is created in the source code ?
by MaxP
Fri Dec 06, 2019 11:40 am
Forum: FiveWin for Harbour/xHarbour
Topic: shellexec or winexec
Replies: 5
Views: 635

Re: shellexec or winexec

To run a second program in the same directory

Code: Select all

#include "FiveWin.ch"


FUNCTION Main()
        LOCAL   cPathProgr := cFilePath( GetModuleFileName( GetInstance() ) )
        
        WinExec( cPathProgr + "PROGR2.EXE" )
RETURN NIL
by MaxP
Fri Nov 29, 2019 3:02 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Problem with paths with utf8 characters (solved)
Replies: 5
Views: 523

Re: Problem with paths with utf8 characters (solved)

Old Tools used:
Fivewin 7.01
Harbour 1.0
Borland 5.82

New Tools used:
Fivewin 19.09
Harbour 3.2.0
Borland 5.82
by MaxP
Fri Nov 29, 2019 2:50 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Problem with paths with utf8 characters (solved)
Replies: 5
Views: 523

Re: Problem with paths with utf8 characters

Ok, I think I understood the problem, perhaps this information could also be useful to others. My editor saved data in ASCII format, and with my old version of fivewin it worked. With the new version the ASCII format sources produce the error. Saving data in UTF8 format and adding the HB_SETCODEPAGE...
by MaxP
Fri Nov 29, 2019 9:07 am
Forum: FiveWin for Harbour/xHarbour
Topic: Problem with paths with utf8 characters (solved)
Replies: 5
Views: 523

Problem with paths with utf8 characters (solved)

Hi all, I have a problem with paths with utf8 characters. In my old version of fivewin the example source below worked, in the new version does not work. #include "Fivewin.ch" FUNCTION MAIN()         LOCAL   cNameF := "C:\Conformità\TEST.PDF"         MsgStop( FILE( cNameF ) )    ...
by MaxP
Fri Nov 22, 2019 9:15 am
Forum: FiveWin for Harbour/xHarbour
Topic: Suggestions for changes to the TRichEdit5 class
Replies: 1
Views: 339

Suggestions for changes to the TRichEdit5 class

Hi Antonio, I suggest these changes to the TRichEdit5 class 1) bug on resize image in InsertBitmap METHOD InsertBitmap( hBitmap, nSizeX, nSizeY, lSpecial ) CLASS TRichEdit5    local oClp    DEFAULT lSpecial := .F.    #ifndef _WIN64 /*****       ::InsertPicture5( hBitmap ) */       ::InsertPicture5( ...
by MaxP
Mon Nov 11, 2019 8:26 am
Forum: FiveWin for Harbour/xHarbour
Topic: Problem with the TREBAR class on Windows XP (solved)
Replies: 16
Views: 1508

Re: Problem with the TREBAR class on Windows XP (solved)

Hi Antonio,

now it works properly, thank you for your professionalism

Massimo

Go to advanced search