[[Chris]]

Cuando vale la pena, es mejor botar el código antes de intentar depurarlo. por eso, te proporciono un código mejor para hacer lo que intentas:

Código Delphi [-]
begin
  Application.Initialize;
  Application.Title := 'Diccionario crítico etimológico castellano e hispánico';
  Application.HelpFile := 'AYUDA.HLP';

  // La portada no hará ningun tipo de lógica. Se evaluará el contenido
  // del CD en esta sección de inicio.
  Application.CreateForm(Tportada, portada);

  unidad:=GetFirstCdRomDrive; // TODO: definir la variable unidad como string, supongo.

  while not isDiskIn(unidad[1]) then
  begin
    // TODO: Definir la variable "cancel_load" como Boolean
    cancel_load := (MessageBox(application.Handle,
                               'Introduzca el CD correcto',
                               'pon un titulo acá', MB_RETRYCANCEL) = IDCANCEL);

    if cancel_load then
      break;
  end;


  if not cancel_load then
  begin
    descomprimir();
    Application.CreateForm(Tcentral, central);
    Application.CreateForm(Tdades, dades);
    Application.CreateForm(Tmultiple, multiple);
    Application.CreateForm(Tllengues, llengues);
    Application.CreateForm(Tdocumentacio, documentacio);
    Application.CreateForm(Tbuscabierta, buscabierta);
    Application.CreateForm(Tabreviaturas, abreviaturas);
    Application.CreateForm(Tnotacionfonetica, notacionfonetica);
    Application.CreateForm(Tintroduccion, introduccion);
    Application.CreateForm(Tfuentescas, fuentescas);
    Application.CreateForm(Tdedicatoria, dedicatoria);
    Application.CreateForm(Tindibiblio, indibiblio);
    Application.CreateForm(Tindicacionesbibliograficas, indicacionesbibliograficas);
    Application.CreateForm(Tabreviaturastxt, abreviaturastxt);
    Application.CreateForm(Tpopuplema, popuplema);
    Application.CreateForm(Tcredits, credits);
    Application.CreateForm(Tmapagrafies, mapagrafies);
    Application.CreateForm(Tcarga, carga);
    Application.Run;
  end;
end;

De esta forma, el código del evento FormCreate de la portada ya no será necesario y puedes eliminarlo.

Saludos.