Paulo Daniel wrote:
> Olá amigos,
> O comando a seguir faz com que a apresentação *teste.pps* seja executada
> pelo Power Point.
>
> shellexecute (handle, 'open', 'powerpnt.exe','/s "c:\teste.pps"', nil,
> sw_shownormal);
>
>
> Eu gostaria de ao invés de passar o caminho da apresentação no comando
> ("c:\teste.pps"), passar este caminho através de uma variável (exemplo:
> DirPPS).
>
> Então ao executar o comando usando a var:
> shellexecute(handle, 'open', 'powerpnt.exe','/s ' + DirPPS, nil,
> sw_shownormal);
> Ocorre o erro dizendo que os tipos são incopativeis: String e PAnsiChar.
> Já tentei usar o PChar(DirPPS), mas o erro persiste.
>
> Alguém consegue me dar uma luz?
var
VDir: string;
begin
VDir := '/s ' + DirPPS;
ShellExecute(,,, PChar(VDir),,);
--
Joao Morais
