Delphi 2007 showmodal

[[BlueSteel]]

Empezado por MARIA ROSA

Hola BlueStell, la version que me indica cuando abro delphi es delphi 7(La mas reciente, segun yo).
Sucede que en la version 5 yo solo manejaba form2.showmodal para pasar de una ventana a otra, ahora me manda error....segun algo falta pero no se que pueda ser...probe indicando el punto y como pero sin exito.

Bueno, la version más reciente es Delphi 2007....Delphi 7 es una versión que salio hace un par de años...yo la tengo desde hace 5 años..ya ...


yo utilizo 2 procedimientos para llamar un Form desde otro

Generalmente utilizo esto para crearlo, usarlo y destruirlo

Código Delphi [-]
     Form2 := TForm2.Create(Self);
     Try
        Form2 .ShowModal;
     Finally
        Form2 .Free;
     End;

pero con esto es suficiente para llamar al form2...

Código Delphi [-]
 Form2.ShowModal;

Quizas es por que el Form2 no lo tienes creado, o esta en modo invisible o no esta enable....


Tambien puedes usar

Código Delphi [-]
 
 Form2.Visible := True;

aunque esto permite que el formulario se pueda perder... es decir, lo muestra pero si precionas afuera del form... este se oculta y te puede dar confucion...

Salu2

[MARIA ROSA]

Hola BlueSteel, ya probe el primer ejemplo de codigo que me sugeriste y me sucede lo siguiente...
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2 := TForm2.Create(Self);
Try
Form2 .ShowModal;
Finally
Form2 .Free;
end; .........se supone que entre esta linea y la siguiente esta el error
end.


y me manda el error de....
unit1.pas(37): ';' expected but '.' found
declaration expected but end of file found
y no puede compilar...bla bla

[santus]

Empezado por MARIA ROSA

Hola BlueSteel, ya probe el primer ejemplo de codigo que me sugeriste y me sucede lo siguiente...
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2 := TForm2.Create(Self);
Try
Form2 .ShowModal;
Finally
Form2 .Free;
end; .........se supone que entre esta linea y la siguiente esta el error
end.


y me manda el error de....
unit1.pas(37): ';' expected but '.' found
declaration expected but end of file found
y no puede compilar...bla bla

supongo que te falta un "end;" al final. Ponlo antes del "end." ... Fijate que con el primer end; cierras el bloque Try.. Finally ... y despues deberias cerrar el bloque del procedimiento... onda, begin y end; Supongo va..

[[Delphius]]

Hola MARIA ROSA,
El código de BlueSteeel debería funcionar. Borra el espacio entre form y el punto.

Si no es eso, hay que ver que es lo que hace form2 al momento de crearse y/o mostrarse. (Es posible que allí haya algo más).

Saludos,

[MARIA ROSA]

BlueSteel.....Jejej...lo supuse...ya quedo quedo eso, ahora resulta que cuando trato de regresar de la form2 a las form1...le indique el mismo codigo y me manda....

ProjectProject1.exe raised exception class EInvalidOperation with message 'Cannot make a visible windows modal'. Process stopped.

ahora que sera?
Gracias.....por dar respuesta rapida a mis dudas...sucede qeu tengo que hacer una aplicacion con BD...y estoy probando cosas antes de comenzar mi trabajo.

[[BlueSteel]]

Para regresar el Form1.. solo basta que pongas en un boton la sentencia

Código Delphi [-]
 
close;

no puedes llarmar al Form1 desde el Form2 como te mencione antes.... ya que te dará error... por que intentaras crear un Form (el 1 o Menu ) que ya ha sido creado


el error anterior era por lo que te dijo Delphius.. se me fue un espacio entre Form2 y el punto... puse Form2 . y debia ser Form2.

Salu2