hwgui-developers — Discussing of HwGUI development

[Hwgui-developers] Hwg_CLEARKEYBOARD Fix.

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

Hi!

For your appreciation

>From Luis Basso.

HB_FUNC( HWG_CLEARKEYBOARD )
{
  BYTE kbBuffer[ 256 ];
  int i = 1 ;
  int lClear = TRUE;

  while( lClear == TRUE )
  {
    GetKeyboardState( kbBuffer );
    lClear = FALSE;
    for( i = 0; i < 256; i ++ )
       if( kbBuffer[ i ] & 0x80 )
       {
          s_ClearKeyboard() ;
          lClear = TRUE ;
       }
  }
}

Best regards,
Itamar M. Lins Jr.

Re: [Hwgui-developers] Some problem in current hwgui vs 216a ...

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

oleksa пишет:
> Hi!
> 
> In attach code which create two database db1 and db2 and use two form. Open form start1.xml with browse for db1, press button "Dov", form dov.xml, with browse for db2, will open. Press "Exit", i would to know current alias in this moment, but alias() return empty string, why?
> With hwgui 216a works ok.
> 

  Fixed.

Regards, Alexander.

[Hwgui-developers] flag -nohbc

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

Hi!
remove the flag -nohbc from hwguidyn.hbp
------------------->8----------
>From changelog of Harbour.
    - hbmk2 will _no longer_ automatically process .hbc files in
      current directory. This concept was causing more trouble
      than good, as it turned out. Also removed -nohbc option,
      which has now lost its meaning.
------------8<---------------

Ps. For Alexander, thanks for TIP
      oPopup:SHOW( hwg_getParentForm(this) )
and fix Bug hWindow !

Best regards,
Itamar M. Lins Jr.

Re: [Hwgui-developers] Self container example of bug Tab Control and browse ON RIGHTCLICK

[Alex <al...@be...>]

Hi,

 this bug in in your sample, not in HwGUI. The HTab, as any other control,
really hasn't the "oPopup" member, so the context menu shoul be linked with
the dialog or window. Change the line

   oPopup:SHOW(this:oParent)

to

   oPopup:SHOW(this:oParent:oParent)

or to

   oPopup:SHOW( hwg_getParentForm(this) )

and it will work.

Regards, Alexander.

________________________________________________

[Hwgui-developers] Self container example of bug Tab Control and browse ON RIGHTCLICK

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

#include "hwgui.ch"

Function Main
Local oDlg,oBrw,oTab

ferase("test.dbf")
aStru := {{"field","c",10,0}}
dbcreate("test.dbf",aStru,,.t.,"X")
x->(DbAppend())
x->field := "XXXXXXXXX"


INIT DIALOG oDlg SIZE 400, 400 STYLE WS_SYSMENU+DS_CENTER

@ 20,20 TAB oTab ITEMS {} SIZE 300,300 OF oDlg

BEGIN PAGE "Browse on tab" OF oTAB

@ 10,40 Browse oBrw DataBase of oTAB Size 200,200 ;
               ON RIGHTCLICK {|This,nLine,nCol| ClickLeft(This,nLine,nCol) }

   Add column FieldBlock("field") to oBrw

END PAGE OF oTAB

oDlg:Activate()
Return Nil
close all

Function ClickLeft

Parameters This, nLine, nCol
Local oPopup

      CONTEXT MENU oPopup
        MENUITEM "Teste" ACTION hwg_Msginfo("nada aqui")
      ENDMENU
      oPopup:SHOW(this:oParent)
      //oPopup:End()
Return .t.

PS. See while show dialog of error, the program no close need use
ctrl+alt+del for kill process :(

Best regards,
Itamar M. Lins Jr.

Re: [Hwgui-developers] Hwgui-developers Digest, Vol 69, Issue 3

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

Hi!
This example demonstrates correct the problem !
Only if open another Dialog for valid clause

#include "hwgui.ch"

Function Main
Local oDlg, oObjGet, cVarGet := "1"
INIT DIALOG oDlg SIZE 120, 120 STYLE WS_SYSMENU+DS_CENTER
@ 10,10 get oObjGet var cVarGet  Size 55,20 VALID {||FuncXYZ()}

@ 10,50 BUTTON "Ok" ON CLICK {||close()}

oDlg:Activate()
Return Nil

Function close
 hwg_EndDialog()
return .t.

Function FuncXYZ
Local oDlg, oObjGet, cVarGet := "1"
INIT DIALOG oDlg SIZE 120, 120 STYLE WS_SYSMENU+DS_CENTER

@ 10,50 BUTTON "Ok" ON CLICK {||hwg_endDialog()}

oDlg:Activate()
Return .t.

*Best regards,
Itamar M. Lins Jr.
*
2013/3/16 <hwg...@li...>

> Send Hwgui-developers mailing list submissions to
>         hwg...@li...
>
> To subscribe or unsubscribe via the World Wide Web, visit
>         https://lists.sourceforge.net/lists/listinfo/hwgui-developers
> or, via email, send a message with subject or body 'help' to
>         hwg...@li...
>
> You can reach the person managing the list at
>         hwg...@li...
>
> When replying, please edit your Subject line so it is more specific
> than "Re: Contents of Hwgui-developers digest..."
>
>
> Today's Topics:
>
>    1. Re: hwg_Textout() warning (oleksa)
>    2. Re: HWG_SETFOCUS (Alexander S.Kresin)
>    3. Re: hwg_Textout() warning (Alexander S.Kresin)
>    4. No maker hwguidyn.hbp (Itamar M. Lins Jr. Lins)
>    5. Context menu browse of TAB control (Itamar M. Lins Jr. Lins)
>    6. Re: Context menu browse of TAB control (Alexander S.Kresin)
>    7. Serious Bug Dialog Get with Valid no close
>       (Itamar M. Lins Jr. Lins)
>    8. Re: Serious Bug Dialog Get with Valid no close (Alex)
>
>
> ----------------------------------------------------------------------
>
> Message: 1
> Date: Mon, 11 Mar 2013 23:23:32 +0200
> From: "oleksa" <m.o...@uk...>
> Subject: Re: [Hwgui-developers] hwg_Textout() warning
> To: hwg...@li...
> Message-ID: <851...@ff...>
> Content-Type: text/plain; charset="windows-1251"
>
> Hi!
>
> We have CLASS hWinPrn (textout not used) or i sought bad win_prn.
>
> Regards,
> Alexey Myronenko
>
>   --- ??????????? ???????????? ---
>  ??? ????: "Itamar M. Lins Jr. Lins" <ita...@gm...>
>   ????: 11 ??????? 2013, 20:28:06
>
>
> > Hi!
> > The Class win_prn use Textout
> >
> > I use snr2 utility and change this line below
> >
> > oPrn := win_prn():New(cPrint)
> > ...
> > oPrn:hwg_Textout("XXX",.t.)
> >
> >
> >
> > Error BASE/1004 ?Message not found: WIN_PRN:HWG_TEXTOUT
> > Called from ->__ERRRT_SBASE(0)
> > Called from ../../../tobject.prg->WIN_PRN:ERROR(0)
> > Called from ../../../tobject.prg->(b)HBOBJECT(0)
> >
> > Called from ../../../tobject.prg->WIN_PRN:MSGNOTFOUND(0)
> > Called from ../../../tobject.prg->WIN_PRN:HWG_TEXTOUT(0)
> >
> >
> > Obviously?clase win_prn not use function hwg_textout.
> >
> >
> > Best regards,
> > Itamar M. Lins Jr.
> >
> >
> >
> ------------------------------------------------------------------------------
> > Symantec Endpoint Protection 12 positioned as A LEADER in The Forrester
> > Wave(TM): Endpoint Security, Q1 2013 and "remains a good choice" in the
> > endpoint security space. For insight on selecting the right partner to
> > tackle endpoint security challenges, access the full report.
> > http://p.sf.net/sfu/symantec-dev2dev
> >
> > _______________________________________________
> > Hwgui-developers mailing list
> > Hwg...@li...
> > https://lists.sourceforge.net/lists/listinfo/hwgui-developers
>
>
>
> ------------------------------
>
> Message: 2
> Date: Tue, 12 Mar 2013 10:35:12 +0400
> From: "Alexander S.Kresin" <al...@be...>
> Subject: Re: [Hwgui-developers] HWG_SETFOCUS
> To: Hwgui Desenvolvedores <hwg...@li...>
> Message-ID: <513...@be...>
> Content-Type: text/plain; charset=ISO-8859-1; format=flowed
>
> Itamar M. Lins Jr. Lins ?????:
> > !Hi
> > I get erro while use HWG_SETFOCUS() in HEDIT or HBROWSE.
> >
> > Error BASE/1004  Message not found: HEDIT:HWG_SETFOCUS
> > ...
>
>   This goes somewhere from your prg, isn't it ? There is something like
> oEdit:hwg_Setfocus() ?
>
> So, as I wrote before, you need to change the method calls
> oEdit:hwg_Setfocus() to oEdit:Setfocus() in your prgs.
>
> Regards, Alexander.
>
>
>
> ------------------------------
>
> Message: 3
> Date: Tue, 12 Mar 2013 11:07:33 +0400
> From: "Alexander S.Kresin" <al...@be...>
> Subject: Re: [Hwgui-developers] hwg_Textout() warning
> To: Hwgui Desenvolvedores <hwg...@li...>
> Message-ID: <513...@be...>
> Content-Type: text/plain; charset=ISO-8859-1; format=flowed
>
> Itamar M. Lins Jr. Lins ?????:
> > Hi!
> > The Class win_prn use Textout
> >
> > I use snr2 utility and change this line below
> >
> > oPrn := win_prn():New(cPrint)
> > ...
> >      oPrn:hwg_Textout("XXX",.t.)
> >
> > Error BASE/1004  Message not found: WIN_PRN:HWG_TEXTOUT
> > Called from ->__ERRRT_SBASE(0)
> > Called from ../../../tobject.prg->WIN_PRN:ERROR(0)
> > Called from ../../../tobject.prg->(b)HBOBJECT(0)
> > Called from ../../../tobject.prg->WIN_PRN:MSGNOTFOUND(0)
> > Called from ../../../tobject.prg->WIN_PRN:HWG_TEXTOUT(0)
> >
> > Obviously clase win_prn not use function hwg_textout.
> >
>
>    There was textout() function in drawtext.c, which is renamed now to
> hwg_textout() and appropriate rule is included in hwgcompat.ch.
>    As I understand, you use a win_prn class from harbour\contrib\hbwin,
> which have :textout() method and after using the snr2 lines like
> oPrn:textout() was changed to oPrn:hwg_textout(). this may occur not
> only with :textout() method, but with some other win_prn methods, which
> have names identical to the names of HwGUI functions.
>    You can search all occurrences of :hwg_ in you prgs and drop the hwg_
> from there or you can use snr2 again to fix all such things, for example:
>
>     snr2 -s:hwg_ -i: -w- -b -v *.prg
>
> This will change all ":hwg_" to ":" - i.e. drop all hwg_ prefixes from
> method calls. The -w- swith is needed here to turn off "Whole words"
> option.
>
> Regards, Alexander.
>
>
>
> ------------------------------
>
> Message: 4
> Date: Thu, 14 Mar 2013 17:56:33 -0300
> From: "Itamar M. Lins Jr. Lins" <ita...@gm...>
> Subject: [Hwgui-developers] No maker hwguidyn.hbp
> To: hwg...@li...
> Message-ID:
>         <CAHGjjAqbZ1m4rx43n63skhK=
> HFW...@ma...>
> Content-Type: text/plain; charset="iso-8859-1"
>
> C:\devl\hwgui>hbmk2 hwguidyn.hbp -rebuild
> hbmk2: Harbour: Compilando m?dulos...
> Error F0034  Bad command line option 'no'
> hbmk2: Erro: Executando o compilador Harbour (interno): 1
> (c:\hb32\bin\harbour.exe) -n1 source\herrsys.prg source\hipedit.prg
> source\draww
> idg.prg source\guimain.prg source\barcode.prg source\hbrowse.prg
> source\hcheck.p
> rg source\hcombo.prg source\hcontrol.prg source\hctrlex.prg
> source\hcwindow.prg
> source\hdatepic.prg source\hdialog.prg source\hedit.prg source\hfreeimg.prg
> sour
> ce\hgraph.prg source\hgrid.prg source\hgridex.prg source\hlistbox.prg
> source\hto
> ol.prg source\hmonthc.prg source\htrackbr.prg source\hanimat.prg source\
> hnice.pr
> g source\hownbtn.prg source\hpanel.prg source\hprinter.prg
> source\hprogres.prg s
> ource\hradio.prg source\hpager.prg source\hrebar.prg source\hriched.prg
> source\h
> sayimg.prg source\hshbtn.prg source\hsplash.prg source\hsplit.prg source\
> htab.pr
> g source\htimer.prg source\htree.prg source\hrect.prg source\hupdown.prg
> source\
> hwindow.prg source\hwinprn.prg source\menu.prg source\printdos.prg source\
> hdc.pr
> g source\hhyper.prg -nohbc -n1 -q0 -w -es2 -olib\.hbmk\win\mingw\hbdyn\
> -ic:\HB3
> 2\include -iinclude
>
> Best regards,
> Itamar M. Lins Jr.
> -------------- next part --------------
> An HTML attachment was scrubbed...
>
> ------------------------------
>
> Message: 5
> Date: Thu, 14 Mar 2013 18:54:12 -0300
> From: "Itamar M. Lins Jr. Lins" <ita...@gm...>
> Subject: [Hwgui-developers] Context menu browse of TAB control
> To: hwg...@li...
> Message-ID:
>         <
> CAH...@ma...>
> Content-Type: text/plain; charset="iso-8859-1"
>
> Hi!
>
> Error BASE/1005  Message not found: HTAB:_OPOPUP
> Called from ->__ERRRT_SBASE(0)
> Called from ../../../tobject.prg->HTAB:ERROR(0)
> Called from ../../../tobject.prg->(b)HBOBJECT(0)
> Called from ../../../tobject.prg->HTAB:MSGNOTFOUND(0)
> Called from ../../../tobject.prg->HTAB:_OPOPUP(0)
> Called from source\menu.prg->HMENU:SHOW(34)
>
> Hwgui  * $Id: Changelog 2019 2013-03-14 10:53:33Z omm $
>
> Best regards,
> Itamar M. Lins Jr.
> -------------- next part --------------
> An HTML attachment was scrubbed...
>
> ------------------------------
>
> Message: 6
> Date: Fri, 15 Mar 2013 10:09:21 +0400
> From: "Alexander S.Kresin" <al...@be...>
> Subject: Re: [Hwgui-developers] Context menu browse of TAB control
> To: Hwgui Desenvolvedores <hwg...@li...>
> Message-ID: <514...@be...>
> Content-Type: text/plain; charset=ISO-8859-1; format=flowed
>
> Itamar M. Lins Jr. Lins writes:
> > Hi!
> >
> > Error BASE/1005  Message not found: HTAB:_OPOPUP
> > Called from ->__ERRRT_SBASE(0)
> > Called from ../../../tobject.prg->HTAB:ERROR(0)
> > Called from ../../../tobject.prg->(b)HBOBJECT(0)
> > Called from ../../../tobject.prg->HTAB:MSGNOTFOUND(0)
> > Called from ../../../tobject.prg->HTAB:_OPOPUP(0)
> > Called from source\menu.prg->HMENU:SHOW(34)
> >
>
>   Hmm... HTab really hasn't and never had oPopup member.
> Did this work before ?
> Could you provide a small sample to demonstrate a problem ?
>
>
> Regards, Alexander.
>
>
>
> ------------------------------
>
> Message: 7
> Date: Fri, 15 Mar 2013 20:02:51 -0300
> From: "Itamar M. Lins Jr. Lins" <ita...@gm...>
> Subject: [Hwgui-developers] Serious Bug Dialog Get with Valid no close
> To: hwg...@li...
> Message-ID:
>         <CAHGjjApQX=7QQi4pz_qyCBeVNyOfvGr0VgOk29fmoeF=
> cR...@ma...>
> Content-Type: text/plain; charset="iso-8859-1"
>
> Hi!
>
> Local oDlg
> INIT DIALOG oDlg ... Style WS_SYSMENU+DS_CENTER
> //Same if I click in Close Dialog [x] into window no close :(
>
> @ x,y get oObjGet var cVarGet  Size 55,20 VALID {||FuncXYZ(...)}
>
> @ a,b button  ... on click {||close()} // No close dialog
>
> oDlg:Activate()
>
> Function close
> //If I add oDlg:Close()
> //or add oDlg:End()
> //or hwg_EndDialog()
> //No close dialog :(
> return .t.
>
> Function FuncXYZ
> Local oDlg
> INIT Dialog ...
> ...
> oDlg:Activate()
>
> Return .T.
>
> Best regards,
> Itamar M. Lins Jr.
> -------------- next part --------------
> An HTML attachment was scrubbed...
>
> ------------------------------
>
> Message: 8
> Date: Sat, 16 Mar 2013 11:16:59 +0400
> From: Alex <al...@be...>
> Subject: Re: [Hwgui-developers] Serious Bug Dialog Get with Valid no
>         close
> To: hwg...@li...
> Message-ID: <144bf11847118334fb5fe16c2d2042b2@83.234.176.3>
> Content-Type: text/plain;       charset="koi8-r"
>
>  I can't confirm this. The following simple snippet works normaly:
>
> #include "hwgui.ch"
> Function Main
> Local oDlg, oObjGet, cVarGet := "1"
> INIT DIALOG oDlg SIZE 120, 120 STYLE WS_SYSMENU+DS_CENTER
> @ 10,10 get oObjGet var cVarGet  Size 55,20 // VALID {||FuncXYZ(...)}
>
> @ 10,50 BUTTON "Ok" ON CLICK {||close()}
>
> oDlg:Activate()
> Return Nil
>
> Function close
>  hwg_EndDialog()
> return .t.
>
>
> ________________________________________________
>
>
>
>
>
> ------------------------------
>
>
> ------------------------------------------------------------------------------
> Everyone hates slow websites. So do we.
> Make your web apps faster with AppDynamics
> Download AppDynamics Lite for free today:
> http://p.sf.net/sfu/appdyn_d2d_mar
>
> ------------------------------
>
> _______________________________________________
> Hwgui-developers mailing list
> Hwg...@li...
> https://lists.sourceforge.net/lists/listinfo/hwgui-developers
>
>
> End of Hwgui-developers Digest, Vol 69, Issue 3
> ***********************************************
>

Re: [Hwgui-developers] Serious Bug Dialog Get with Valid no close

[Alex <al...@be...>]

 I can't confirm this. The following simple snippet works normaly:

#include "hwgui.ch"
Function Main
Local oDlg, oObjGet, cVarGet := "1"
INIT DIALOG oDlg SIZE 120, 120 STYLE WS_SYSMENU+DS_CENTER
@ 10,10 get oObjGet var cVarGet  Size 55,20 // VALID {||FuncXYZ(...)}

@ 10,50 BUTTON "Ok" ON CLICK {||close()}

oDlg:Activate()
Return Nil

Function close
 hwg_EndDialog()
return .t.


________________________________________________

[Hwgui-developers] Serious Bug Dialog Get with Valid no close

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

Hi!

Local oDlg
INIT DIALOG oDlg ... Style WS_SYSMENU+DS_CENTER
//Same if I click in Close Dialog [x] into window no close :(

@ x,y get oObjGet var cVarGet  Size 55,20 VALID {||FuncXYZ(...)}

@ a,b button  ... on click {||close()} // No close dialog

oDlg:Activate()

Function close
//If I add oDlg:Close()
//or add oDlg:End()
//or hwg_EndDialog()
//No close dialog :(
return .t.

Function FuncXYZ
Local oDlg
INIT Dialog ...
...
oDlg:Activate()

Return .T.

Best regards,
Itamar M. Lins Jr.

Re: [Hwgui-developers] Context menu browse of TAB control

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

Itamar M. Lins Jr. Lins writes:
> Hi!
> 
> Error BASE/1005  Message not found: HTAB:_OPOPUP
> Called from ->__ERRRT_SBASE(0)
> Called from ../../../tobject.prg->HTAB:ERROR(0)
> Called from ../../../tobject.prg->(b)HBOBJECT(0)
> Called from ../../../tobject.prg->HTAB:MSGNOTFOUND(0)
> Called from ../../../tobject.prg->HTAB:_OPOPUP(0)
> Called from source\menu.prg->HMENU:SHOW(34)
> 

  Hmm... HTab really hasn't and never had oPopup member.
Did this work before ?
Could you provide a small sample to demonstrate a problem ?


Regards, Alexander.

[Hwgui-developers] Context menu browse of TAB control

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

Hi!

Error BASE/1005  Message not found: HTAB:_OPOPUP
Called from ->__ERRRT_SBASE(0)
Called from ../../../tobject.prg->HTAB:ERROR(0)
Called from ../../../tobject.prg->(b)HBOBJECT(0)
Called from ../../../tobject.prg->HTAB:MSGNOTFOUND(0)
Called from ../../../tobject.prg->HTAB:_OPOPUP(0)
Called from source\menu.prg->HMENU:SHOW(34)

Hwgui  * $Id: Changelog 2019 2013-03-14 10:53:33Z omm $

Best regards,
Itamar M. Lins Jr.

[Hwgui-developers] No maker hwguidyn.hbp

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

C:\devl\hwgui>hbmk2 hwguidyn.hbp -rebuild
hbmk2: Harbour: Compilando módulos...
Error F0034  Bad command line option 'no'
hbmk2: Erro: Executando o compilador Harbour (interno): 1
(c:\hb32\bin\harbour.exe) -n1 source\herrsys.prg source\hipedit.prg
source\draww
idg.prg source\guimain.prg source\barcode.prg source\hbrowse.prg
source\hcheck.p
rg source\hcombo.prg source\hcontrol.prg source\hctrlex.prg
source\hcwindow.prg
source\hdatepic.prg source\hdialog.prg source\hedit.prg source\hfreeimg.prg
sour
ce\hgraph.prg source\hgrid.prg source\hgridex.prg source\hlistbox.prg
source\hto
ol.prg source\hmonthc.prg source\htrackbr.prg source\hanimat.prg source\
hnice.pr
g source\hownbtn.prg source\hpanel.prg source\hprinter.prg
source\hprogres.prg s
ource\hradio.prg source\hpager.prg source\hrebar.prg source\hriched.prg
source\h
sayimg.prg source\hshbtn.prg source\hsplash.prg source\hsplit.prg source\
htab.pr
g source\htimer.prg source\htree.prg source\hrect.prg source\hupdown.prg
source\
hwindow.prg source\hwinprn.prg source\menu.prg source\printdos.prg source\
hdc.pr
g source\hhyper.prg -nohbc -n1 -q0 -w -es2 -olib\.hbmk\win\mingw\hbdyn\
-ic:\HB3
2\include -iinclude

Best regards,
Itamar M. Lins Jr.

Re: [Hwgui-developers] hwg_Textout() warning

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

Itamar M. Lins Jr. Lins ?????:
> Hi!
> The Class win_prn use Textout
> 
> I use snr2 utility and change this line below
> 
> oPrn := win_prn():New(cPrint)
> ...
>      oPrn:hwg_Textout("XXX",.t.)
> 
> Error BASE/1004  Message not found: WIN_PRN:HWG_TEXTOUT
> Called from ->__ERRRT_SBASE(0)
> Called from ../../../tobject.prg->WIN_PRN:ERROR(0)
> Called from ../../../tobject.prg->(b)HBOBJECT(0)
> Called from ../../../tobject.prg->WIN_PRN:MSGNOTFOUND(0)
> Called from ../../../tobject.prg->WIN_PRN:HWG_TEXTOUT(0)
> 
> Obviously clase win_prn not use function hwg_textout.
> 

   There was textout() function in drawtext.c, which is renamed now to 
hwg_textout() and appropriate rule is included in hwgcompat.ch.
   As I understand, you use a win_prn class from harbour\contrib\hbwin, 
which have :textout() method and after using the snr2 lines like 
oPrn:textout() was changed to oPrn:hwg_textout(). this may occur not 
only with :textout() method, but with some other win_prn methods, which 
have names identical to the names of HwGUI functions.
   You can search all occurrences of :hwg_ in you prgs and drop the hwg_ 
from there or you can use snr2 again to fix all such things, for example:

    snr2 -s:hwg_ -i: -w- -b -v *.prg

This will change all ":hwg_" to ":" - i.e. drop all hwg_ prefixes from 
method calls. The -w- swith is needed here to turn off "Whole words" option.

Regards, Alexander.

Re: [Hwgui-developers] HWG_SETFOCUS

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

Itamar M. Lins Jr. Lins ?????:
> !Hi
> I get erro while use HWG_SETFOCUS() in HEDIT or HBROWSE.
> 
> Error BASE/1004  Message not found: HEDIT:HWG_SETFOCUS
> ...

  This goes somewhere from your prg, isn't it ? There is something like 
oEdit:hwg_Setfocus() ?

So, as I wrote before, you need to change the method calls 
oEdit:hwg_Setfocus() to oEdit:Setfocus() in your prgs.

Regards, Alexander.

Re: [Hwgui-developers] hwg_Textout() warning

[oleksa <m.o...@uk...>]

Hi!

We have CLASS hWinPrn (textout not used) or i sought bad win_prn.

Regards,
Alexey Myronenko

  --- Оригінальне повідомлення ---
 Від кого: "Itamar M. Lins Jr. Lins" <ita...@gm...>
  Дата: 11 березня 2013, 20:28:06
 
 
> Hi!
> The Class win_prn use Textout
> 
> I use snr2 utility and change this line below
> 
> oPrn := win_prn():New(cPrint)
> ...
> oPrn:hwg_Textout("XXX",.t.)
> 
> 
> 
> Error BASE/1004  Message not found: WIN_PRN:HWG_TEXTOUT
> Called from ->__ERRRT_SBASE(0)
> Called from ../../../tobject.prg->WIN_PRN:ERROR(0)
> Called from ../../../tobject.prg->(b)HBOBJECT(0)
> 
> Called from ../../../tobject.prg->WIN_PRN:MSGNOTFOUND(0)
> Called from ../../../tobject.prg->WIN_PRN:HWG_TEXTOUT(0)
> 
> 
> Obviously clase win_prn not use function hwg_textout.
> 
> 
> Best regards,
> Itamar M. Lins Jr.
> 
> 
> ------------------------------------------------------------------------------
> Symantec Endpoint Protection 12 positioned as A LEADER in The Forrester  
> Wave(TM): Endpoint Security, Q1 2013 and "remains a good choice" in the  
> endpoint security space. For insight on selecting the right partner to 
> tackle endpoint security challenges, access the full report. 
> http://p.sf.net/sfu/symantec-dev2dev
> 
> _______________________________________________
> Hwgui-developers mailing list
> Hwg...@li...
> https://lists.sourceforge.net/lists/listinfo/hwgui-developers

[Hwgui-developers] hwg_Textout() warning

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

Hi!
The Class win_prn use Textout

I use snr2 utility and change this line below

oPrn := win_prn():New(cPrint)
...
     oPrn:hwg_Textout("XXX",.t.)

Error BASE/1004  Message not found: WIN_PRN:HWG_TEXTOUT
Called from ->__ERRRT_SBASE(0)
Called from ../../../tobject.prg->WIN_PRN:ERROR(0)
Called from ../../../tobject.prg->(b)HBOBJECT(0)
Called from ../../../tobject.prg->WIN_PRN:MSGNOTFOUND(0)
Called from ../../../tobject.prg->WIN_PRN:HWG_TEXTOUT(0)

Obviously clase win_prn not use function hwg_textout.

Best regards,
Itamar M. Lins Jr.

[Hwgui-developers] HWG_SETFOCUS

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

!Hi
I get erro while use HWG_SETFOCUS() in HEDIT or HBROWSE.

Error BASE/1004  Message not found: HEDIT:HWG_SETFOCUS
Called from ->__ERRRT_SBASE(0)
Called from ../../../tobject.prg->HEDIT:ERROR(0)
Called from ../../../tobject.prg->(b)HBOBJECT(0)
Called from ../../../tobject.prg->HEDIT:MSGNOTFOUND(0)
Called from ../../../tobject.prg->HEDIT:HWG_SETFOCUS(0)

 * $Id: Changelog 2013 2013-03-11 10:06:00Z alkresin $

Harbour SVN 3.2

Best regards,
Itamar M. Lins Jr.

[Hwgui-developers] warning 'HB_FUN_HWG_GETPPSERASE':

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

Hi!
hbmk2: Harbour: Compilando módulos...
hbmk2: Compilando...
../../../../source/draw.c: In function 'HB_FUN_HWG_GETPPSERASE':
../../../../source/draw.c:90:18: warning: initialization makes integer from
poin
ter without a cast [enabled by default]

Harbour 3.2.0dev (Rev. 18909)
Copyright (c) 1999-2013, http://harbour-project.org/

Harbour Build Info
---------------------------
Version: Harbour 3.2.0dev (Rev. 18909)
Compiler: MinGW GNU C 4.7.2 (32-bit)
Platform: Windows 7 6.1.7601 Service Pack 1
PCode version: 0.3
ChangeLog last entry: 2013-03-11 12:07 UTC+0100 Viktor Szakats (harbour
syenar.n
et)
ChangeLog ID: ChangeLog.txt 18909 2013-03-11 11:14:16Z vszakats
Built on: Mar 11 2013 10:21:46
Build options: (Clipper 5.3b) (Clipper 5.x undoc)
---------------------------

Best regards,
Itamar M. Lins Jr.

Re: [Hwgui-developers] Message not found: HBROWSE:HWG_SETFOCUS

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

Itamar M. Lins Jr. Lins ?????:
> Hi!
> 
>  * $Id: Changelog 2012 2013-03-07 09:03:56Z alkresin $
> 
> I get this error:
>   
> oDlg:bOnActivate := {||oBrw:Top(),oBrw:hwg_Setfocus()}
> 
>

   Where from this line is ? I've cleaned such occasions in HWGUI samples.
   If this appeared in your application after the mass search and 
replace, you need to change the oBrw:hwg_Setfocus() to oBrw:Setfocus(), 
because the methods name aren't prefixed. And check your code, searching 
for ":hwg_".

Regards, Alexander.

Re: [Hwgui-developers] SETDLGKEY

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

Itamar M. Lins Jr. Lins ?????:
> Hi!
>  * $Id: Changelog 2012 2013-03-07 09:03:56Z alkresin $
> 
> SET KEY 0,VK_F1 TO {||Help()}
> 
> Error: Referenced, missing, but unknown function(s): SETDLGKEY()
> 

  Fixed - I forgot to upload the changes in guilib.ch while last commit.

Regards, Alexander.

[Hwgui-developers] Message not found: HBROWSE:HWG_SETFOCUS

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

Hi!

 * $Id: Changelog 2012 2013-03-07 09:03:56Z alkresin $

I get this error:

oDlg:bOnActivate := {||oBrw:Top(),oBrw:hwg_Setfocus()}

Error BASE/1004  Message not found: HBROWSE:HWG_SETFOCUS
Called from ->__ERRRT_SBASE(0)
Called from ../../../tobject.prg->HBROWSE:ERROR(0)
Called from ../../../tobject.prg->(b)HBOBJECT(0)
Called from ../../../tobject.prg->HBROWSE:MSGNOTFOUND(0)
Called from ../../../tobject.prg->HBROWSE:HWG_SETFOCUS(0)


Best regards,
Itamar M. Lins Jr.

[Hwgui-developers] SETDLGKEY

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

Hi!
 * $Id: Changelog 2012 2013-03-07 09:03:56Z alkresin $

SET KEY 0,VK_F1 TO {||Help()}

Error: Referenced, missing, but unknown function(s): SETDLGKEY()


Best regards,
Itamar M. Lins Jr.

[Hwgui-developers] A lot of function names has been changed

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

  Hi All,

   I've changed all HwGUI function names, adding the hwg_ prefix. Sorry 
for any inconvenience.

   I recommend you to change all HwGUI function calls in your programs 
with the help of my snr2 utility: http://kresin.belgorod.su/snr.html

   The recommended syntax is:

	snr2 -hc:\hwgui\include\hwgcompat.ch -f -r -b *.prg

   ( Of course, your path to hwgcompat.ch may differ. ) This will change 
all the prgs in the current directory and its subdirectories, original 
files will be saved with .orig extension. If you omit the -b option:

	snr2 -hc:\hwgui\include\hwgcompat.ch -f -r *.prg

the changes will be saved in new files with .new extension and the 
original files will remains the same.

  The operation will be logged into snr2.log file. If you want the full 
info about changed lines to be logged, add the -v option to the snr2 
command line.



Regards, Alexander.

[Hwgui-developers] Browse On RIGHCLICK

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

Hi!

Not work on TAB control

Error BASE/1005  Message not found: HTAB:_OPOPUP
Called from ->__ERRRT_SBASE(0)
Called from ../../../tobject.prg->HTAB:ERROR(0)
Called from ../../../tobject.prg->(b)HBOBJECT(0)
Called from ../../../tobject.prg->HTAB:MSGNOTFOUND(0)
Called from ../../../tobject.prg->HTAB:_OPOPUP(0)
Called from source\menu.prg->HMENU:SHOW(34)


@ 13,60 BROWSE oBrowse1 DATABASE SIZE 536,290 OF oTab ;
STYLE WS_TABSTOP ;
ON RIGHTCLICK {|This, nLine,nCol| oBrowse1_onRightClick( This, nLine,nCol )
}

FUNCTION oBrowse1_onRightClick
Parameters This, nLine,nCol
LOCAL oPopup

CONTEXT MENU oPopup
MENUITEM "Reset to default" ACTION MsgINFO('1')
SEPARATOR
MENUITEM "Zoom" ACTION msginfo("Not yet!")
ENDMENU

oPopup:SHOW( this:oParent )
DBSKIP( nLine - This:rowPos )
This:refresh()
return nil

Best regards,

Itamar M. Lins Jr.

Re: [Hwgui-developers] Some problem in current hwgui vs 216a ...

[oleksa <m.o...@uk...>]

Ok, i see where this function is caused, FUNCTION InitControls( oWnd, lNoActivate )

Regards,
Alexey Myronenko

  --- Оригінальне повідомлення ---
 Від кого: "oleksa" <m.o...@uk...>
 Кому: hwg...@li...
 Дата: 27 лютого 2013, 09:13:35
 Тема: Re: [Hwgui-developers] Some problem in current hwgui vs 216a ...
 
 


> Hi!
> 
> I don't understand the next behaviour of hbrowse, look at method acivate:
> 
> METHOD Activate() CLASS HBrowse
> 
> IF ! Empty( ::oParent:handle )
> ::handle := CreateBrowse( ::oParent:handle, ::id, ;
> ::style, ::nLeft, ::nTop, ::nWidth, ::nHeight )
> ::Init()
> ENDIF
> 
> RETURN NIL
> 
> oParent:handle is 0, and method init() must not be executed and ::initbrw(,.T.) in ::init() also, but they executed, why?
> Can anyone point me to right way?
> 
> Regards,
> Alexey Myronenko
> 
> 
> --- Оригінальне повідомлення ---
> Від кого: "oleksa" <m.o...@uk...>
> Кому: hwg...@li...
> Дата: 26 лютого 2013, 11:54:24
> Тема: Re: [Hwgui-developers] Some problem in current hwgui vs 216a ...
> 
> 
> 
> 
> > Hi!
> > 
> > The method initbrw of hbrowse called twice (from method NEW, then from method INIT), and when call ::initbrw(,.T.) the alias() is empty, i can't find that place where workarea is changed. Who can look at this moment? Later i will check this situation at pure prg code.
> > 
> > Regards,
> > Alexey Myronenko
> > 
> > --- Оригінальне повідомлення ---
> > Від кого: "oleksa" <m.o...@uk...>
> > Кому: hwg...@li...
> > Дата: 25 лютого 2013, 16:39:12
> > Тема: [Hwgui-developers] Some problem in current hwgui vs 216a ...
> > 
> > 
> > 
> > 
> > > Hi!
> > > 
> > > In attach code which create two database db1 and db2 and use two form. Open form start1.xml with browse for db1, press button "Dov", form dov.xml, with browse for db2, will open. Press "Exit", i would to know current alias in this moment, but alias() return empty string, why?
> > > With hwgui 216a works ok.
> > > 
> > > Regards,
> > > Alexey Myronenko
> > > 
> > > ------------------------------------------------------------------------------
> > > Everyone hates slow websites. So do we.
> > > Make your web apps faster with AppDynamics
> > > Download AppDynamics Lite for free today:
> > > http://p.sf.net/sfu/appdyn_d2d_feb
> > > 
> > > _______________________________________________
> > > Hwgui-developers mailing list
> > > Hwg...@li...
> > > https://lists.sourceforge.net/lists/listinfo/hwgui-developers
> > 
> > ------------------------------------------------------------------------------
> > Everyone hates slow websites. So do we.
> > Make your web apps faster with AppDynamics
> > Download AppDynamics Lite for free today:
> > http://p.sf.net/sfu/appdyn_d2d_feb
> > _______________________________________________
> > Hwgui-developers mailing list
> > Hwg...@li...
> > https://lists.sourceforge.net/lists/listinfo/hwgui-developers
> 
> ------------------------------------------------------------------------------
> Everyone hates slow websites. So do we.
> Make your web apps faster with AppDynamics
> Download AppDynamics Lite for free today:
> http://p.sf.net/sfu/appdyn_d2d_feb
> _______________________________________________
> Hwgui-developers mailing list
> Hwg...@li...
> https://lists.sourceforge.net/lists/listinfo/hwgui-developers

Re: [Hwgui-developers] Some problem in current hwgui vs 216a ...

[oleksa <m.o...@uk...>]

Hi!

I don't understand the next behaviour of hbrowse, look at method acivate:

METHOD Activate() CLASS HBrowse

   IF ! Empty( ::oParent:handle )
      ::handle := CreateBrowse( ::oParent:handle, ::id, ;
         ::style, ::nLeft, ::nTop, ::nWidth, ::nHeight )
      ::Init()
   ENDIF

   RETURN NIL

oParent:handle is 0, and method init() must not be executed and ::initbrw(,.T.) in ::init() also, but they executed, why?
Can anyone point me to right way?

Regards,
Alexey Myronenko


  --- Оригінальне повідомлення ---
 Від кого: "oleksa" <m.o...@uk...>
 Кому: hwg...@li...
 Дата: 26 лютого 2013, 11:54:24
 Тема: Re: [Hwgui-developers] Some problem in current hwgui vs 216a ...
 
 


> Hi!
> 
> The method initbrw of hbrowse called twice (from method NEW, then from method INIT), and when call ::initbrw(,.T.) the alias() is empty, i can't find that place where workarea is changed. Who can look at this moment? Later i will check this situation at pure prg code.
> 
> Regards,
> Alexey Myronenko
> 
> --- Оригінальне повідомлення ---
> Від кого: "oleksa" <m.o...@uk...>
> Кому: hwg...@li...
> Дата: 25 лютого 2013, 16:39:12
> Тема: [Hwgui-developers] Some problem in current hwgui vs 216a ...
> 
> 
> 
> 
> > Hi!
> > 
> > In attach code which create two database db1 and db2 and use two form. Open form start1.xml with browse for db1, press button "Dov", form dov.xml, with browse for db2, will open. Press "Exit", i would to know current alias in this moment, but alias() return empty string, why?
> > With hwgui 216a works ok.
> > 
> > Regards,
> > Alexey Myronenko
> > 
> > ------------------------------------------------------------------------------
> > Everyone hates slow websites. So do we.
> > Make your web apps faster with AppDynamics
> > Download AppDynamics Lite for free today:
> > http://p.sf.net/sfu/appdyn_d2d_feb
> > 
> > _______________________________________________
> > Hwgui-developers mailing list
> > Hwg...@li...
> > https://lists.sourceforge.net/lists/listinfo/hwgui-developers
> 
> ------------------------------------------------------------------------------
> Everyone hates slow websites. So do we.
> Make your web apps faster with AppDynamics
> Download AppDynamics Lite for free today:
> http://p.sf.net/sfu/appdyn_d2d_feb
> _______________________________________________
> Hwgui-developers mailing list
> Hwg...@li...
> https://lists.sourceforge.net/lists/listinfo/hwgui-developers