componenet pdf para delphi
Olá!!
Estou usando um componente PDF Viewer for Delphi, mas estou com pronlemas... O arquivo é um .odt e este componente faz a visualização dele em .pdf, mas quando mando imprimir não sai nada na impressora. Alguém tem alguma idéia do que pode ser, pois sempre funcionava, mas como reistalaram o servidor aqui pode ser q esteja faltando alguma coisa... talvez até no registro... sei lá... pois no software acredito estar tudo certo.
Estou usando um componente PDF Viewer for Delphi, mas estou com pronlemas... O arquivo é um .odt e este componente faz a visualização dele em .pdf, mas quando mando imprimir não sai nada na impressora. Alguém tem alguma idéia do que pode ser, pois sempre funcionava, mas como reistalaram o servidor aqui pode ser q esteja faltando alguma coisa... talvez até no registro... sei lá... pois no software acredito estar tudo certo.
Daia
Curtidas 0
Respostas
Daia
01/07/2009
alguém??
GOSTEI 0
Steve_narancic
01/07/2009
Eu não uso componente, eu simplesmente salvo o arquivo em uma pasta temporária, e rodo um shellexecute abrindo o arquivo no próprio adobe reader.
GOSTEI 0
Daia
01/07/2009
E vc pode me dar um exemplo de como fazer isso, pois atualmente está assim:
if chkArqTec.Checked[I] then
begin
cTipoArq := Copy(chkArqTec.Items[I], Pos(´-´, chkArqTec.Items[I]) + 2, 255);
qryArqTec.ParamByName(´cRefer´).AsString := edtcRefer.Text;
qryArqTec.ParamByName(´cTipoArqTec´).AsBCD := StrToFloat(cTipoArq, -1);
qryArqTec.Open;
while not qryArqTec.Eof do
begin
if not qryArqTec.FieldByName(´Arquivo´).IsNull then
ImprimeDoc(qryArqTec.FieldByName(´Arquivo´).AsString, chkArqTec.Items[I]);
qryArqTec.Next;
end;
qryArqTec.Close;
end;
O imprimeDoc pega o meu arquivo .odt e salva em .pdf e imprime ele...
Como posso fazer da maneira que tu disse? Deve ser mais simples...
Obrigada!!
if chkArqTec.Checked[I] then
begin
cTipoArq := Copy(chkArqTec.Items[I], Pos(´-´, chkArqTec.Items[I]) + 2, 255);
qryArqTec.ParamByName(´cRefer´).AsString := edtcRefer.Text;
qryArqTec.ParamByName(´cTipoArqTec´).AsBCD := StrToFloat(cTipoArq, -1);
qryArqTec.Open;
while not qryArqTec.Eof do
begin
if not qryArqTec.FieldByName(´Arquivo´).IsNull then
ImprimeDoc(qryArqTec.FieldByName(´Arquivo´).AsString, chkArqTec.Items[I]);
qryArqTec.Next;
end;
qryArqTec.Close;
end;
O imprimeDoc pega o meu arquivo .odt e salva em .pdf e imprime ele...
Como posso fazer da maneira que tu disse? Deve ser mais simples...
Obrigada!!
GOSTEI 0
Daia
01/07/2009
?????
GOSTEI 0
Osocram
01/07/2009
Daia... vc me parece que ja esta meio desesperada
heheheheheh
calma ae que estamos tentando ajudar.
shellExecute(´c:\Arquivo.pdf´, ´´, ´´ , ´print´);
tenta isso acho q era assim a sintaxe
heheheheheh
calma ae que estamos tentando ajudar.
shellExecute(´c:\Arquivo.pdf´, ´´, ´´ , ´print´);
tenta isso acho q era assim a sintaxe
?????
GOSTEI 0
Daia
01/07/2009
KKKK... estou mesmo...
GOSTEI 0
Osocram
01/07/2009
daia eu mandei uma MP p vc.
GOSTEI 0
Daia
01/07/2009
não recebi nada...
GOSTEI 0
Daia
01/07/2009
desculpa... achei!!
GOSTEI 0