forum.clarionlife.net

SergioRaguzini писал(а): ↑10 Апрель 2022, 20:29 Наверное, этот принтер - лучший вариант.

kreator писал(а): ↑11 Апрель 2022, 13:34 Но есть возможность у пользователя удалить его.

   Printer{PropPrint:Device} = 'Microsoft Print to PDF'
   If Clip(Upper(Printer{PropPrint:Device})) = Upper('Microsoft Print to PDF') then Loc:OK = True.

   If Loc:OK = False
      Printer{PropPrint:Device} = 'Adobe PDF Printer'
      If Clip(Upper(Printer{PropPrint:Device})) = Upper('Adobe PDF Printer') then Loc:OK = True.
   end

   If Loc:OK = False
      Printer{PropPrint:Device} = 'PDF Printer'
      If Clip(Upper(Printer{PropPrint:Device})) = Upper('PDF Printer') then Loc:OK = True
      else
         Message(' Для экспорта отчёта в PDF установите принтер: Microsoft Print to PDF|' & |
            ' или переименуйте сторонний PDF принтер в: PDF Printer','У нас проблема !',Icon:Exclamation,'&1. Закрыть')      
      end
   end
   
   If Loc:OK = True then И вот тут уже понеслась печать на PDF принтер и т.д. ...

kreator писал(а): ↑11 Апрель 2022, 13:34 Некоторые работают по rdp, а там такого варианта нет

Игорь Столяров писал(а): ↑11 Апрель 2022, 14:05 ...На самом деле, как человек спросил - так ему и ответили.

Игорь Столяров писал(а): ↑11 Апрель 2022, 14:05 По хорошему, конечно, надо проявить эрудицию и посмотреть всех....

RaFaeL писал(а): ↑11 Апрель 2022, 14:15 без вот такого хардкода

Игорь Столяров писал(а): ↑11 Апрель 2022, 14:05 По хорошему, конечно, надо проявить эрудицию и посмотреть всех.

SergioRaguzini писал(а): ↑11 Апрель 2022, 14:14 Да, на старых версиях Windows Server нет такого, но на более новых - есть (смотрел сейчас у пользователя),

RaFaeL писал(а): ↑11 Апрель 2022, 15:47 А вот предложению переименовать принтер до искусственного интеллекта очень далеко

kreator писал(а): ↑11 Апрель 2022, 15:53 Совсем относительно недавно искал. Не было такого