Search found 85 matches

by MaxP
Sun Mar 14, 2021 6:32 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Error with PrintImage function after windows 10 update
Replies: 0
Views: 58440

Error with PrintImage function after windows 10 update

Hi All, after the latest windows 10 update Version 20H2 x64 (KB5000802) the oPrn:PrintImage function does not work properly. #include "FiveWin.ch" #include "Image.ch" //----------------------------------------------------------------------------// function Main() LOCAL oDlg, oIma...
by MaxP
Wed Dec 02, 2020 4:51 pm
Forum: All products support
Topic: aprire un Pdf dalla fattura elettronica
Replies: 5
Views: 3367

Re: aprire un Pdf dalla fattura elettronica

Ciao, per leggere un allegato PDF da un file XMl devi leggere tutto il contenuto del nodo <Attachment>, convertirlo con la funzione CMIMEDEC e poi salvare il risultato in un file con estensione .PDF Ad esempio se nella variabile cBuf c'è il contenuto <Attachment> cBuf := CMIMEDEC( cBuf ) Buona serat...
by MaxP
Sat Oct 31, 2020 5:44 pm
Forum: All products support
Topic: Fatturazione Elettronica
Replies: 91
Views: 36464

Re: Fatturazione Elettronica

Ciao Marco, da ottobre puoi iniziare a spedire le nuove fatture, non cambia l'intestazione esistono solo nuove codifiche (sopprattutto il codice TD24 per le fatture differite) e i nuovi codici per il campo Natura IVA. Anche per le fatture ricevute l'unica differenza è gestire questi nuovi codici. Bu...
by MaxP
Tue Oct 27, 2020 2:56 pm
Forum: FiveWin for Harbour/xHarbour
Topic: How to implement GETACTIVE()?
Replies: 31
Views: 5585

Re: How to implement GETACTIVE()?

Ciao Enrico, try this #include "Fivewin.ch" FUNCTION MAIN()         LOCAL oDlg         LOCAL cVr1 := "FIRST" + SPACE( 15 )         LOCAL cVr2 := "SECOND" + SPACE( 14 )                 SET KEY VK_F2 TO MYGET()                 DEFINE DIALOG oDlg TITLE "TEST"    ...
by MaxP
Mon Oct 19, 2020 3:27 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Coordinates Excel-grid.
Replies: 2
Views: 995

Re: Coordinates Excel-grid.

Hi Marc, try this #include "Fivewin.ch" #define msoShapeRectangle       1 FUNCTION MAIN()         LOCAL   oExcel, oWorkBooks, oSheet, oCell1, oCell2                 TRY                 oExcel := TOleAuto():New( "Excel.Application" )         CATCH                 oExcel := NIL    ...
by MaxP
Sun Oct 11, 2020 5:16 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Reading active position the page in a Word-document
Replies: 2
Views: 1018

Re: Reading active position the page in a Word-document

Hello Jack, try this #include "FiveWin.ch" #define wdHorizontalPositionRelativeToPage      5 #define wdVerticalPositionRelativeToPage        6 #define wdDoNotSaveChanges                      0 FUNCTION MAIN()         LOCAL   oWord, oDoc, oSelection, x, y         TRY                 oWord :...
by MaxP
Sun Oct 11, 2020 7:56 am
Forum: FiveWin for Harbour/xHarbour
Topic: DPI aware
Replies: 18
Views: 40144

Re: DPI aware

Ciao Enrico,

try to take a look at this post

https://blogs.windows.com/windowsdevelo ... ktop-apps/

Massimo
by MaxP
Fri Oct 09, 2020 10:15 am
Forum: FiveWin for Harbour/xHarbour
Topic: XBrowse and nomodal dialogs
Replies: 23
Views: 23468

Re: XBrowse and nomodal dialogs

And try with ?

Code: Select all

oBrw:bpainted = { || dbSelectArea( "dbffile" )}
by MaxP
Thu Oct 08, 2020 7:56 am
Forum: FiveWin for Harbour/xHarbour
Topic: Excel Alignment
Replies: 2
Views: 1364

Re: Excel Alignment

Hi Tim, to align some columns to the center try this #include "Fivewin.ch" #define EXC_LEFT        1 #define EXC_RIGHT       4 #define EXC_CENTER      7 FUNCTION MAIN()         LOCAL   oExcel, oWorkBooks, oSheet, oCell         TRY                 oExcel := TOleAuto():New( "Excel.Appli...
by MaxP
Mon Sep 28, 2020 10:14 am
Forum: All products support
Topic: Fatturazione Elettronica
Replies: 91
Views: 36464

Re: Fatturazione Elettronica

Ciao Marco, in realtà la fattura semplificata c'è sempre stata ma viene usata in rarissimi casi (non mi è mai capitato di doverla gestire). Nel nuovo formato i cambiamenti più significativi sono i nuovi codici per la Tipologia documento (sopprattutto il codice TD24 per le fatture differite) e i nuov...
by MaxP
Fri Aug 14, 2020 2:24 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Selectecing mutiple cells in excel
Replies: 8
Views: 1747

Re: Selectecing mutiple cells in excel

Hello Marc, to select multiple cells in one step try to create a string with cell references. #include "FiveWin.ch" FUNCTION MAIN()         LOCAL   oExcel, oWorkBooks, oSheet, oRange                 TRY                 oExcel := TOleAuto():New( "Excel.Application" )         CATCH...
by MaxP
Mon May 11, 2020 8:53 am
Forum: FiveWin for Harbour/xHarbour
Topic: NumtoWord (in a payment receipt)
Replies: 3
Views: 1072

Re: NumtoWord (in a payment receipt)

Hi Silvio, this is a function Gl_NumToE( nNum ) to get a italian word from a number #include "FiveWin.ch" FUNCTION MAIN()         LOCAL   nNum1 := 12345.67, nNum2 := 1234567.89         MsgStop( Gl_NumToE( nNum1 ) )         MsgStop( Gl_NumToE( nNum2 ) ) RETURN NIL /*************************...
by MaxP
Sat May 02, 2020 5:31 pm
Forum: All products support
Topic: Arrotondare un prezzo
Replies: 3
Views: 3642

Re: Arrotondare un prezzo

Ciao Silvio,

devi usare la funzione ROUND(<nNumber>, <nDecimals>)

nDecimals è il numero di decimali a cui vuoi arrotondare

Ad esempio se vuoi arrotondare 8.57 a 9.00

Code: Select all

 ROUND( 8.57, 0 )
Buona serata
by MaxP
Fri Apr 24, 2020 3:16 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Suggestions for bug in VOLUMENAME function
Replies: 0
Views: 5592

Suggestions for bug in VOLUMENAME function

Hello, If the function GetVolumeInformation fails (harddisk.c), a random buffer is returned HB_FUNC( VOLUMENAME ) {    DWORD dwVolumeSerialNumber;    BYTE VolumeNameBuffer[ 256 ];    BYTE FileSystemNameBuffer[ 256 ]; /*****    GetVolumeInformation( hb_pcount() ? hb_parc( 1 ): "C:\\",      ...
by MaxP
Sun Apr 05, 2020 1:23 pm
Forum: All products support
Topic: Lentezza di xBrowse
Replies: 4
Views: 3520

Re: Lentezza di xBrowse

Ciao Marco, utilizzo fivewin sin dalla sua prima versione, sono più di 20 anni, uso pesantemente nei miei programmi la classe xbrowse, in pratica in tutte le liste che devono visualizzare i miei archivi. Fino all'anno scorso utilizzavo una versione datata di fivewin (di circa 10 anni fa) poi mi sono...