Código Delphi [-] procedure TForm1.FormActivate(Sender: TObject); begin // Si las comprovaciones me hacen cerrar el formulario, pos se cierro if comprovaciones then Close; // Sólo quiero que se lance una vez este evento, así que quito el OnActivate OnActivate := nil; end;
procedure TForm1.FormActivate(Sender: TObject); begin // Si las comprovaciones me hacen cerrar el formulario, pos se cierro if comprovaciones then Close; // Sólo quiero que se lance una vez este evento, así que quito el OnActivate OnActivate := nil; end;