Ayuda Usando Ejemplo hbide-master hbwindow

[ruben Dario]

Saludos al forum

Estoy Usando hbwindow.
Si defino SetMode( 40, 120 ) funciona perfectamente , se puede mover la ventana con todos sus objetos incluidos.
pero si defino setmode(50,160) no funciona , solamente se puede mover la ventana pero sos objetos no esta ligados a la ventana y no se mueven, cuando se ejecuta queda afuera de la ventana como GET lOk PUSHBUTTON.

[img]
https://www.4shared.com/photo/pGLcBmsRea/ventana_1.html
[/img]

Code: Select all  Expand view  RUN

Static Function abrdlg()


   local oDlg, GetList := {}, lOk := .F.
   local cTitle
   
   cTitle := "Information"

   oDlg = HBWindow():Dialog( cTitle, 35, 15, "W+/W" )
   oDlg:GetList = GetList
   oDlg:Show()

   oDlg:SayCenter( "Harbour IDE", -4 )
   oDlg:SayCenter( "Version 1.0", -2 )
   oDlg:SayCenter( "Copyright (c) 1999-2020 by" )
   oDlg:SayCenter( "The Harbour Project", 2 )

   @ 23, 56 GET lOk PUSHBUTTON CAPTION " &OK " COLOR "GR+/G,W+/G,N/G,BG+/G" ;
      STATE { || ReadKill( .T. ) }

   READ
   oDlg:Hide()

   
return nil

 

[karinha]

No comprendo. Esto és modo consola?

Saludos.

[ruben Dario]

Si es modo consola

[karinha]

Lo siento. No uso modo consola.

https://github.com/FiveTechSoft/hbide?fbclid=IwAR1i2eHcHIEQqJHMv8Eqgn-MXYNCicy8qvCtdtMR8jc6c4unXFGhx4Klv2Q

Saludos.