mi codigo de prueba
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
|