Cita:
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..