Delphi

               procedure TForm1.FormCreate(Sender: TObject);

               var

                        err : Integer;

                        ret : Boolean;

                        PrinterName : string;

               begin

                       PrinterName := 'Delphi App';

                       //My application has Admin Privileges and so will create the printer at runtime and use it only when required

                        ret := PaperlessPrinterAxJPGX1.JPGDriverInitialize(PrinterName, err);

                        ret := PaperlessPrinterAxJPGX1.SetAsDefault;

                       //Enable the printer using your License Key

                        PaperlessPrinterAxJPGX1.SetActivationKey('EMA20-U6XV5-B4Y7A-2253Z-DY63C');

                        ret := PaperlessPrinterAxJPGX1.IsPrinterEnabled;

                       if (PaperlessPrinterAxJPGX1.IsPrinterReady) then

                          begin

                                      PaperlessPrinterAxJPGX1.FileName = "E:\\Data\\1.jpg";

                                     PaperlessPrinterAxJPGX1.CreateNewFolder = false;

                                     //PaperlessPrinterAxJPGX1.ShowConverionProgress = false;

                                     //PaperlessPrinterAxJPGX1.ShowPropertiesDialog = true;

                                         //PaperlessPrinterAxJPGX1.ShowSpoolProgress = false;

                                          //PaperlessPrinterAxJPGX1.PromptForOverWrite = false;

                                  //This function has to be called to save the current assigned properties.

                                  //A fail to this call, will take the default settings

                               PaperlessPrinterAxJPGX1.SaveSettings();

                          end;                        

               end;