PC Toledo

Código: Selecionar todos

Revision: 2774
          http://sourceforge.net/p/hwgui/code/2774
Author:   alkresin
Date:     2019-02-20 06:58:12 +0000 (Wed, 20 Feb 2019)
Log Message:
-----------
2019-02-20 09:58 UTC+0300 Alexander Kresin <alex@...>
  * source/winapi/control.c
    * hwg_GetUpDown() function added.
  * source/winapi/hupdown.prg
    * Changed to use hwg_GetUpDown() to get value.

Revision: 2773
          http://sourceforge.net/p/hwgui/code/2773
Author:   alkresin
Date:     2019-02-19 08:35:59 +0000 (Tue, 19 Feb 2019)
Log Message:
-----------
2019-02-19 11:35 UTC+0300 Alexander Kresin <alex@...>
  * source/gtk/hcwindow.prg
  * source/winapi/hcwindow.prg
    * New function hwg_GetItemByName( arr, cName ) has been added, which looks for
      an object in an array by the object's name (:objname), for example:
         oDlg := GetItemByName( HDialog():aModalDialogs, "ODLG1" )
         oFont := GetItemByName( HFont():aFonts, "OFONTBOLD" )

Revision: 2772
          http://sourceforge.net/p/hwgui/code/2772
Author:   alkresin
Date:     2019-02-11 08:11:15 +0000 (Mon, 11 Feb 2019)
Log Message:
-----------
2019-02-11 11:10 UTC+0300 Alexander Kresin <alex@...>
  * source/winapi/hwindow.prg
    ! Small fix

Código: Selecionar todos

FUNCTION hwg_GetItemByName( arr, cName )

   LOCAL oItem
   FOR EACH oItem IN arr
      IF !Empty( oItem:objname ) .AND. oItem:objname == cName
         RETURN oItem
      ENDIF
   NEXT

   RETURN Nil