Procedimiento completa de basura otras variables

[Enan0]

No hay tal Clase TPASSEmailStirng.. es solo un const!
TPassEmailString = String[CPassEmailLen];
donde CPassEmailleng=50; Que es una tonteria que con usar
TPasEmailsTring=String[50] ya eta. pero bueno como se usa por otros lados (el CPAss....) esta declarado..
Lo mas extraño de todo es Que "solo hace en esta unidad" en el resto funciona Bien..,
Si te fijas he comentado una funcion (en linea superior al procedimiento) que es exactamente lo mismo, pero Funcion..
Y no da problemas..
Bueno como dije.. es muy extraño..