Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 28-07-2015
shoulder shoulder is offline
Miembro
 
Registrado: abr 2008
Posts: 441
Poder: 17
shoulder Va por buen camino
Delphi - PDFCreator - Ajustes

Por un error mio, entregue a una empresa un programa que funciona si el usuario de la pc es administrador porque setea el pdfcreator. El usuario no tiene permisos para entrar a la registry y cuando va a grabar pide nombre de archivo, lugar.. etc. Hay forma de setear el pdfcreator por codigo aunque sea que me lo grabe en un directorio predeterminado con un nombre generico y despues yo hago un copy o rename? sin pedir nada al usuario o forzar al prg a entrar como administrador sin saber el usuario del mismo.
Les dejo lo que habia hecho y funciona bien como administrador de la pc.

Código Delphi [-]

  Image.SaveToFile('c:\certificacion\'+edit1.text+'\scanner\'+trim(edit1.text)+cambiodia+'_'+inttostr(  cantidad)+'.bmp');



 PrinterIndex := Printer.Printers.IndexOf('PdfCreator');


    with TRegistry.Create do
  try
    NewPath := 'c:\\certificacion\\'+edit1.text+'\\scanner';
    RootKey := HKEY_CURRENT_USER;
    if OpenKey('\Software\PDFCreator.net\settings\ConversionProfiles\0', True) then
    begin
      WriteString('FileNameTemplate',edit1.Text+cambiodia+'_'+inttostr(cantidad));
      WriteString('OpenViewer','False');

    if OpenKey('\Software\PDFCreator.net\settings\ConversionProfiles\0\AutoSave', True) then
     begin
        WriteString('TargetDirectory', NewPath);
        WriteString('Enabled', 'True');
     end;
     CloseKey;
    end;
  finally
    Free;
  end;



     QuickReport1:=TQuickReport1.Create(self);

   quickReport1.Printersettings.printerindex :=  printer.printers.indexof('PDFcreator') ;
   quickreport1.QRImage1.Picture.LoadFromFile('c:\certificacion\'+edit1.text+'\scanner\'+edit1.Text+cam  biodia+'_'+inttostr(cantidad)+'.bmp');


    quickreport1.QRImage1.Repaint;
    quickreport1.print;
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
impresion por comandos con pdfcreator URBANO Impresión 2 04-03-2015 14:40:00
PDFCreator llamar pasando parametros Auto-guardado y nombre lacovera Impresión 2 25-06-2010 10:54:12
Acceder a la interface de PDFCreator hob Impresión 0 09-11-2006 21:16:54
Como utilizar las funciones de PDFcreator hob Impresión 0 08-11-2006 13:43:16
Ajustes de horario Javier_A Varios 1 30-06-2004 13:31:18


La franja horaria es GMT +2. Ahora son las 12:11:02.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi