Ver Mensaje Individual
  #2  
Antiguo 22-11-2011
Lenny Lenny is offline
Miembro
 
Registrado: jun 2007
Posts: 161
Reputación: 17
Lenny Va por buen camino
Talking Solucionado!!!

Me autorrespondo:

Quedaria de esta manera:

Abrimos el PDF en cuestion...
Código Delphi [-]
 
procedure TObjetivosCalidadIngreso.AbrirPDF(Sender: TObject);
begin
  if opendialog1.Execute then
  begin
    AcroPDF1.LoadFile(opendialog1.FileName);
  end;
end

Luego, Guardamos:
Código Delphi [-]
 
procedure TObjetivosCalidadIngreso.GuradarPDF(Sender: TObject);
begin
copyfile(pchar(OpenDialog1.FileName),pchar('C:\DOCUMENTOS\Nombre a elegir.pdf'),false);
end;

Gracias de todos modos!!!

Última edición por Lenny fecha: 22-11-2011 a las 17:22:28.
Responder Con Cita