Problema con condiciones

[Anel Hernandez]

Cierto! aki va:

Código Delphi [-]
if  (LowerCase(RightStr(SR.Name,4))='.inp') and (LowerCase(LeftStr(SR.Name,6))='calmet') then calcular;

[[oscarac]]

Empezado por Anel Hernandez

Cierto! aki va:


Código Delphi [-]if (LowerCase(RightStr(SR.Name,4))='.inp') and (LowerCase(LeftStr(SR.Name,6))='calmet') then calcular;

te hago una pregunta.....
y que pasaria si el archivo cambia de nombre? por uno mas largo o por uno mas corto?

[Anel Hernandez]

hola,

Los ficheros son generados por un programa que siempre pondria como mascara del nombre una palabra predefinica que es la que leo, luego pudieran agregarsele numeros etc. Por eso con comprobar que la cadena inicial es igual a la predefinida me vale.

gracias