Hola foro,
Algun sample que me muestre como colocar un dialogo dentro de una ventana (sin usar recursos) ?
Gracias
FWH 25.12
Harbour/Hbmk2
Microsoft Visual C++
MySql 8.0
Antigravity
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Dialogo dentro de ventana
\SAMPLES\TESTFX?.PRG
Saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Compuin wrote:Hola foro,
Algun sample que me muestre como colocar un dialogo dentro de una ventana (sin usar recursos) ?
Gracias
Prueba esto
#include "Fivewin.ch"
Function Main()
local oWnd
local oDlg
DEFINE WINDOW oWnd
// Si lo defines aqui, el diálogo ha de ser NOWAIT ( o sea NO MODAL )
DEFINE DIALOG oDlg OF oWnd
ACTIVATE DIALOG oDlg CENTERED IN PARENT NOWAIT
ACTIVATE WINDOW oWnd // ON INIT DlgInit( oWnd )
Return nil
// Si quieres que sea modal, tienes que poner la llamada a la creacion del dialogo en la clausula ON INIT de la ventana
Function DlgInit( oWnd )
local oDlg
DEFINE DIALOG oDlg OF oWnd
ACTIVATE DIALOG oDlg CENTERED IN PARENT
Return nilCristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
cnavarro wrote:Compuin wrote:Hola foro,
Algun sample que me muestre como colocar un dialogo dentro de una ventana (sin usar recursos) ?
Gracias
Prueba esto
#include "Fivewin.ch" Function Main() local oWnd local oDlg DEFINE WINDOW oWnd // Si lo defines aqui, el diálogo ha de ser NOWAIT ( o sea NO MODAL ) DEFINE DIALOG oDlg OF oWnd ACTIVATE DIALOG oDlg CENTERED IN PARENT NOWAIT ACTIVATE WINDOW oWnd // ON INIT DlgInit( oWnd ) Return nil // Si quieres que sea modal, tienes que poner la llamada a la creacion del dialogo en la clausula ON INIT de la ventana Function DlgInit( oWnd ) local oDlg DEFINE DIALOG oDlg OF oWnd ACTIVATE DIALOG oDlg CENTERED IN PARENT Return nil
No funciona
Necesito el dialogo dentro de la Ventana como un contenedor para los objetos
FWH 25.12
Harbour/Hbmk2
Microsoft Visual C++
MySql 8.0
Antigravity
Compuin wrote:Hola foro,
Algun sample que me muestre como colocar un dialogo dentro de una ventana (sin usar recursos) ?
Gracias
Compuin wrote:
No funciona
Necesito el dialogo dentro de la Ventana como un contenedor para los objetos
Qué es lo que no funciona? Es un ejemplo de un diálogo dentro de una ventana, sin usar recursos.
Entonces, no entiendo lo que necesitas, porque en ese diálogo puedes poner los controles que necesites.
A ver, como si fuese un Panel, es decir, que el diálogo no tenga título, etc?
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
No queda el diálogo incrustado en la ventana. Ambos quedan separados
FWH 25.12
Harbour/Hbmk2
Microsoft Visual C++
MySql 8.0
Antigravity
Compuin wrote:No queda el diálogo incrustado en la ventana. Ambos quedan separados
No entiendo bien lo que estás buscando, prueba esto
#include "Fivewin.ch"
Function Main()
local oWnd
local oDlg
DEFINE WINDOW oWnd
DEFINE DIALOG oDlg OF oWnd STYLE WS_POPUP
oDlg:SetColor( CLR_BLUE, CLR_GRAY )
ACTIVATE DIALOG oDlg CENTERED IN PARENT NOWAIT
ACTIVATE WINDOW oWnd
Return nilCristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Lo que necesito es un dialogo dentro de una ventana que se ajuste a medida que cambie de tamano la ventana
P.S. El ejemplo anterior no es lo que busco
FWH 25.12
Harbour/Hbmk2
Microsoft Visual C++
MySql 8.0
Antigravity
Lo que necesito es un dialogo dentro de una ventana que se ajuste a medida que cambie de tamano la ventana
P.S. El ejemplo anterior no es lo que busco
FWH 25.12
Harbour/Hbmk2
Microsoft Visual C++
MySql 8.0
Antigravity
Hace mucho tiempo el señor Rao había hecho una prueba de ejemplo
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
Silvio.Falconi wrote:Hace mucho tiempo el señor Rao había hecho una prueba de ejemplo
viewtopic.php?p=216176#p216176
Gracias Silvio, lo voy a revisar
FWH 25.12
Harbour/Hbmk2
Microsoft Visual C++
MySql 8.0
Antigravity