El create lo he puesto en el evento onclick de 1 boton.
Evento on close del form (nombre= Presu)
procedure TPresu.FormClose(Sender: TObject; var Action: TCloseAction);
begin
form1.Enabled:=true; <- (Break point) OK
Action:=cafree;
presu.Destroy;
end;<- (Break point) OK
------------------------------------------------------- <<<Error>>>
end.
Error -> Acces violation at adress 00000002. Read of adress FFFFFFFF
Error -> Abstract error.
Programa sigue funcionando pero si intento volver a crear el form me da el mismo error otra vez.
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Si en vez de eso elimino el form antes de volverlo a crear, no me crea los controles de la base de datos
He añadido al Oncreate del formulario:
qobj.Active:=true;
qobj.sql.Clear;
qobj.SQL.add('Select * from objur order by nombre');
qobj.Open;
por si se borraba y no me da error pero sigue sin funcionar cualquier consulta