Hola.
1º fallo: eso no es un bucle. Sí lo son los whiles, repeat y for.
2º fallo: ¿dónde está declarada x? ¿Qué valor tiene al principio? Consejo:
x:=x+1; se puede escribir
Inc(x); (queda más bonito
).
3º fallo: Pon en Interval un valor de 35000 para que pasen 35 segundos.
4º fallo: ¿De qué debería salir
exit;? Exit sirve para salir del procedimiento o función, no cierra la aplicación (que se haría con
Close; del formulario principal, con
Application.Terminate; o con
Halt;), ni anula el evento OnTimer para la próxima vez (esto se hace
Timer1.Enabled:=False;)
Salu2.