In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

quiero que las ventanas se superpongan

Foro público de Xailer en español
Responder
macgyber
Mensajes: 33
Registrado: Mié Jun 01, 2011 6:33 pm

quiero que las ventanas se superpongan

Mensaje por macgyber »

estoy empezando a programar usando xailer, y al abrir un nuevo form se
abre aparte y quisiera que fuera en la misma ventana que tengo abierta,
además quisiera que al apretar escape se cierre esta ventana y volver a
la ventana anterior
ALINE
Mensajes: 30
Registrado: Jue Feb 03, 2011 11:25 am

quiero que las ventanas se superpongan

Mensaje por ALINE »

Para cerrar el formulario pulsando el botón "ESC", acaba de poner en las propiedades de la forma: nBorderSyle: = bsDIALOG, este tipo de formulario se cierra cuando se presiona la tecla "ESC". O usted puede utilizar en el event OnChar ():
IF nKey = 27; Close (); ENDIF.
nKey = 27 es igual a la "ESC"
ALINE
Mensajes: 30
Registrado: Jue Feb 03, 2011 11:25 am

quiero que las ventanas se superpongan

Mensaje por ALINE »

Para decirlo de la form dentro de otra form, o se establece la segunda form con la propiedad de nTop el nLeft Formulario y en el formulario principal, o de obligar a que una form en otra.
Moises Leon
Mensajes: 103
Registrado: Mié Dic 15, 2010 4:45 pm

quiero que las ventanas se superpongan

Mensaje por Moises Leon »

Lo que puedes hacer es que al Form principal lo configures como
::nFormType = ftMDIFRAME (en propiedades)
y los siguientes Forms como ::nFormType = ftMDIChild (tambien en
propiedades)
En el Form principal vas a llamara al otro Form solamente asi:
TMiForm():New( Self ):Show() (y no :ShowModal() )
Yo lo hago asi.
Moises Leon
"macgyber" <americasoftware@gmail.com> escribió en el mensaje de noticias
news:[email=4defebf5@svctag-j7w3v3j....]4defebf5@svctag-j7w3v3j....[/email]
> estoy empezando a programar usando xailer, y al abrir un nuevo form se
> abre aparte y quisiera que fuera en la misma ventana que tengo abierta,
> además quisiera que al apretar escape se cierre esta ventana y volver a la
> ventana anterior
macgyber
Mensajes: 33
Registrado: Mié Jun 01, 2011 6:33 pm

quiero que las ventanas se superpongan

Mensaje por macgyber »

El 09/06/2011 7:35, Aline Araujo escribió:
> Para decirlo de la form dentro de otra form, o se establece
> la segunda form con la propiedad de nTop el nLeft Formulario
> y en el formulario principal, o de obligar a que una form en
> otra.
puse el miwmo numero en el ntop y el nleft, con eso consigo que quede
superpuesta a la primera pero si el usuario la mueve tengo 2 ventanas y
el usuario puede volver a actuar sobre la primera y eso es lo que no
quiero, creo que lo que quiero es que fundamentalmente la segunda
pantalla tenga el foco y que no permita actuar sobre la primera
gracias por estar de ese lado
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9440
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:

quiero que las ventanas se superpongan

Mensaje por ignacio »

Simplemente muestra la segunda ventana con ShowModal() indicando que su oParent es el formulario anterior.
TForm2():New( oFormPrincipal | Self ):ShowModal()
Saludos
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
macgyber
Mensajes: 33
Registrado: Mié Jun 01, 2011 6:33 pm

quiero que las ventanas se superpongan

Mensaje por macgyber »

El 09/06/2011 12:25, Ignacio Ortiz de Zúñiga escribió:
> Simplemente muestra la segunda ventana con ShowModal()
> indicando que su oParent es el formulario anterior.
>
> TForm2():New( oFormPrincipal | Self ):ShowModal()
>
> Saludos
la segunda ventana me queda dentro de la primera, pero no superpuesta,
creo haber probado todas las ideas que me han propuesto, lo que no pude
poner es oFormPrincipal, no supe que poner
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9440
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:

quiero que las ventanas se superpongan

Mensaje por ignacio »

macgyber escribió el jue, 09 junio 2011 17:37El 09/06/2011 12:25, Ignacio Ortiz de Zúñiga escribió:
> Simplemente muestra la segunda ventana con ShowModal()
> indicando que su oParent es el formulario anterior.
>
> TForm2():New( oFormPrincipal | Self ):ShowModal()
>
> Saludos
la segunda ventana me queda dentro de la primera, pero no superpuesta,
creo haber probado todas las ideas que me han propuesto, lo que no pude
poner es oFormPrincipal, no supe que poner
Lo mejor será que le eche un vistazo a cualquier ejemplo de Xailer que lo haga, por ejemplo:
proyecto: XailerdatacontrolsDbfData2.xpj
fichero: form1.prg
lí­nea: 175
Saludos
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
jrcpoli-quitar
Mensajes: 558
Registrado: Mar Feb 09, 2010 2:26 pm

quiero que las ventanas se superpongan

Mensaje por jrcpoli-quitar »

Saludos:
Te adjunto un ejmplo a ver si es lo que quieres, fijaté en las
propiedades de los formularios sobre todo en lCentered, lo demás te lo
han contestado.
José Ramón Castro
El 08/06/2011 23:38, macgyber escribió:
> estoy empezando a programar usando xailer, y al abrir un nuevo form se
> abre aparte y quisiera que fuera en la misma ventana que tengo abierta,
> además quisiera que al apretar escape se cierre esta ventana y volver a
> la ventana anterior
--
jrcpoli-quitar
Mensajes: 558
Registrado: Mar Feb 09, 2010 2:26 pm

quiero que las ventanas se superpongan

Mensaje por jrcpoli-quitar »

El 09/06/2011 17:37, macgyber escribió:
> El 09/06/2011 12:25, Ignacio Ortiz de ZíƒÂºíƒÂ±iga escribiíƒÂ³:
>> Simplemente muestra la segunda ventana con ShowModal()
>> indicando que su oParent es el formulario anterior.
>>
>> TForm2():New( oFormPrincipal | Self ):ShowModal()
>>
>> Saludos
>
> la segunda ventana me queda dentro de la primera, pero no superpuesta,
> creo haber probado todas las ideas que me han propuesto, lo que no pude
> poner es oFormPrincipal, no supe que poner
TForm2():New( TApplication:oMainForm
| Self ):ShowModal(smNormal,.T.)
Revisa en la ayuda de xailer oMainForm, oForm, Show
jrcpoli
Mensajes: 240
Registrado: Mié Oct 25, 2006 8:55 pm

quiero que las ventanas se superpongan

Mensaje por jrcpoli »

Veo que el fichero de ejemplo no ha salido por que contesté por las News asó que lo pongo aquí­ por si alguno tiene interes.
José Ramón Castro.

Attached files PruebaForm.zip (7.2 KB)Â
José Ramón Castro.
Responder