¿Que tal con un bucle?
Código Delphi
[-]
program miprograma;
uses
SysUtils;
begin
while TRUE do
begin
end;
end.
Aunque puede que necesitemos que la CPU respire:
Código Delphi
[-]
program miprograma;
uses
SysUtils;
begin
while TRUE do
begin
Sleep(10);
end;
end.