Ver Mensaje Individual
  #3  
Antiguo 07-10-2005
Avatar de epuigdef
epuigdef epuigdef is offline
Miembro
 
Registrado: jul 2005
Posts: 196
Reputación: 19
epuigdef Va por buen camino
Bien, pongo el código que utilizo para enviar faxes, pero el problema es que sólo con los ficheros PDF tengo problemas, los faxes se envían correctamente pero si son archivos PDF el acrobat se queda abierto.
Código Delphi [-]
function SendFax(filename : String; number : String) : Integer;
var Srv : FAXCOMLib.FaxServer;
var Doc : FAXCOMLib.FaxDoc;
begin
Srv := FaxServerClass.Create();
Srv.Connect(nil);
srv.Retries := 5;
Doc := FAXCOMLib.FaxDoc(Srv.CreateDocument(filename));
Doc.FaxNumber := trim(number);
SendFax := Doc.Send();
srv.Disconnect;
end;


Por cierto, cómo es la dirección de la página de trucomania?

Gracias

Edu
Responder Con Cita