filename de un TDialog devuelve codigo basura
 

Hola!!! tengo una aplicación delphi con mysql y usando zeos. Estoy intentando modificar un campo que pertenece a una foto.
Me explico, lo que yo almaceno en la base de datos no es la foto en sí, sino el path que me lleva hasta ella.
Al abrir el dialogo (TOpenPictureDialog) puedo elegir la foto pero no se almacena el path.

vmodificarferreteria.abrirfoto.FileName ----> me recoge solo basura

vmodificarferreteria.abrirfoto.getpath ------> no me recoge nada

alguien sabe a que puede ser debido??

Hola
Me parece que algo asi:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
 var
   Ruta: String;
begin
   OpenPictureDialog1.FileName:= 'C:\Ibiza.bmp'; // ruta estandart
   OpenPictureDialog1.FileName:= Query1Ruta.Astring; // ruta de la tabla
   Ruta:= OpenPictureDialog1.FileName;
   Image1.Picture.LoadFromFile(Ruta);
end;

Saludos

Gracias por responder Caral!!!

pero la propiedad filename me sigue recogiendo basura (*'@) no puedo obtener el path para almacenarlo en la base de datos

Hola
Segun entiendo en un campo de la base de datos tienes la direccion del archivo, supongo que algo asi C:\Archivo\Tal.
Tambien supongo que este campo sera del tipo string o memo.
No entiendo cual es el problema.
Saludos

yo tengo un formulario que consta de un tdialog, un botón y un timage.

al pulsar el botón se abre el dialógo, selecciono la foto del directorio que desee y ésta se muestra en el timage. Lo que quiero es coger el path de la foto abierta y guardarlo en la base de datos en un campo string. para ello uso la funcion filename pero me devuelve codigo basura (`´Ç)

Hola
Seria interesante ver el codigo como llamas al dialog y el del boton.
A ver como saco el path de estos.
Saludos

ok!! gracias por tu tiempo.

en el botón tengo el siguiente código:

VModificarFerreteria.foto.Show;
ok:=false;
ok:=VModificarFerreteria.abrirfoto.Execute;
if (not ok)then
raise EErrorAbrirFoto.newInstance
else
VModificarFerreteria.foto.Picture.LoadFromFile(VModificarFerreteria.abrirfoto.FileName);
except
on EErrorAbrirFoto do
showMessage('Error al abrir la foto');

/* la foto se carga sin problemas en el TImage */

en el evento onclose del topenpicture dialog tengo el siguiente codigo, donde abrirfoto es el tdialog. se supone que ruta es lo que yo quiero almacenar en la base de datos en un campo string.

ruta:=vmodificarferreteria.abrirfoto.FileName;
showmessage(ruta);

saludos!!

y el showmessage me muestra codigo basura.

Hola
Se supone que ruta es una variable de tipo string.
He echo pruebas y a mi si me enseña la ruta.
Algo mas esta pasando, no se que puede ser.
Saludos

encontré este hilo que me solucionó el problema, gracias caral por tu tiempo. la proxima vez prometo buscar con varias frases, lo dejo aquí por si a alguien le pasa igual que a mí y no lo encuentra antes.

http://www.clubdelphi.com/foros/show...ghlight=timage