Código Delphi [-] if OpenDialog1.execute then Origen := Opendialog1.filename; if SaveDialog1.execute then destino := SaveDialog1.filename; //aqui el resto de tu código
if OpenDialog1.execute then Origen := Opendialog1.filename; if SaveDialog1.execute then destino := SaveDialog1.filename; //aqui el resto de tu código