PDF-Dokumente aus Delphi drucken

[Matze]

Delphi-Quellcode:

function IsAcrobatInstalled: Boolean;  //Adobe Acrobat Reader
var reg: TRegistry;
begin
  Result := false;
  reg := TRegistry.Create(KEY_READ);
  with reg do
  begin
    try
      RootKey := HKEY_CLASSES_ROOT;
      if OpenKey('CLSID\{CA8A9780-280D-11CF-A24D-444553540000}', False)
        then Result := true
    finally
      CloseKey;
      Free
    end
  end
end;