Работа с PDF-документами

[Sacred_bpk]

Пользователь наштамповал PDF-документов, теперь хочет, что бы я в своем проекте ему их показывал. Я ему говорю: давай в JPEG и все будут счастливы! А он ни в какую...

Кто может дать направление поисков? Как ему этот PDF показать?

 

[ONIM]

QuickPDFLibrary было в одной из тем "Компонентов для Delphi". Помимо просто просмотра pdf файлов можно создавать, редактировать, печатать и еще много чего...

 

[Superjeka]

Gnostice PDFtoolkit VCL тоже, если не ошибаюсь.

 

[Decoding]

PDF

kn_tnpdf
Gnostice PDFtoolkit ProPlus(VCL)
llPDFLib 3.6 Full Source
Quick PDF LIbrary 7.21
VisPDF Lib 4.10 Full Source
WPDF 3 Source (2007 Repack)

[HIDE=0]fileserve
ifolder
letitbit[/HIDE]

 

[gulliver13]

эти компоненты работают с C++Builder 6?

 

[Greenpeace]

эти компоненты работают с C++Builder 6?

Посмотри, некоторые с оберткой для CBuilder. Есть такие, которые конкретно для Delphi... но мастером можна наштамповать h файлы и пакет для установки компонентов в CBuilder 6...

 

[WanoGr]

вместе с adobReader поставляется activex (для меня оказалось самым быстрым решением)

 

[Sacred_bpk]

вместе с adobReader поставляется activex (для меня оказалось самым быстрым решением)

ага... Качнул архив. Попробовал демки. Все что встало на Delphi 2010 работает без проблем. Но... все компоненты для создания PDF, все создают и показывают в просмотрщике по умолчанию. Как бы функционал для меня излишний, мне сейчас всего лишь просматривать надо.

Средствами делфи импортировал Adobe Reader ActiveX в компонент и решил проблему просмотра. Теперь буду делать DB-версию, просмотр PDF сох раненого в базе данных.

 

[zashiki2009]

Тока теперь когда будешь поставлять приложение конечному пользователю этот activex должен быть у него также установлен. Но это я так к слову...

 

[Sacred_bpk]

Тока теперь когда будешь поставлять приложение конечному пользователю этот activex должен быть у него также установлен. Но это я так к слову...

Это ж азбука
а если чисто теоретически... ну не хочу таскать за собой adobereader. Чем тогда лучше показать PDF?

 

[zashiki2009]

Сори тогда за спам, если это азбука. Лично для меня activex это не гуд (намучился я с ними в свое время, поэтому, наверное, и отписался) ровно как и то, что сегодня заказчику (шефу или кто у тебя там) надо только просматривать PDF, завтра (99%) надо будет уже его редактировать и т.д. Поэтому я бы обратил внимание на компоненты которые были выше, тем более, что они не требуют (если не ошибаюсь) никаких предустановленных средств на стороне клиента. Однако с pdf работал так давно, что сейчас ничего толкового сказать не могу по поводу того, чем его показывать

 

[Sacred_bpk]

Полностью согласен по всем пунктам.
Поступлю наверное как обычно: временный быстрый вариант с ActiveX, а потом начнем копать предложенные здесь компоненты.

 

[voyager99]

Я вещь это ActiveX

 

[Sacred_bpk]

Я вещь это ActiveX

Нафиг ActiveX!
Разобрался с Quick PDF LIbrary 7.21
TQuickPDF.Rander и показываем где хотим. Без гемора таскать за собой Adobe Reader

 

[Sacred_bpk]

Случаем ни у кого нет Quick PDF LIbrary которую DelphiXE скушает?
Версия, которую тут давали, в DelphiXE работать не хочет. При компиляции QuickPDF.pas не находит QuickPDF0721.dcu. В Delphi2010 работало все без проблем.

 

[Sacred_bpk]

Так... звиняйте.... вопрос снят.
Разобрался с текущей версией. Вместо использования dcu-файлов попробовал прицепить имеющуюся DLL:

unit QuickPDFDLL;

interface

uses QuickPDFDLL0721 ;

Type
TQuickPDFDLL = class(TQuickPDFDLL0721)
public
constructor CreateUnLock ;
end;

implementation

uses Dialogs ;

{ TQuickPDFDLL }

constructor TQuickPDFDLL.CreateUnLock;
Var
UnlockResult: Integer;
begin
Create('QuickPDFDLL0721.dll') ;
UnlockResult := UnlockKey('jy4p34jy6ye34r4596je36t7y');
if UnlockResult <> 1 then
ShowMessage('Неверный лицензионный ключ');
end;

end.

Собственно все изменения в проекте

 

[UnderDark]

а как заставить Quick PDF работать с русско названными файлами? У меня при открытии вылетает ошибка имени файла

 

[kiray]

Quick PDF LIbrary 7.21 а вот где скачать полную версию а то всюда лайт

 

[Sacrator]

а как заставить Quick PDF работать с русско названными файлами? У меня при открытии вылетает ошибка имени файла

Я нашёл такое решение

procedure TfrmMain.Button1Click(Sender: TObject);
var
  PDFLibrary: TQuickPDF;
  UnlockResult: Integer;
  fs: TFileStream;
begin
  PDFLibrary := TQuickPDF.Create;
  try
    UnlockResult := PDFLibrary.UnlockKey('password');
    if UnlockResult = 1 then begin
      fs:=TFileStream.Create('D:\путь к файлу\какой-то файл.pdf',fmOpenRead);
      PDFLibrary.LoadFromStream(fs);
      fs.Free;
      //Работаем с файлом
    end else begin
      ShowMessage('Invalid license key for QuickPDF');
    end;
  finally
    PDFLibrary.Free;
  end;
end;

 

[l_e_v]

Synopse PDF Engine
http://synopse.info/files/pdf/synpdf.zip