Buscar una imagen, renombrarla y moverla de carpeta

[tazzito]

ya haber vamos a ver
1-. agrega el componente Microsoft Commond Dialog controls
2-. configuralo en las propiedades para que solo muestre archivos de imagen
3-. para abrir el cuadro de dialogo (commondDialog1.showOpen )
4-. el archivo seleccionado queda en la propiedad Filename de dicho CommondDialog
5-. para generar el nombre del archivo destino (donde copiaras la imagen es)
ArchivoDestino = app.path & "\" & variabledeNumero & ".jpg"

6-. para copiarlo es
filecopy (commondialog1.filename, ArchivoDestino)

7-. para cargar la imagen en el picture es
picture1.picture = LoadPicture (ArchivoDestino)


espero te sirva.