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
macgyber
Posts: 33
Joined: Wed Jun 01, 2011 6:33 pm

quiero que las ventanas se superpongan

Postby macgyber » Wed Jun 08, 2011 11:38 pm

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
Posts: 30
Joined: Thu Feb 03, 2011 11:25 am

quiero que las ventanas se superpongan

Postby ALINE » Thu Jun 09, 2011 12:28 pm

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
Posts: 30
Joined: Thu Feb 03, 2011 11:25 am

quiero que las ventanas se superpongan

Postby ALINE » Thu Jun 09, 2011 12:35 pm

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
Posts: 102
Joined: Wed Dec 15, 2010 4:45 pm

quiero que las ventanas se superpongan

Postby Moises Leon » Thu Jun 09, 2011 5:06 pm

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:4defebf5@svctag-j7w3v3j....
> 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
Posts: 33
Joined: Wed Jun 01, 2011 6:33 pm

quiero que las ventanas se superpongan

Postby macgyber » Thu Jun 09, 2011 5:17 pm

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
User avatar
ignacio
Site Admin
Posts: 8562
Joined: Mon Apr 06, 2015 8:00 pm
Location: Madrid, Spain
Contact:

quiero que las ventanas se superpongan

Postby ignacio » Thu Jun 09, 2011 5:25 pm

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
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
macgyber
Posts: 33
Joined: Wed Jun 01, 2011 6:33 pm

quiero que las ventanas se superpongan

Postby macgyber » Thu Jun 09, 2011 5:37 pm

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
User avatar
ignacio
Site Admin
Posts: 8562
Joined: Mon Apr 06, 2015 8:00 pm
Location: Madrid, Spain
Contact:

quiero que las ventanas se superpongan

Postby ignacio » Thu Jun 09, 2011 6:40 pm

macgyber escribió el jue, 09 junio 2011 17:37
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

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
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
jrcpoli-quitar
Posts: 558
Joined: Tue Feb 09, 2010 2:26 pm

quiero que las ventanas se superpongan

Postby jrcpoli-quitar » Thu Jun 09, 2011 7:06 pm

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
Posts: 558
Joined: Tue Feb 09, 2010 2:26 pm

quiero que las ventanas se superpongan

Postby jrcpoli-quitar » Thu Jun 09, 2011 7:56 pm

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
Posts: 240
Joined: Wed Oct 25, 2006 8:55 pm

quiero que las ventanas se superpongan

Postby jrcpoli » Fri Jun 10, 2011 2:22 pm

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.

Return to “Spanish”