Cómo prevenir que se cierre???

[jachguate]

algo rudimentario puede ser:

program ServidorGopher;

uses
  IdGopherServer;

{$R *.res}

var Server: TidGopherServer;

begin

  Server := TidGopherServer.Create(nil);
  Server.Active := True;
  repeat until false;
end.

que nunca terminaría su ejecución..

ahora, esto te va a cargar el sistema con un ciclo infinito que consumirá al procesador...

Es mas sano, diria yo, poner el componente en un form, y que quede a la espera hasta que el form sea cerrado, no te parece?

hasta luego.