Código Delphi [-] ubicacion:=ExtractFilePath(Application.ExeName)+'imagenes'; // ubicacion es la carpeta con nombre imagen dentro de la carpeta donde esta la aplicacion openpicturedialog1.InitialDir:=ubicacion;
ubicacion:=ExtractFilePath(Application.ExeName)+'imagenes'; // ubicacion es la carpeta con nombre imagen dentro de la carpeta donde esta la aplicacion openpicturedialog1.InitialDir:=ubicacion;