hwgui-developers — Discussing of HwGUI development

[Hwgui-developers] Same strange behavior with get class.

[Itamar M. L. J. L. <ita...@gm...>]

Hi!
Using dialog with CLIPPER flag.

#include "hwgui.ch"
Function main
LOCAL oDlg, oGetA, cGetA:=space(1), oGetB, cGetB:=space(1), oGetC,
cGetC:=space(10)

SET CONFIRM OFF
INIT DIALOG oDlg CLIPPER AT 100,100 SIZE 500,150

   @ 010,010 get oGetA var cGetA size 40,20 PICTURE "!"

   @ 060,010 say "Type <X> for example, auto skip works with picture" size
350,20

   @ 010,030 get oGetB var cGetB size 40,20 //No picture

   @ 060,030 say "Again, type <X> auto skip not works without picture" size
360,20

   @ 010,060 get oGetC var cGetC size 80,20 PASSWORD

   @ 100,060 say "password show empty space with **********" size 300,20

   @ 020,090 button oBt caption "OK" size 50,30 on click {||
hwg_EndDialog() }

oDlg:Activate(,,,.t.)

Best regards,
Itamar M. Lins Jr.

[Hwgui-developers] Fix hcombo.prg

[Itamar M. L. J. L. <ita...@gm...>]

Hi!
hCombo.prg line 184
      IF ::lText
           IF ::lEdit
                 hwg_Setdlgitemtext( hwg_GetModalHandle(), ::id, ::xValue )
           ELSE
                 i := iif( ValType( ::aItems[1] ) == "A", AScan( ::aItems,
{ |a|a[1] == ::xValue } ), AScan( ::aItems, ::xValue ) )
                 hwg_Combosetstring( ::handle, i )
           ENDIF
     ELSE
I change to:

      IF ::lText
           //IF ::lEdit
           //      hwg_Setdlgitemtext( hwg_GetModalHandle(), ::id, ::xValue
)
           //ELSE

                 i := iif( ValType( ::aItems[1] ) == "A", AScan( ::aItems,
{ |a|a[1] == ::xValue } ), AScan( ::aItems, ::xValue ) )
                 hwg_Combosetstring( ::handle, i )
           //ENDIF
      ELSE
I commented these lines above and now refresh() works with COMBOBOX and
EDIT flag.

Best regards,
Itamar M. Lins Jr.

[Hwgui-developers] :Refresh() erase option of ComboBox with EDIT flag

[Itamar M. L. J. L. <ita...@gm...>]

#include "hwgui.ch"
Function main
LOCAL oDlg, oTab, oX, cX:="FIAT", oBt, oMD, cMD:="FIAT",
aMD:={"FIAT","FORD"}

INIT DIALOG oDlg AT 100,100 SIZE 500,150 ON INIT
{||oMD:refresh(),oX:Refresh()}

//oMD:Refresh() -> This will erase 1 option of combobox with flag EDIT


   @ 010,010 TAB oTab ITEMS {} SIZE 300,90 OF oDlg

   BEGIN PAGE "Tab" OF oTAB

      @ 010,030 get ComboBox oMD var cMD ITEMS aMD TEXT EDIT Size 200,25

       @ 010,060 get ComboBox oX var cX ITEMS aMD TEXT  Size 200,25 //Here
show 1 option correct! Without flag EDIT


   END PAGE OF oTAB

   @ 020,110 button oBt caption "OK" size 50,30 on click {||
hwg_EndDialog() }

oDlg:Activate(,,,.t.)

return nil

Best regards,
Itamar M. Lins Jr.

[Hwgui-developers] Redefinition or duplicate definition.

[Itamar M. L. J. L. <ita...@gm...>]

Hi!
Not necessary add windows.ch this lines.
/* CONSTANTS TO TRACKMOUSEEVENT */
#DEFINE  TME_CANCEL            0x80000000
#DEFINE  TME_HOVER             1
#DEFINE  TME_LEAVE             2

Because already in file hwg_extctrl.ch

I'm sorry, I did not know that.

C:\devl\hwgui\contrib>hbmk2 hwg_extctrl.hbp
hbmk2: Harbour: Compilando m├│dulos...
..\include\hwg_extctrl.ch(3) Warning W0002  Redefinition or duplicate
definition
 of #define TME_CANCEL
..\include\hwg_extctrl.ch(4) Warning W0002  Redefinition or duplicate
definition
 of #define TME_HOVER
..\include\hwg_extctrl.ch(5) Warning W0002  Redefinition or duplicate
definition
 of #define TME_LEAVE

Best regards,
Itamar M. Lins J.

Re: [Hwgui-developers] hBrowseEx error

[Alexander S.K. <al...@be...>]

Itamar M. Lins Jr. Lins пишет:

> Error BASE/1082  Erro nos parâmetros: -
> Called from ->HBROWSEEX:ONEVENT(806)
> Called from ->HWG_DLGBOXINDIRECT(0)
> Called from ->HDIALOG:ACTIVATE(135)
> 
> Line 806 hBrowsEx.prg
> 
> ::MouseWheel( hwg_Loword( wParam ), ::nWheelPress - lParam )
> I change to:
>  ::MouseWheel( hwg_Loword( wParam ), ::nWheelPress - hwg_PtrToUlong( lParam ) )
> 
> Is correct ?

  Yes.

> 
> And other possible problem...  found this...
> 
>>2011-09-29 06:00 UTC-0300 Luis Fernando Basso <lfbasso at via-rs.net <http://via-rs.net>>
> 
>> * include/window.ch <http://window.ch>
>>      + add CONSTANTS TO TRACKMOUSEEVENT
> 
>  >      + #DEFINE  TME_CANCEL
>  >      + #DEFINE  TME_HOVER
>  >      + #DEFINE  TME_LEAVE
>  >    * source/theme.c
>  >      * HB_FUNC( TRACKMOUSEVENT )
>  >        ! added suport to message WM_MOUSEHOVER
> 
> Not found Hwgui 2.19 include\windows.ch <http://windows.ch>
> 

  Yes, it should be added to windows.ch

Regards, Alexander.

[Hwgui-developers] hBrowseEx error

[Itamar M. L. J. L. <ita...@gm...>]

Hi!

Error BASE/1082  Erro nos parâmetros: -
Called from ->HBROWSEEX:ONEVENT(806)
Called from ->HWG_DLGBOXINDIRECT(0)
Called from ->HDIALOG:ACTIVATE(135)

Line 806 hBrowsEx.prg

::MouseWheel( hwg_Loword( wParam ), ::nWheelPress - lParam )
I change to:
 ::MouseWheel( hwg_Loword( wParam ), ::nWheelPress - hwg_PtrToUlong( lParam ) )

Is correct ?

And other possible problem...  found this...

>2011-09-29 06:00 UTC-0300 Luis Fernando Basso <lfbasso at via-rs.net>

> * include/window.ch
>      + add CONSTANTS TO TRACKMOUSEEVENT

>      + #DEFINE  TME_CANCEL
>      + #DEFINE  TME_HOVER
>      + #DEFINE  TME_LEAVE
>    * source/theme.c
>      * HB_FUNC( TRACKMOUSEVENT )
>        ! added suport to message WM_MOUSEHOVER

Not found Hwgui 2.19 include\windows.ch

Best regards,
Itamar M. Lins Jr.

[Hwgui-developers] Get ComboBox bug

[Itamar M. L. J. L. <ita...@gm...>]

Hi!
More other problem with get combobox.

#include "hwgui.ch"
Function main
LOCAL oDlg, oMD, cMD, aMD:={"A","B"}

INIT DIALOG oDlg clipper AT 0,0 SIZE 500,100

@ 010,010 get ComboBox oMD var cMD ITEMS aMD TEXT EDIT valid
{||hwg_msginfo("X"),.t.} Size 160,25

oDlg:Activate(,,,.T.)

Error BASE/1132  Bound error: array access
Called from ->__VALID(275)
Called from ->(b)HCOMBOBOX_NEW(90)
Called from ->ONDLGCOMMAND(335)
Called from ->(b)(_INITSTATICS00003)(0)
Called from ->HDIALOG:ONEVENT(182)
Called from ->HWG_DLGBOXINDIRECT(0)
Called from ->HDIALOG:ACTIVATE(135)
Called from ->MAIN(9)

HWGUI 2.19 Build 4
Date:08/30/15
Time:18:28:29

Best regards,
Itamar M. Lins Jr.

[Hwgui-developers] Some problems with ComboBox control

[Itamar M. L. J. L. <ita...@gm...>]

Hi!
With self container example! Changelog 2489 2015-08-27

#include "hwgui.ch"
Function main
LOCAL oDlg, oTab, oGet, cGet:=space(1), oBt, oMD, cMD:="X",
aMD:={"FIAT","FORD"}


INIT DIALOG oDlg AT 100,100 SIZE 500,120

   @ 010,010 get ComboBox oMD var cMD ITEMS aMD TEXT EDIT Size 200,25 STYLE
ES_UPPERCASE
   //Here, STYLE ES_UPPERCASE not working/not effect

   @ 020,080 button oBt caption "OK" size 50,30 on click {||
hwg_msginfo(cMD),hwg_EndDialog() }
   //Works fine result cMD change if us typing "A","B"...

oDlg:Activate(,,,.t.)

Main2()
return nil

Function Main2
LOCAL oDlg, oTab, oGet, cGet:=space(1), oBt, oMD, cMD:="Y",
aMD:={"FIAT","FORD"}

INIT DIALOG oDlg AT 100,100 SIZE 500,150

 //Here change cMD := "Y" not show in combobox!
 //See that FOCUS not working, use tab/enter to jump between controls, but
fail!

   @ 010,010 TAB oTab ITEMS {} SIZE 300,90 OF oDlg

   BEGIN PAGE "Tab" OF oTAB

        //See that not show "Y"
       @ 010,030 get ComboBox oMD var cMD ITEMS aMD TEXT EDIT Size 200,25
STYLE ES_UPPERCASE
        //Here, STYLE ES_UPPERCASE not working/not effect

       @ 010,060 get oGet var cGet size 40,20

   END PAGE OF oTAB

   @ 020,110 button oBt caption "OK" size 50,30 on click {||
hwg_msginfo(cMD) }
  //Here result of cMD fail! Show always "Y" even us typing  "A","B",...

oDlg:Activate(,,,.t.)

return nil

Best regards,
Itamar M. Lins Jr.

[Hwgui-developers] RichEdit, add method ON CHANGE

[Itamar M. L. J. L. <ita...@gm...>]

Hi!
For compatibility with version 2.17

@ 0,0 RichEdit oEdit TEXT cMemo ;
             OF    oDlgEditor ID ID_TEXTO ;
             COLOR  nCorFonteP ;
             BACKCOLOR nCorFundoP ;
             STYLE  nStyle ;
             ON CHANGE {||cObs:=oEdit:GetText(), IF(lLeitura,
btnSalvar:Disable(), btnSalvar:Enable())};
             ON    GETFOCUS {|| TopoDoc(SB_TOP)};
             FONT   oFont1 ;
             ON OTHERMESSAGES {|this,m,wp,lp| richeditProc( this, m, wp,
lp, lLeitura, cJanela ) }

A request of hwgui 2.17 user,  Alexandre Simões.

Best regards,
Itamar M. Lins Jr.

[Hwgui-developers] ComboBox error

[Itamar M. L. J. L. <ita...@gm...>]

Hi!
...
   @ 520,150 get ComboBox oModelo var cModelo ITEMS aModelos TEXT EDIT Size
160,25
...
cNovo := oModelo:GetValue() //Error here!

Error BASE/1132  Erro de limite: acesso de array
Called from ->HCOMBOBOX:GETVALUE(239)

Best regards,
Itamar M. Lins Jr.

Re: [Hwgui-developers] Shortcuts in menus

[Alain A. <ala...@wa...>]

Le 27/08/2015 13:09, Alexander S.Kresin a écrit :
> Try this simple test:
>
> #include "hwgui.ch"
> Function Main
>     Local oMain
>
>     INIT WINDOW oMain MAIN TITLE "My Second HwGUI sample" AT 100, 100 
> SIZE 400, 300
>
>     MENU OF oMain
>        MENU TITLE "&File"
>           MENUITEM "&Message" ACTION hwg_Msginfo( "Test" )
>           MENUITEM "&Exit" ACTION oMain:Close()
>        ENDMENU
>        MENU TITLE "&Help"
>           MENUITEM "&About" ACTION hwg_Msginfo( "About" )
>        ENDMENU
>     ENDMENU
>
>     ACTIVATE WINDOW oMain
>
> Return Nil
>
>
> Does the underscored letters present here ?
No ...

A+
>
> Regards, Alexander.
>
> ------------------------------------------------------------------------------
> _______________________________________________
> Hwgui-developers mailing list
> Hwg...@li...
> https://lists.sourceforge.net/lists/listinfo/hwgui-developers


-- 
------------------------------------------------------------------------
Alain Aupeix
http://jujuland.pagesperso-orange.fr/
http://pissobi-lacassagne.pagesperso-orange.fr/
------------------------------------------------------------------------
U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-08-17 13:39) |
HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2487)
------------------------------------------------------------------------

Re: [Hwgui-developers] Shortcuts in menus

[Alexander S.K. <al...@be...>]

Alain Aupeix writes:
> Le 26/08/2015 14:34, Alexander S.Kresin a écrit :
>> Alain Aupeix пишет:
>>> Hi,
>>> Shortcuts works, but they the letters aren't underscored
>>>
>>   Hm... They are underscored here. Maybe, you use some special font for 
>> a window ?
> I don't think so:
> 

Try this simple test:

#include "hwgui.ch"
Function Main
    Local oMain

    INIT WINDOW oMain MAIN TITLE "My Second HwGUI sample" AT 100, 100 
SIZE 400, 300

    MENU OF oMain
       MENU TITLE "&File"
          MENUITEM "&Message" ACTION hwg_Msginfo( "Test" )
          MENUITEM "&Exit" ACTION oMain:Close()
       ENDMENU
       MENU TITLE "&Help"
          MENUITEM "&About" ACTION hwg_Msginfo( "About" )
       ENDMENU
    ENDMENU

    ACTIVATE WINDOW oMain

Return Nil


Does the underscored letters present here ?

Regards, Alexander.

Re: [Hwgui-developers] Shortcuts in menus

[Alain A. <ala...@wa...>]

Le 26/08/2015 14:34, Alexander S.Kresin a écrit :
> Alain Aupeix пишет:
>> Hi,
>> Shortcuts works, but they the letters aren't underscored
>>
>   Hm... They are underscored here. Maybe, you use some special font for 
> a window ?
I don't think so:

alain@Gramps-JujuLand:/opt/TuxPrograms/harbour/projects/Hwgui/Maintsys-tool$
cat Maintsys-client.prg|grep "Font("
Local oDlg, oFont := HFont():Add( "Serif",0,-13 )
Local oDlg, oTAB, oIcon, oFont := HFont():Add( "Serif",0,-13 )
Local oDlg, oIcon, oFont := HFont():Add( "Serif",0,-13 )
Local oPartners, oDlg, oFont := HFont():Add( "Serif",0,-13 )
Local oDlg, oFont := HFont():Add( "Serif",0,-13 )
Local fname:="", oPath, oModDlg, oFont := HFont():Add( "Serif",0,-13 ),
oFolders, rFolders, rg
oFont6 := oPrinter:AddFont( "sans",6 )
oFont8 := oPrinter:AddFont( "Times New Roman",8 )
oFont8b:= oPrinter:AddFont( "sans",8,.t. )
oFont8i:= oPrinter:AddFont( "Times New Roman",8,,.t. )
oPrinter:SetFont( oFont8 )
Local rtype, rdate, oDlg, oPrint, oRemove, lPrint:=.t., lRemove:=.f.,
oFont := HFont():Add( "Serif",0,-13 )

Thanks
A+
-- 
------------------------------------------------------------------------
Alain Aupeix
http://jujuland.pagesperso-orange.fr/
http://pissobi-lacassagne.pagesperso-orange.fr/
------------------------------------------------------------------------
U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-08-17 13:39) |
HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2487)
------------------------------------------------------------------------

Re: [Hwgui-developers] Shortcuts in menus

[Alexander S.K. <al...@be...>]

Alain Aupeix пишет:
> Hi,
> Shortcuts works, but they the letters aren't underscored
> 

  Hm... They are underscored here. Maybe, you use some special font for 
a window ?

Regards, Alexander.

[Hwgui-developers] Shortcuts in menus

[Alain A. <ala...@wa...>]

Hi,
Shortcuts works, but they the letters aren't underscored

Seems a bug.
I didn't noticed it before (perhaps I didn't have a clear look)

Thanks
A+
-- 
------------------------------------------------------------------------
Alain Aupeix
http://jujuland.pagesperso-orange.fr/
http://pissobi-lacassagne.pagesperso-orange.fr/
------------------------------------------------------------------------
U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-08-17 13:39) |
HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2487)
------------------------------------------------------------------------

[Hwgui-developers] Warning while make hwgui lib

[Itamar M. L. J. L. <ita...@gm...>]

C:\devl\hwgui>hbmk2 hwgui.hbp
hbmk2: Harbour: Compilando m├│dulos...
hbmk2: Compilando...
../../../../source/winapi/draw.c: In function 'HB_FUN_HWG_DRAWGRADIENT':
../../../../source/winapi/draw.c:1661:57: warning: 'nearest_coord' may be
used u
ninitialized in this function [-Wmaybe-uninitialized]
                coords[j].y = candidates[ nearest_coord ].y;
                                                         ^

Best regards,
Itamar M. Lins Jr.

Re: [Hwgui-developers] Print scripts

[Alain A. <ala...@wa...>]

Le 30/07/2015 16:48, Alain Aupeix a écrit :
> Values with name :
>
> qout(oprinter:nWidth)       // returns 210
> qout(oprinter:nHeight)      // returns 297
>
> Values without name :
>
> qout(oprinter:nWidth)       // returns 208
> qout(oprinter:nHeight)      // returns 295
A point I have noticed, is that in the Linux Print Box and in the tab
concerning the page parameters when using .buffer, paper size and
orientation are gayed, which is not the case without name option.

Could it be another effect of the problem ?

Thanks
A+
-- 
------------------------------------------------------------------------
Alain Aupeix
http://jujuland.pagesperso-orange.fr/
http://pissobi-lacassagne.pagesperso-orange.fr/
------------------------------------------------------------------------
U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-27 23:39) |
HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2474)
------------------------------------------------------------------------

Re: [Hwgui-developers] Print scripts

[Alain A. <ala...@wa...>]

Le 30/07/2015 14:44, Alexander S.Kresin a écrit :
> Alain Aupeix пишет:
>> Hi,
>>
>> I have tried now with name parameters, and I have a problem with size.
>> Having a look to the differences, I see that line:
>>
>> without name //job,589.00,836.00,2.83,2.83,utf8
>> with name      //job,794.09,1122.24,3.78,3.78,utf8
>>
>> I suppose it's was the paper size, but it seems not.
>    The first two are width and height in pixels, the next two - a 
> coefficient ( pixels/mm ) for this print area. So, in both lines values 
> are the almost same, some difference is due to rounding.
Humm ...

Have a look to the differences between the two reports I preview with

INIT PRINTER oPrinter  (sizes of the printer) and INIT PRINTER oPrinter
name cprinter (where cprinter=.buffer, and where the sizes are perhaps
unknown ?)

Here is the skeleton of myfunction :

//
============================================================================
Function CreateScript(ptype)
//
============================================================================
Local oPrinter, oFont, cprinter, cTemp, cScript

oStatus:SetText(" Création d'un script d'impression ...")

cprinter=".buffer"
cScript=ptype+".scr"

//INIT PRINTER oPrinter
INIT PRINTER oPrinter name cprinter

//without name //job,589.00,836.00,2.83,2.83,utf8
//with name    //job,794.09,1122.24,3.78,3.78,utf8
                             
oPrinter:StartDoc(.f.,cScript)
oFont := oPrinter:AddFont( "sans",6 )
oPrinter:StartPage()
oPrinter:SetFont( oFont )

qout(oprinter:nWidth)
qout(oprinter:nHeight)

do case
   case ptype == "Partner"
        oPrinter:Box( 5,5,oPrinter:nWidth-5,oPrinter:nHeight-5 )
        oPrinter:Say( "[[progname]] v[[progvers]] (c)[[progdate]] Alain
Aupeix", 30,10,165,26,DT_CENTER,oFont  )
        oPrinter:Line( 25,25,175,25 )
        oPrinter:Line( 25,5,25,25 )
        oPrinter:Line( 175,5,175,25 )
        oPrinter:Say( "----------", 50,120,150,132,DT_CENTER  )
endcase
oPrinter:Box( 50,134,160,146 )
oFont := oPrinter:AddFont( "sans",8 )
oPrinter:Say( "End Of Report", 50,135,160,146,DT_CENTER  )
oPrinter:EndPage()
oPrinter:EndDoc(cscript)
oPrinter:End()

// Set datas
cTemp=memoread(cScript)
cTemp="script,"+pType+","+dtoc(date())+","+left(time(),5)+","+trim(sUser)+"@"+trim(sMachine)+chr(10)+cTemp
cTemp=strtran(cTemp,"[[progname]]",progname)
cTemp=strtran(cTemp,"[[progvers]]",progvers)
cTemp=strtran(cTemp,"[[progdate]]",progdate)
do case
   case ptype == "Partner"
        cScript=trim(sUser)+"@"+trim(sMachine)+".out"
endcase
memowrit(cScript,cTemp,.f.)

oStatus:SetText("")

Return Nil
============================================================================

Values with name :

qout(oprinter:nWidth)       // returns 210
qout(oprinter:nHeight)      // returns 297

Values without name :

qout(oprinter:nWidth)       // returns 208
qout(oprinter:nHeight)      // returns 295

Don't know if it's the problem, but it bugs me a little ...

Thanks
A+
-- 
------------------------------------------------------------------------
Alain Aupeix
http://jujuland.pagesperso-orange.fr/
http://pissobi-lacassagne.pagesperso-orange.fr/
------------------------------------------------------------------------
U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-27 23:39) |
HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2474)
------------------------------------------------------------------------

Re: [Hwgui-developers] Print scripts

[Alexander S.K. <al...@be...>]

Alain Aupeix пишет:
> Hi,
> 
> I have tried now with name parameters, and I have a problem with size.
> Having a look to the differences, I see that line:
> 
> without name //job,589.00,836.00,2.83,2.83,utf8
> with name      //job,794.09,1122.24,3.78,3.78,utf8
> 
> I suppose it's was the paper size, but it seems not.

   The first two are width and height in pixels, the next two - a 
coefficient ( pixels/mm ) for this print area. So, in both lines values 
are the almost same, some difference is due to rounding.

Regards, Alexander.

[Hwgui-developers] Print scripts

[Alain A. <ala...@wa...>]

Hi,

I have tried now with name parameters, and I have a problem with size.
Having a look to the differences, I see that line:

without name //job,589.00,836.00,2.83,2.83,utf8
with name      //job,794.09,1122.24,3.78,3.78,utf8

I suppose it's was the paper size, but it seems not.

Thanks
A+
-- 
------------------------------------------------------------------------
Alain Aupeix
http://jujuland.pagesperso-orange.fr/
http://pissobi-lacassagne.pagesperso-orange.fr/
------------------------------------------------------------------------
U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-27 23:39) |
HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2474)
------------------------------------------------------------------------

Re: [Hwgui-developers] I need some explanations about oPrinter commands

[Alain A. <ala...@wa...>]

Le 30/07/2015 09:34, Alexander S.Kresin a écrit :
>>>    You may use INIT PRINTER oPrinter NAME "somename.pdf" instead, or 
>>> .png, .svg
>   There is yes another option, it works after yesterday's fixes:
>
> INIT PRINTER oPrinter NAME ".buffer"
>
> It doesn't print to a real printer, doesn't outputs to any format, just 
> creates the script. You may preview the result with oPrinter:Preview() 
> or just use the script as you need.
Nice, thanks
A+
-- 
------------------------------------------------------------------------
Alain Aupeix
http://jujuland.pagesperso-orange.fr/
http://pissobi-lacassagne.pagesperso-orange.fr/
------------------------------------------------------------------------
U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-27 23:39) |
HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2474)
------------------------------------------------------------------------

Re: [Hwgui-developers] I need some explanations about oPrinter commands

[Alexander S.K. <al...@be...>]

>>    You may use INIT PRINTER oPrinter NAME "somename.pdf" instead, or 
>> .png, .svg

  There is yes another option, it works after yesterday's fixes:

INIT PRINTER oPrinter NAME ".buffer"

It doesn't print to a real printer, doesn't outputs to any format, just 
creates the script. You may preview the result with oPrinter:Preview() 
or just use the script as you need.

Regards, Alexander.

Re: [Hwgui-developers] I need some explanations about oPrinter commands

[Alain A. <ala...@wa...>]

Le 29/07/2015 14:25, Alexander S.Kresin a écrit :
> Alain Aupeix пишет:
>> Le 24/07/2015 08:38, Alexander S.Kresin a écrit :
>>> Alain Aupeix пишет:
>>>
>>>   > 2) When I'm just trying to save a script, the linux printer box appears,
>>>> what I dont want.
>>>    How exactly you do it ?
>> Local oPrinter, oFont
>>
>> oStatus:SetText(" Création d'un script d'impression ...")
>>
>> INIT PRINTER oPrinter
>>
>    You may use INIT PRINTER oPrinter NAME "somename.pdf" instead, or 
> .png, .svg - the output will go to a file of appropriate format.
In fact, my goal is to generate a scriptfile, in a second time to
replace some contents by corresponding values, and third to print or
preview the pages.

Using this way, done the trick, even I don't need it (I use pdf), I have
just to remove it, or leave it, and it will be a way to see the
intermediate state.

And I have my script generated without having to close a box :)

Thanks
A+
-- 
------------------------------------------------------------------------
Alain Aupeix
http://jujuland.pagesperso-orange.fr/
http://pissobi-lacassagne.pagesperso-orange.fr/
------------------------------------------------------------------------
U.buntu 12.04 | G.ramps 3.4.9-1 | H.arbour 3.2.0dev (2015-07-24 16:55) |
HbIDE (Rev.316) | Five.Linux (r143) | Hw.Gui (2471)
------------------------------------------------------------------------

Re: [Hwgui-developers] I need some explanations about oPrinter commands

[Alexander S.K. <al...@be...>]

Alain Aupeix пишет:
> Le 24/07/2015 08:38, Alexander S.Kresin a écrit :
>> Alain Aupeix пишет:
>>
>>   > 2) When I'm just trying to save a script, the linux printer box appears,
>>> what I dont want.
>>    How exactly you do it ?
> Local oPrinter, oFont
> 
> oStatus:SetText(" Création d'un script d'impression ...")
> 
> INIT PRINTER oPrinter
>

   You may use INIT PRINTER oPrinter NAME "somename.pdf" instead, or 
.png, .svg - the output will go to a file of appropriate format.


Regards, Alexander.

[Hwgui-developers] hBrowseEx.prg small fix

[Itamar M. L. J. L. <ita...@gm...>]

Hi!
Please remember of add you fix in HbrowseEx.prg line:
829    ->    ::nWheelPress := iif( ::nWheelPress > 0, 0,  lParam  )
to
->       ::nWheelPress := iif( ::nWheelPress > 0, 0, hwg_PtrToUlong( lParam
) )

Best regards,
Itamar M. Lins Jr.