Código Delphi [-] procedure TForm1.Guardarimagen1Click(Sender: TObject); begin SavePictureDialog1.Execute; Dbimage1.Picture.Bitmap.SaveToFile(SavePictureDialog1.FileName); end;
procedure TForm1.Guardarimagen1Click(Sender: TObject); begin SavePictureDialog1.Execute; Dbimage1.Picture.Bitmap.SaveToFile(SavePictureDialog1.FileName); end;