Formularios

[[gluglu]]

Yo lo veo más fácil todavía ...

En tu form 'llamante' lo que tienes es que simplemente crear y mostrar modalmente el Form4 así :

Código Delphi [-]
Form4.Create(Self);
Form4.ShowModal;

Y donde lo necesites en el Form4, preguntas por el Form4.Owner.

[*Caro*]

Hola cuando creo mi formulario, lo hago de esta forma

Código Delphi [-]
 Application.CreateForm(TForm4, Form4);
 try
    Form4.ShowModal;
 finally
   Form4.Free;
 end;

de esta no lo habia hecho, al hacerlo asi me sale otro AccessViolation

Empezado por gluglu

Form4.Create(Self);

Si me podrias explicar un poquito mas sobre Owner te estaria muy agradecida, espero no estar molestando mucho, pero no me queda claro lo del Owner.

Saluditos

[[gluglu]]

Todo Formulario (o cualquier otro componente), al ser creado tiene su 'dueño' (Owner), que será aquel componente que lo crea.

Al ejecutar (perdón, fui demasiado rápido en el hilo mío anterior, y la versión correcta está qui debajo) :

Código Delphi [-]
Form4 = TForm4.Create(Self);

lo que estás indicando es que cree una instacia del Form4 y la almacene en la variable Form4. Al indicarle el parámetro 'Self', lo que estás indicando es que el dueño será el propio formulario 'llamante'. Self indica que es el propio formulario donde se ejecuta esa instrucción el que debe sustituir al propio parámetro Self, y por ello el propio formulario llamante se convierte en 'dueño' u Owner de la instancia Form4 que acabas de crear.

Si pusieras

Código Delphi [-]
Form4 = TForm4.Create(Application);

el 'dueño' u Owner de Form4 sería Application, es decir, el Formulario principal de tu aplicación.

Para qué sirve el 'dueño' u Owner ? Para liberar de memoria el elemento que se ha creado cuando se destruya el Owner, en caso de no hacer un Free explícito.

Si creaste Form4 con el parámetro Self (y pongamos por ejemplo que lo estás creando dentro de Form1), al hacer un Free de Form1, también se eleminaría automáticamente de memoria el correspondiente Form4.

Si lo hubieras creado con el parámetro Application, hasta no cerrar el formulario principal, es decir, hasta no cerrar la aplicación completa, tu instancia de Form4 no se liberaría de memoria.

A su vez, la propiedad Owner sirve precisamente para preguntar por quién fue llamado un Formulario (por ejemplo).

Si creas Form4 dentro de Form1 con :

Código Delphi [-]
Form4 = TForm4.Create(Self);

le indicas con Self que el Owner es Form1.

Aclaración : Podrías perfectamente poner

Código Delphi [-]
Form4 = TForm4.Create(Form1);

y el efecto conseguido sería el mismo ya que le indicas que el Owner de la instancia Form4 creada es Form1. A lo mejor así lo ves más directamente.

Para terminar, como el Form lo vas a mostrar Modalmente, personalmente me queda más claro que en el propio Form1 (en el ejemplo que estoy poniendo, al ser el que llama al Form4), se ejecute el Form4.ShowModal y no como lo ha indicado ArdiIIa, aunque sobre gustos no hay nada escrito.

En cualquier caso, hasta no salir de Form4 (al ser Modal), se continuará con la siguiente línea de código, independientemente si la has puesto dentro del propio Form4 (como indica ArdiIIa) o si has puesto el Form4.ShowModal en el propio form llamante, en nuestro caso el Form1.

Espero haberte servido con mi explicación.

Saludos

[*Caro*]

Miles de gracias amigo gluglu, buenisima tu explicación, ahora si me funciona y esta entendido.

Saluditos

[[gluglu]]

Empezado por Caro

Miles de gracias amigo gluglu, ...

[*Caro*]

Lo siento , nose porque desde que leia tus mensajes pense que eras mujer, ahora eso tambien esta claro .

Saluditos