PC Toledo

Código: Selecionar todos

2021-06-08 15:26 UTC+0300 Alexander Kresin <alex@belacy.ru>
  * source/gtk/hdialog.prg
  * source/winapi/hdialog.prg
    * ::oParent is set to a parent modal dialog, if exist.

2021-06-06 14:42 UTC+0300 Alexander Kresin <alex@belacy.ru>
  * contrib/gthwg/gt_hwgui_l.c
    * Colors definition changed to satisfy some compilers

2021-05-25 15:22 UTC+0300 Alexander Kresin <alex@belacy.ru>
  * source/gtk/hownbtn.prg
  * source/winapi/hownbtn.prg
    ! Bug fixed.

2021-05-21 10:15 UTC+0300 Alexander Kresin <alex@belacy.ru>
  * source/gtk/htimer.prg
  * source/winapi/htimer.prg
    ! Bug fixed.

2021-05-19 15:10 UTC+0200 Wilfried Brunken DF7BE
  * utils/dbc/dbchw.hbp
  * utils/tutorial/hwgrun.hbp
  * utils/tutorial/tutor.hbp
    ! Ticket #90: tutor, dbchw error creating  
    ! dbchw and tutor ready for OS freebsd 13.0:
    ! The macro for unix has also effect on LINUX 

Código: Selecionar todos

METHOD Activate( lNoModal, lMaximized, lMinimized, lCentered, bActivate ) CLASS HDialog

   LOCAL oWnd, hParent
   //LOCAL aCoors, aRect

   IF bActivate != Nil
      ::bActivate := bActivate
   ENDIF

   IF ::oParent == Nil   // -----------> alterado aqui
      ::oParent := hwg_GetModalDlg()
   ENDIF
   hwg_CreateGetList( Self )
   hParent := Iif( ::oParent != Nil .AND. ;
      __ObjHasMsg( ::oParent, "HANDLE" ) .AND. !Empty( ::oParent:handle ), ;
      ::oParent:handle, Iif( ( oWnd := HWindow():GetMain() ) != Nil,  ;
      oWnd:handle, hwg_Getactivewindow() ) )