Gracias
¡Muchas gracias a todos!
Ahora funciona perfectamente... y ahora me estudiaré bien el porqué (no me gusta tropezar 2 veces en la misma piedra...).
Al, lo de la variable Foto era porque ayer (hoy funciona bien como tú dices) no me cogía los jpg si no lo hacía así (??).
Lo del ghEn no me funciona, pero investigaré un poco (aún no he podido)...
Y, gracias, Roman. Me ha parecido una solución muy elegante, pero he tendio que modificarla:
if (ExtractFileExt(Ruta)<>'') and //para que no tenga en cuenta las carpetas
(Pos(UpperCase(ExtractFileExt(Ruta)) + '?', '.GIF?.BMP?.JPG?')<>0) then
Saludos
__________________
La violencia es el último recurso del incompetente. (Salvor Hardin)
Última edición por Ohcan fecha: 04-02-2005 a las 10:17:46.
Razón: Corregir y ampliar
|