Разработка и реализация программных средств для работы с веб-контентом в рамках проекта INTERIN PROMIS

}

PrintToPdfDialog::~PrintToPdfDialog()

{

delete ui;

}

void PrintToPdfDialog::onChoosePageLayoutButtonClicked()

{

#ifndef QT_NO_PRINTER

QPrinter printer;

printer.setPageLayout(currentPageLayout);

QPageSetupDialog dlg(&printer, this);

if (dlg.exec() != QDialog::Accepted)

return;

currentPageLayout.setPageSize(printer.pageLayout().pageSize());

currentPageLayout.setOrientation(printer.pageLayout().orientation());

updatePageLayoutLabel();

#endif // QT_NO_PRINTER

}

void PrintToPdfDialog::onChooseFilePathButtonClicked()

{

QFileInfo fi(filePath());

QFileDialog dlg(this, tr("Save PDF as"), fi.absolutePath());

dlg.setAcceptMode(QFileDialog::AcceptSave);

dlg.setDefaultSuffix(QStringLiteral(".pdf"));

dlg.selectFile(fi.absoluteFilePath());

if (dlg.exec() != QDialog::Accepted)

return;

setFilePath(dlg.selectedFiles().first());

}

QString PrintToPdfDialog::filePath() const

{

return QDir::fromNativeSeparators(ui->filePathLineEdit->text());

}

void PrintToPdfDialog::setFilePath(const QString &filePath)

{

ui->filePathLineEdit->setText(QDir::toNativeSeparators(filePath));

}

QPageLayout PrintToPdfDialog::pageLayout() const

{

return currentPageLayout;

}

void PrintToPdfDialog::updatePageLayoutLabel()

{

ui->pageLayoutLabel->setText(QString("%1, %2").arg(

currentPageLayout.pageSize().name()).arg(

currentPageLayout.orientation() == QPageLayout::Portrait

? tr("Portrait") : tr("Landscape")

));

}

Скрипт Inno Setup

#define Name "InterinClient"

#define Version "2.0.5"

#define Publisher "ООО Интерин технологии"

#define URL "http://www.interin.ru"

#define ExeName "InterinClient.exe"

[Setup]

AppId={{89ED2222-8C22-4F0B-A1CC-84770F5498F3}}

AppName={#Name}

AppVersion={#Version}

AppPublisher={#Publisher}

AppPublisherURL={#URL}

AppSupportURL={#URL}

AppUpdatesURL={#URL}

AppVerName={#Name} версия {#Version}

DefaultDirName=c:\Interin\InterinAlpha

DefaultGroupName=Interin

UninstallDisplayIcon={app}\{#ExeName}

OutputDir=D:\repos\Development\Builds\Windows\x32\InterinClient\install

OutputBaseFileName={#Name}_{#Version}_setup

Compression=lzma

SolidCompression=yes

;DiskSpanning=yes

;SlicesPerDisk=3

;DiskSliceSize=10000000

;ArchitecturesAllowed=x64

;ArchitecturesInstallIn64BitMode=x64

[Languages]

Name: "english"; MessagesFile: "compiler:Default.isl"; LicenseFile: "License_ENG.txt"

Name: "russian"; MessagesFile: "compiler:Languages\Russian.isl"; LicenseFile: "License_RUS.txt"

[Tasks]

Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; Flags: unchecked

[Files]

Source: "D:\repos\Development\Builds\Windows\x32\InterinClient\release\{#ExeName}"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "D:\repos\Development\Projects\InterinClient\setup\qt.conf"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "D:\repos\Development\Projects\InterinClient\docs\changelog.txt"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "D:\repos\Development\Builds\Windows\x32\InterinClntMainWnd\release\InterinClntMainWnd.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\libEGL.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\libGLESv2.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\msvcp120.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\msvcr120.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\opengl32sw.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\Qt5Core.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\Qt5Gui.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\Qt5Network.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\Qt5Qml.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\Qt5Quick.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\Qt5WebChannel.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\Qt5WebEngineCore.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\Qt5WebEngineWidgets.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\Qt5Widgets.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\Qt5Xml.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\QtWebEngineProcess.exe"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\bin\Qt5PrintSupport.dll"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\plugins\platforms\qminimal.dll"; DestDir: "{app}\plugins\platforms"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\plugins\platforms\qoffscreen.dll"; DestDir: "{app}\plugins\platforms"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\plugins\platforms\qwindows.dll"; DestDir: "{app}\plugins\platforms"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\resources\*"; DestDir: "{app}\resources"; Flags: ignoreversion recursesubdirs createallsubdirs

Source: "C:\Qt\Qt5.7.0\5.7\msvc2013\translations\qtwebengine_locales\*"; DestDir: "{app}\translations\qtwebengine_locales"; Flags: ignoreversion recursesubdirs createallsubdirs

;Source: "E:\install\dotNetFx40_Full_x86_x64.exe"; DestDir: "{tmp}"; Flags: deleteafterinstall; Check: not IsRequiredDotNetDetected

[Registry]

Root: HKCU; Subkey: Software\Interin; Flags: createvalueifdoesntexist uninsdeletekey;

Root: HKCU; Subkey: Software\Interin\InterinClient; Flags: createvalueifdoesntexist;

Root: HKCU; Subkey: Software\Interin\InterinClient\ModulesManager; Flags: createvalueifdoesntexist;

Root: HKCU; Subkey: Software\Interin\InterinClient\ModulesManager; ValueType: string; ValueName: main_module; ValueData: MainWindow; Flags: createvalueifdoesntexist;

Root: HKCU; Subkey: Software\Interin\InterinClient\ModulesManager\MainWindow; Flags: createvalueifdoesntexist;

Root: HKCU; Subkey: Software\Interin\InterinClient\ModulesManager\MainWindow; ValueType: string; ValueName:module_file; ValueData: InterinClntMainWnd.dll; Flags: createvalueifdoesntexist;

Root: HKCU; Subkey: Software\Interin\InterinClient\ModulesManager\MainWindow; ValueType: string; ValueName: module_path; ValueData: c:/Interin/InterinAlpha/; Flags: createvalueifdoesntexist;

[Icons]

Name: "{group}\Interin"; Filename: "{app}\{#ExeName}"

Name: "{group}\{cm:UninstallProgram, {#Name}}"; Filename: "{uninstallexe}"

Name: "{userdesktop}\Интерин Alpha"; Filename: "{app}\{#ExeName}"; Tasks: desktopicon

;[Messages]

;#include "messages_rus.txt"

;[Code]

;#include "InterinClient.pas"

[Run]

;Filename: regedit.exe; Parameters: "/s {tmp}\registry.reg";

;Filename: {tmp}\dotNetFx40_Full_x86_x64.exe; Parameters: "/q:a /c:""install /l /q"""; Check: not IsRequiredDotNetDetected; StatusMsg: Microsoft Framework 4.0 is installed. Please wait...

[UninstallRun]

Filename: regedit.exe; Parameters: "/s -HKEY_CURRENT_USER\Software\Interin";

Размещено на Allbest.ru