Cerrar ventana Showmodal

[[gluglu]]

Pues no termino de entender tu pregunta.

Por qué no lo cierras por código poniendo directamente

Código Delphi [-]
QDatos.Close;
Close;

donde quieras cerrar esa ventana.

Te debe de funcionar igualmente que si pulsas el boton al que te refieres.

[[Lepe]]

Asigna un valor a ModalResult:

Código Delphi [-]
  Ventana.ModalResult := mrOK;

Saludos

[[Espartaco]]

Gracias por contestar tan rapido, intentaré ampliar la información que puse en un principio.

Se trata de que la ventana showmodal en para introducir datos. En el evento OnActivate de la misma compruebo si se cumple una condición para poder seguir introduciendo esos datos. Si la condición es verdadera pues tengo que cerrar la susodicha despues de mostrar un mensaje informativo. He probado a cerrarla desde ese evento y me da error de acceso de memoria, tambien lo he intentado desde OnShow, igual; tambien lo he intentado desde el evento OnEnter del primer edit de la ventana, tambien el mismo error, todo esto con las soluciones que puse en un principio y con la solucion de Lepe.
Con la solucion de gluglu no me hace ni p... caso, solo funciona en el evento OnClick del boton de salir.

He probado también hacer esa comprobacion antes de crear la ventana, y si se cumple la solucion no la abro desde el menu principal, pero he observado una cosa muy rara y tras muchos intentos desisti de esa opcion que me parecia la mejor. La cosa rara es que para comprobar esa condicion lo que tengo que hacer es ver si existe un determinado articulo en una determinada tabla. Coloco la tabla en la ventana principal y ejecuto un locate, y sorpresa es como si el locate funcionara cuando quiere es decir erroneamente, pero ojo siempre funciona de la misma forma erronea, es decir, si dice que no existe un articulo (y sí existe), siempre dice lo mismo.

Espero que se entienda bien el mensaje y siento que sea tan largo, pero de verdad he probado todo lo que se ma ha ocurrido y nada.

Muchas gracias por atenderme.

[dec]

Hola,

No parece que tengas que mostrar un formulario para comprobar acto seguido si no puede mostrarse o no... ¿No te parece más lógico (oh, cómo me gusta esta palabra), digo, comprobar "la condición" y mostrar o no el formulario dependiendo de esta? Yo creo que sería menos problemático, ¿no? Y más lógico...

[[Espartaco]]

Hola Dec,

Efectivamente llevas razón, y eso fue lo que intenté primero, pero si miras mi anterior mensaje explico que al hacerlo, sin saber por qué, el locate hacía cosas raras y opté por hacer la comprobación después, ya que así no tengo problemas con el locate.

Incluso miré a ver si el problema estaba en el BDE del servidor de archivos donde tengo ubicadas las tablas, pero creo que ahí no estaba el problema. Ah, se me olvidaba son Paradox, ya sé que tienen problemas en red pero tengo bastante prisa. Una cosa, aunque las tablas están en otro ordenador, el programa está funcionando de momento en monousuario.

Gracias.

[[gluglu]]

Ya se ha comentado varias veces en el foro que en los eventos OnCreate, OnActivate, OnShow ... no se puede cerrar una ventana que se está creando en ese momento.

Busca en el Foro acerca de AfterShow.

Puedes consultar también aqui, aqui y aqui.

[[Espartaco]]

He mirado los links que pone gluglu, pero realmente no me solucionan el problema.

Me aguantaré como lo tengo, que es desactivando el botón de grabar de la ficha para que el usuario cierre la ventana manualmente.

Muchas gracias a todos por haberos molestado en ayudarme.

Ciertamente con este foro no te sientes solo.