[Neftali [Germán.Estévez]]

Da error en esta línea:

Código Delphi [-]
  if s30 then

No se si puede haber sido un problema con las etiquetas al poner el mensaje.
Tal vez sea mejor que subas el PAS como archivo adjunto.

AÑADO: Hay algun error más, como si faltase parte del código; Por ejemplo, no hay definición para: strList