Ayuda Usando Ejemplo hbide-master hbwindow
Enviado: 03 Set 2020 22:25
Saludos al forum
Alquien ha visto este ejemplo tipo consola
https://github.com/FiveTechSoft/hbide? ... Ghx4Klv2Q
Saludos al forum
Estoy Usando hbwindow.
Si defino SetMode( 40, 120 ) funciona perfectamente segun el ejemplo esta definido asi, 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.
Alquien ha visto este ejemplo tipo consola
https://github.com/FiveTechSoft/hbide? ... Ghx4Klv2Q
Saludos al forum
Estoy Usando hbwindow.
Si defino SetMode( 40, 120 ) funciona perfectamente segun el ejemplo esta definido asi, 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.
Código: Selecionar todos
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