Como hacer una mascara especifica

[ecfisa]

Hola Paulao.

Si estas usando las funciones FindFirst y FindNext, no veo otra forma de hacerlo que como te dice Caro.
Ya que no hay (o al menos no conozco yo) niguna manera de excluir un nombre de archivo de una selección hecha con comodines en el S.O. Windows.

Saludos.

[Paulao]

No, creo que no mi entendieron. Voy a explicar mejor. Necesito de la mascara, para decir al programa que tipo buscar. Esto funciona asi. Un RadioGroup, con tres botones que quiero hacer dos. Un Todos, Noticia y otro Classificado. Voy sacar el boton Noticia y si quedará solo Todos y Class. Quando premo el boton Class, el crea la mascara *.-CLASS.tif, entonces el solo va a buscar todo que tiene este formato. Acontece que Todos, son los seguintes: *.-CADE.tif, *.-LEIL.tif,*.-ECON.tif,*.-AGRI.tif y *.-NOT.tif. Quando yo premer el boton varios el busque qulquier cosa que no sea *.-CLASS.tif. O sea, una forma de yo hacer *.*, pero que exclua los CLASS. Si yo consigo hacer una exclusion de CLASS en la forma *.*, yo resuelvo mi problema, o sea, me lo trae todo que no sea CLASS. Esto yo no consigo hacer.

[ecfisa]

Hola Paulao.

O sea, una forma de yo hacer *.*, pero que exclua los CLASS.

Creo entender con claridad lo que estás buscando. El problema es que no se puede utilizar un filtrado con exclusión como intentas.

La limitante no es de Delphi sino del propio sistema operativo. Por ejemplo, si hacemos desde el command prompt:

C:\>DIR *.*-CLASS.TIF

Recibimos el mensaje "No se encuentra el archivo" aunque existan archivos en el directorio raíz.


Basados en el sistema operativo, FindFirst y FindNext actúan del mismo modo:

Código Delphi [-]
var
  SR: TSearchRec;
begin
  case FindFirst('*.*-CLASS.TIF', $FF, SR) of
    0: ShowMessage('Todo OK');
    1: ShowMessage('Función incorrecta');
    2: ShowMessage('No se encuentra el archivo');
    3: ShowMessage('No se encuentra la ruta');
    4: ShowMessage('Demasiados archivos abiertos');
    //...
  end;
end;

En este caso también obtenemos el mensaje: "No se encuentra el archivo"

Como te sugirió Caro, la exclusion del archivo debe hacerce con posterioridad al filtrado. Al menos yo no veo manera de hacerlo desde la máscara en sí.

Si estas utilizando, o tenés en mente otra forma de realizarlo, por favor ponenos el código para poder brindarte una mejor ayuda.

Saludos.