Código Delphi [-] if Pos(ExtractFileExt(Ruta) + '?', '.GIF?.BMP?.JPG?') <> 0 then
if Pos(ExtractFileExt(Ruta) + '?', '.GIF?.BMP?.JPG?') <> 0 then