|
mira a mi me paso algo similar pero guardando la imagen que tenia en un Timage simulando un Paint de windows y el problema con el saveToFile es que no te va a agregar la extension, se la tenes que agregar vos, por ejemplo
ruta:='c:\fotos';
nombreImagen:='Pirulo';
extension:= '.JPG';
imagen.saveToFile (ruta+nombreImagen+extension)
demas esta decir que podes poner
image.SaveToFile (ruta+savedialog1.filename+'.jpg')
y listo!
|