.ShowModal y fomulario en blanco

[[cHackAll]]

Pues si... tambien lo pensé.

Sigo pensando que le faltan buenas pinceladas a Lazarus... cuando lo probé con un Hello Word... me produjo un ejecutable de un Mb .

[intruder]

Puff se me olvido mencionar que si ponia como decis vosotros me daba el siguiente error:

Error: Identifier not found "TForm2"

Para lo que mi solución fue:

Código Delphi [-]
var
Form2:TForm2;

Para lo que Lazarus me devuelve:

Error: Error in type definition

Este creo que es mi verdadero problema y por vuestros comentarios sospecho que se puede deber a una mala interpretación del código por parte del compilador de Lazarus,¿que pensais?

Gracias por tus correcciones jhonny y a los dos por la brevedad de vuestras respuestas.

[[cHackAll]]

y está el uses de la Unit2 ??? o lo que se llame la unidad que tiene la clase TForm2 ???

[intruder]

Jajaja solucionado tio eres un crack jejej ni se me habia ocurrido mira que en Pascal si que use las units declarandolas en uses y eso pero aqui no vi la analogia muchas gracias asi da gusto comenzar con algo nuevo espero poder servir de ayuda como tu ami dentro de poco.

Gracias de nuevo.

[[Caral]]

Hola
Aparte de lo que te han comentado, no es conveniente hacer un llamado a un form sin luego destruirlo o liberarlo, asi no ocupa memoria, es como si lo tuvieras en el proyecto lo que alenta el programa.
Esta es la mejor forma de hacerlo:

Código Delphi [-]
 Form2:=TForm2.Create(self);
   try
      Form2.ShowModal;
   finally
      Form2.Free;
   end;

Se crea y luego se libera.
Saludos

[jhonny]

Bueno, yo prefiero el siguiente metodo...

Código Delphi [-]
   Form2:=TForm2.Create(self);
   try
      Form2.ShowModal;
   finally
      Form2.Release; //<-- Release en lugar de Free.
   end;

Free destruye un objecto y si es necesario destruye los componentes asociados a él, según la ayuda dice que free llama al Release en el caso de los formularios.

Release espera a que se destruyan todos los componentes asociados a la forma para poder destruir la forma.

Sinceramente yo prefiero asegurarme del asunto y usar Release directamente.

Y bueno, no soy excelente con el ingles pero en la ayuda dice lo siguiente:

Release does not destroy the form until all event handlers of the form and event handlers of components on the form have finished executing. Release also guarantees that all messages in the form's event queue are processed before the form is released. Any event handlers of the form should use Release instead of Free. Failing to do so could lead to an access violation.

Según yo, allí dice que es recomendable usar Release en lugar de Free para este caso .

[[Lepe]]

Hasta donde yo tenía entendido (aprendido de estos foros), es que Release debe llamarse desde un método de la propia clase, no desde fuera, de hecho lo dice aquí:

Any event handlers of the form should use Release instead of Free

Esto si está bien:

Código Delphi [-]
procedure TForm1.Button1Click
begin 
  Release;
end;

Esto funciona, pero quizás no como uno espera (lo explico más adelante)

Código Delphi [-]
procedure TForm1.Button1Click
begin 
  Form2.Release;
end;

Atacando la ayuda:

Note:
Release returns immediately to the caller. It does not wait for the form to be freed before returning

porque su implementación es:

Código Delphi [-]
procedure TCustomForm.Release;
begin
  PostMessage(Handle, CM_RELEASE, 0, 0);
end;

Lo que quiere decir que tras una llamada a Release, no está garantizado que la ventana se haya destruido completamente, y este punto es importante.

Se podría llamar a Release, y la ventana seguir en pantalla durante 3 minutos, porque está realizando un proceso largo, o tiene mensajes pendientes en su cola de mensaje (incluso mensajes de repintado de la pantalla que, dado que queremos destruirla, no tiene sentido que se realicen).

Al llamar a Free, se está obligando a liberar todos los componentes que haya en el Form, cortando el flujo de mensajes y destruir todo inmediatamente. Además no se procesarán todos los mensajes de la cola de espera (por tanto, los mensajes de repintado, jamás se realizarán). Después de llamar a Free, si está garantizado que la ventana se ha liberado.

Saludos