Código Delphi [-] ... dir := IncludeTrailingPathDelimiter(edit1.Text); // Incluye delimitador si no existe mascara:= '*.*'; if FindFirst(dir + mascara, faAnyFile, SR) = 0 then ...
... dir := IncludeTrailingPathDelimiter(edit1.Text); // Incluye delimitador si no existe mascara:= '*.*'; if FindFirst(dir + mascara, faAnyFile, SR) = 0 then ...