Fórum Abrir Arquivo PDF atraves do Delphi #289838
28/07/2005
0
Gostaria de saber se alguem sabe como abrir um arquivo pdf atraves do delphi
A.fracassi
Curtir tópico
+ 1
Responder
Posts
28/07/2005
Semchance
Olha se vc quer simplesmente abrir o arquivo tente isso...
uses
Shellapi;
procedure TForm1.Button1Click(Sender: TObject);
var
Pdir: Pchar;
begin
GetMem(pDir,256);
StrPCopy(pDir, ´c:\ArquivoPdf.pdf´); {Aqui vc coloca o caminho + o nome do arquivo}
ShellExecute(0, nil, ´ArquivoPdf.pdf´, nil, Pdir, SW_NORMAL);
FreeMem(pdir,256);
end;
Agora se vc quer abrir, o pdf debtro de um form ai eu não sei....
uses
Shellapi;
procedure TForm1.Button1Click(Sender: TObject);
var
Pdir: Pchar;
begin
GetMem(pDir,256);
StrPCopy(pDir, ´c:\ArquivoPdf.pdf´); {Aqui vc coloca o caminho + o nome do arquivo}
ShellExecute(0, nil, ´ArquivoPdf.pdf´, nil, Pdir, SW_NORMAL);
FreeMem(pdir,256);
end;
Agora se vc quer abrir, o pdf debtro de um form ai eu não sei....
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)