Interação de uma aplicação Delphi com Acrobat

Delphi

06/10/2005

Estou desenvolvendo uma aplicação q transforma um arquivo .prn em um arquivo PDF... Meu problema eh quando mando meu documento PDF para impressão e naum consigo fechar somente o documento e naum o Acrobat... Estou tendo q fechar o Acrobat toda vez q imprimo um arquivo pois logo apos tenho q deletar o arquivo PDF.

Eis meu codigo...
[
if ShellExecute(0, ´printto´, PChar(ChangeFileExt(AArquivo, ´.pdf´)), PChar(sNomeImp), nil, SW_HIDE) <= 32 then
Exit
else
begin
iTimer := 0;
repeat
sleep(1000);
iTimer := iTimer + 1;
if iTimer > 10 then Break;
HwndPDF := FindWindow(nil, PChar(´Adobe Reader - [´ + ChangeFileExt(ExtractFileName(AArquivo), ´.pdf´) + ´]´));
if HwndPDF = 0 then Continue else Break;
until (HwndPDF <> 0);

repeat
if HwndPDF <> 0 then
SendMessage(HwndPDF, WM_CLOSE, 0, 0);
HwndPDF := FindWindow(nil, PChar(´Adobe Reader - [´ + ChangeFileExt(ExtractFileName(AArquivo), ´.pdf´) + ´]´));
if HwndPDF <> 0 then Continue else Break;
until (HwndPDF = 0);

if FileExists(ChangeFileExt(AArquivo, ´.pdf´)) then
DeleteFile(ChangeFileExt(AArquivo, ´.pdf´));

]

Gostaria de saber se ha alguma maneira de eu obter um Handle ou algo parecido do documento pdf para q eu possa fechar somente o documento para exclui-lo sem fechar o acrobat...

Agradeço desde jah a atenção!


Tiago Malveira

Tiago Malveira

Curtidas 0
POSTAR