obtener path de un TDialog

[[Caral]]

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