| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
kiskales
Invitado
|
 Publicado: Mie 22 Jun, 2005 5:29 pm Asunto: Extraño comportamiento de RemoveDir |
 |
|
Saludos a tod@s.
Si ejecuto este código con el directorio 'datos' lleno
| Código: |
TSearchRec sr;
if (FindFirst("Datos\\*.*", faArchive, sr) == 0) {
do {
DeleteFile("Datos\\" + sr.Name);
} while (FindNext(sr) == 0);
}
if (RemoveDir("Datos"))
ShowMessage("Datos ha sido borrado");
|
el directorio queda vacío pero no se borra,
pero si vuelvo a ejecutar la aplicación con el directorio 'datos' vacío entonces si se borra
Gracias de antemano a tod@s |
|
| Volver arriba |
|
 |
LordNemesis
Master
Registrado: 31 Dic 2003Mensajes: 340Ubicación: México
|
| Publicado: Mie 22 Jun, 2005 5:39 pm Asunto: |
|
|
Hola....
Desconozco como tengas el llamado a esta funcion, pero tal vez si lo hicieras de manera recursiva te podria funcionar....
_________________
Dirección Municipal de Informática
H. Ayuntamiento de Tijuana
Arriba Lopez Obrador !!!
Los Mexicanos Merecemos Respeto !!! |
|
| Volver arriba |
|
|
kiskales
Invitado
|
| Publicado: Mie 22 Jun, 2005 5:51 pm Asunto: |
|
|
Gracias por responder, pero aunque la llame de forma recursiva no funciona. Solo funciona si salgo de la aplicación y la vuelvo a ejecutar  |
|
| Volver arriba |
|
|
kiskales
Invitado
|
| Publicado: Mie 22 Jun, 2005 6:29 pm Asunto: |
|
|
¡Ya lo solucioné!
Me respondo a mi mismo, faltaba la siguiente línea
después del bucle do {...} while (FindNext(sr) == 0);
ya que si no se pone no se liberan los recursos utilizados por las funciones FindFisrt y FindNext
¡y mira que lo tenía delante! 
Gracias de todas maneras a tod@s |
|
| Volver arriba |
|
|
|
FAQ
Buscar
Miembros
Grupos de Usuarios
Registrarse
Perfil
Entra para ver tus mensajes privados
Entrar
