[chutipascal]

¡Pero como va a caer la noche vieja en el dia de mes 13!

if nochevieja <> 31 then 
    MessageDlg('Despierta pollo....¿Resaca, no?', mtInformation,
      [mbOk], 0);