Problemas al usuar FilenameEdit
 

Hola amigos de este foro:
Estoy desarrollando mi proyecto en Delphi7, el problema surge al programar el modulo de la Restaura, pues necesito un control que me de la posibilidad de buscar el archivo a restaurar, uso un control de las RX que se llama FilenameEdit y me da el siguiente error:

La verdad que no se que hacer, pues quite el control y intente hacerlo con el control OpenDialog y el error persiste. ¿Alguien podría ayudarme?

Mis amigos me han comentado que ese error lo ha generado el control FilenameEdit, pero la verdad es que no se como solucionarlo.


En espera de su ayuda :confused:
Un servidor
De antemano muchas gracias.

Hola,

Y cómo usas el componente en cuestión... ¿lo situas en el formulario? Tal vez lo usas en tiempo de ejecución, pero, tratas de hacerlo antes de haber creado el componente... las violaciones de acceso, entre otras cosas, van por ahí: se trata de hacer uso de un objeto/componente no creado o previamente destruido... habría que ver... :)

La verdad es que yo uso ese componente y nunca he tienido problema alguno.

Se me ocurre que tal vez sea que tu asumes que el usuario a seleccionado un archivo y hacer el proceso (el que sea) y a lo mejor el usuario no ha seleccionado nada....
Tal vez antes de hacer nada, debería verificar que efectivamente se ha seleccionado algo..

Código Delphi [-]
if FilenameEdit1.FileName <> '' then

Hola,

O, directamente:

Código Delphi [-]
if FileExists(FilenameEdit1.FileName) then
  {...}

Rx
 

dec, si situo el componente en el formulario. Pues el esta creadoy no destruido, eso es lo curioso.

ArdiIIa, pues da el error aun habiendo seleccionado un archivo cualquiera.

salu2
Ledian

jEJE.... El que un fichero exista.. no quiere decir que el usuario lo haya seleccionado... :D

Venga.... ya queda poco.... estás hoy desbocao.... :D:D:D ánimo....

Bueno, era mucho asumir....
¿Por qué no pones un poco de código para que veamos exactmente donde te salta la excepción ?

O acaso la execpción de la da el componente sin hacer nada de nada... ??

Hola,

ArdiIIa, he recuperado tu anterior mensaje, porque, oyes, puedes llevar razón, además de que yo no he usado nunca el componente en cuestión y quién sabe...

Respecto del problema del compañero... tal vez el error no esté en el componente de marras, sino en otro lugar, ¿no?... quizás deberías correr el programa "paso a paso" en ese punto...

Cof, cof, cof, cof... :D :D :D

[quote=dec]Hola,

ArdiIIa, he recuperado tu anterior mensaje

[quote]

Oyes... Que es eso de recuperar mensajes borrados sin mi permiso...:D:D:D

Otro pa mi cuenta ??

Ok
 

Mil de grasias amigos. Pues me rendi, ya no uso ese control. Pues me e ido por la via de usar un DirectoryEdit y le e hecho unos arreglos a mi codigo. ahora me queda asi y no da error alguno.

Código Delphi [-]
procedure TSalvaForm.BitBtn2Click(Sender: TObject);
var
 CaminoBD : string;
...
CaminoBD := DirectoryEdit2.Text + '\BDCheques.zip';
  if not(FileExists(CaminoBD)) then
    begin
     Application.MessageBox('No se encuantra el Archivo de restaura, por favor intetelo de nuevo ', 'Cheques', MB_OK or MB_ICONERROR);
     Abort;
    end
...

end;

El unico inconveniente es que los usuarios no ven el archivo de restaura, solo que seleccionan el posible camino. Que de la otra forma podian localizar el archivo ademas de que se lo filtraba por el nombre y extencion del archivo. De veras que es una lastima que no sepa donde esta el error.
pero de todas formas muchas grasias a todos.

Salu2
Ledian

Veo en este código, que utilizas primeramente utilizas un mensaje para dar el aviso al usuario y luego lanzas un Abort (Raises a silent exception.)

No sería mejor un simple exit; y salir sin mas.

ok
 

Tienes razon.
Con el Exit, se sale del procedure actual.

mil gracias. Es válida su aclaracion.

Salu2
Ledian