danielrgoes Postado Fevereiro 9, 2009 Denunciar Share Postado Fevereiro 9, 2009 (editado) Boa Tarde pessoal Eu tenho um cod assimprocedure TFrm_desenhos.DBGrid1DblClick(Sender: TObject); var caminho :string; Pdir :pchar; begin caminho := 'c:\teste\'+ modulo.cds_desenhosCAMINHO.Value+'.pdf'; GetMem(pDir,256); StrPCopy(pDir, caminho); {Aqui você coloca o caminho + o nome do arquivo} ShellExecute(0, nil,caminho, nil, Pdir, SW_NORMAL); FreeMem(pdir,256); end; ele funciona muito bem quando no lugar de caminho eu coloco a string mesmo 'c:\teste\arquivo.pdf' mais quando eu tento colocar uma variavel porque meu caminho vem do banco da incompatibilidade (Str and PAnsiChar) alguém tem alguma soluçao? muito obrigado Editado Fevereiro 10, 2009 por danielrgoes Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Jhonas Postado Fevereiro 9, 2009 Denunciar Share Postado Fevereiro 9, 2009 Tente assimprocedure TFrm_desenhos.DBGrid1DblClick(Sender: TObject); var caminho :string; Pdir :pchar; begin caminho := 'c:\teste\'+ modulo.cds_desenhosCAMINHO.Value+'.pdf'; GetMem(pDir,256); StrPCopy(pDir, pchar(caminho)); {Aqui você coloca o caminho + o nome do arquivo} ShellExecute(0, nil,pchar(caminho), nil, Pdir, SW_NORMAL); FreeMem(pdir,256); end;abraço Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 danielrgoes Postado Fevereiro 10, 2009 Autor Denunciar Share Postado Fevereiro 10, 2009 Muito Obrigado Jhonas funciou muito bemmmm Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
danielrgoes
Boa Tarde pessoal
Eu tenho um cod assim
procedure TFrm_desenhos.DBGrid1DblClick(Sender: TObject);
var
caminho :string;
Pdir :pchar;
begin
caminho := 'c:\teste\'+ modulo.cds_desenhosCAMINHO.Value+'.pdf';
GetMem(pDir,256);
StrPCopy(pDir, caminho); {Aqui você coloca o caminho + o nome do arquivo}
ShellExecute(0, nil,caminho, nil, Pdir, SW_NORMAL);
FreeMem(pdir,256);
end;
ele funciona muito bem quando no lugar de caminho eu coloco a string mesmo 'c:\teste\arquivo.pdf' mais quando eu tento colocar uma variavel porque meu caminho vem do banco da incompatibilidade (Str and PAnsiChar) alguém tem alguma soluçao?
muito obrigado
Editado por danielrgoesLink para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.