ON OTHERMESSAGES

[Pablo César]

I saw in this morning interecting in Browser example with "ON OTHERMESSAGES" in hwgui.

It sems is present in almost all compounents and I think that would it be so great to have it at HMG.

[danielmaximiliano]

You can upload the compiled sample to see the features?
or send it to me at my email danielmaximiliano@yahoo.com.ar

[Pablo César]

Hola Daniel, gracias por responder. No hé trabajo com hwgui todavia, pero en el forum de PCToledo, vi vários ejemplos:

Hi Daniel, thanks to answer. I have not worked yet with hwgui, but in PCToledo forum there are some samples:

http://www.pctoledo.com.br/forum/viewto ... 482#p79480
http://www.pctoledo.com.br/forum/viewto ... GES#p77213
http://www.pctoledo.com.br/forum/viewto ... GES#p52359

Y este otro: / And this
http://br.dir.groups.yahoo.com/group/hw ... ssage/9121

Very interesting, I also wish to know more about it.

[danielmaximiliano]

Hola Pablo :
descargue HWgui desde http://sourceforge.net/projects/hwgui/
descomprimi el .rar y con TextCrawler busque "OTHERMESSAGES" sin ningun resultado.

TextCrawler_2012-11-16_15-57-44.jpg (96.03 KiB) Viewed 4436 times

me dispuse a buscar dentro de Guilib.ch para ver como esta conformado el control Browse

Code: Select all

#xcommand @ <x>,<y> BROWSE [ <oBrw> ]  ;
            [ <lArr: ARRAY> ]          ;
            [ <lDb: DATABASE> ]        ;
            [ OF <oWnd> ]              ;
            [ ID <nId> ]               ;
            [ SIZE <width>, <height> ] ;
            [ ON INIT <bInit> ]        ;
            [ ON SIZE <bSize> ]        ;
            [ ON PAINT <bDraw> ]       ;
            [ ON CLICK <bEnter> ]      ;
            [ ON GETFOCUS <bGfocus> ]  ;
            [ ON LOSTFOCUS <bLfocus> ] ;
            [ STYLE <nStyle> ]         ;
            [ <lNoVScr: NO VSCROLL> ]  ;
            [ <lNoBord: NOBORDER> ]    ;
            [ FONT <oFont> ]           ;
            [ <lAppend: APPEND> ]      ;
            [ <lAutoedit: AUTOEDIT> ]  ;
            [ ON UPDATE <bUpdate> ]    ;
            [ ON KEYDOWN <bKeyDown> ]  ;
            [ ON POSCHANGE <bPosChg> ] ;
            [ <lMulti: MULTISELECT> ]  ;
            [ <lDescend: DESCEND> ]    ; // By Marcelo Sturm (marcelo.sturm@gmail.com)
            [ WHILE <bWhile> ]         ; // By Luiz Henrique dos Santos (luizhsantos@gmail.com)
            [ FIRST <bFirst> ]         ; // By Luiz Henrique dos Santos (luizhsantos@gmail.com)
            [ LAST <bLast> ]           ; // By Marcelo Sturm (marcelo.sturm@gmail.com)
            [ FOR <bFor> ]             ; // By Luiz Henrique dos Santos (luizhsantos@gmail.com)
            [ <class: CLASS> <classname> ] ;
          => ;
    [<oBrw> :=] __IIF(<.class.>, <classname>, HBrowse)():New( Iif(<.lDb.>,BRW_DATABASE,Iif(<.lArr.>,BRW_ARRAY,0)),;
        <oWnd>,<nId>,<nStyle>,<x>,<y>,<width>,<height>,<oFont>,<bInit>,<bSize>, ;
        <bDraw>,<bEnter>,<bGfocus>,<bLfocus>,<.lNoVScr.>,<.lNoBord.>, <.lAppend.>,;
        <.lAutoedit.>, <bUpdate>, <bKeyDown>, <bPosChg>, <.lMulti.>, <.lDescend.>,;
        <bWhile>, <bFirst>, <bLast>, <bFor> )

#xcommand REDEFINE BROWSE [ <oBrw> ]   ;
            [ <lArr: ARRAY> ]          ;
            [ <lDb: DATABASE> ]        ;
            [ <lFlt: FILTER> ]        ;
            [ OF <oWnd> ]              ;
            ID <nId>                   ;
            [ ON INIT <bInit> ]        ;
            [ ON SIZE <bSize> ]        ;
            [ ON PAINT <bDraw> ]       ;
            [ ON CLICK <bEnter> ]      ;
            [ ON GETFOCUS <bGfocus> ]  ;
            [ ON LOSTFOCUS <bLfocus> ] ;
            [ ON OTHER MESSAGE <bOther>] ;
            [ FONT <oFont> ]           ;
          => ;
    [<oBrw> :=] HBrowse():Redefine( Iif(<.lDb.>,BRW_DATABASE,Iif(<.lArr.>,BRW_ARRAY,Iif(<.lFlt.>,BRW_FILTER,0))),;
        <oWnd>,<nId>,<oFont>,<bInit>,<bSize>,<bDraw>,<bEnter>,<bGfocus>,<bLfocus>,<bOther> )

ahi me encontre con " ON OTHER MESSAGE <bOther>]" en Dialogos, ventanas y Browses.
tambien dentro del Browse tiene manejo de clases , mira Guilib.ch

Code: Select all

[ <class: CLASS> <classname> ]

para ello On Other Messages se tiene que agregar en Advance : USER COMPONENTS INTERFACE como indica la Referencia de HMG.3.0.46 : C:/hmg.3.0.46/doc/data/index.htm

mira :

InstallEventHandler ( <cEventHandlerFunctionName> )
Every time that an event is triggered by the system the specified
function will be called.
This function will receive the following parameters:
hWnd, nMsg, wParam, lParam

espero que te sirva la info ...

[Pablo César]

Gracias Daniel,

Estoy revisando lo que indicaste sobre InstallEventHandler, InstallMethodHandler y InstallPropertyHandler.

Iré revisar e compilar el ejemplo en: C:\hmg.3.0.44\SAMPLES\USER.COMPONENTS pero posue algunos errores aparentes, pero vi que el readme explica como sanarlos.

--- Translated to English

Thanks Daniel,

I am reviewing what you indicated on InstallEventHandler, InstallMethodHandler and InstallPropertyHandler.

There is an example: C: \ hmg.3.0.44 \ SAMPLES \ USER.COMPONENTS but contains apparentely some errors, but reading file README it will fix.

[danielmaximiliano]

Gracias Daniel,

Estoy revisando lo que indicaste sobre InstallEventHandler, InstallMethodHandler y InstallPropertyHandler.

Iré revisar e compilar el ejemplo en: C:\hmg.3.0.44\SAMPLES\USER.COMPONENTS pero posue algunos errores aparentes, pero vi que el readme explica como sanarlos.

--- Translated to English

Thanks Daniel,

I am reviewing what you indicated on InstallEventHandler, InstallMethodHandler and InstallPropertyHandler.

There is an example: C: \ hmg.3.0.44 \ SAMPLES \ USER.COMPONENTS but contains apparentely some errors, but reading file README it will fix.

1) Hice las modificaciones tuyas.
2) despues hice las modificaciones referidas en Readme.txt
3) modifique linea 8 en demo.prg

Code: Select all

*/

#include "hmg.ch"

*Set Procedure To mybutton.prg

Function Main

compile el ejemplo desde el IDE. funciona !!!. / compile the sample using the IDE. works!.

Custom Component Demo_2012-11-16_18-08-30.jpg (14.58 KiB) Viewed 4418 times

pero hay un error al intentar usar el menu. /but there is an error when trying to use the menu.

Program Error_2012-11-16_18-06-11.jpg (25.31 KiB) Viewed 4418 times