Версия 18:36, 23 июня 2024

Шаг 1

Устанавливаем Firebird 32-bit:

1. Каталог для установки можно оставить тот, который предложил инсталлятор.
2. После установки в дополнительных параметрах системы в переменной среды PATH добавляем “путь установки\bin”.

Шаг 2

Устанавливаем и настраиваем компилятор Borland Delphi 7:

1. Устанавливаем Delphi 7.
2. Каталог для установки выбираем c:\Borland\Delphi7 или c:\Delphi7.
3. В процессе установки НЕ СТАВИМ VisiBroker и Borland Interbase.
4. Устанавливаем патч d7_ent_upd1_1-1.exe.
5. Запускаем Delphi 7.
6. Открываем меню Component и выбираем команду Install packages...
7. В списке Design packages ищем позиции Interbase Data Access Components, Internet Direct (Indy) for D7 Property and Component Editors и удаляем.
8. Из папки Delphi7\Source\Vcl удаляем все файлы по маске IB*.* -- IB*.dfm, IB*.pas.
9. Из папки Delphi7\Source удаляем папку Indy.

Шаг 3

1. Создаем папку для размещения исходников: C:\golden.
2. Клонируем ветку Delphi7 из репозитория git. Для этого в командной строке последовательно выполняем команды:

   git cd c:\golden
   git clone --branch delphi7 https://github.com/GoldenSoftwareLtd/gedemin-private.git

Шаг 4

1. Запускаем файл prepare_sources.bat из папки Comp5.
2. Запускаем файл prepare_sources.bat из папки Gedemin.
3. Во всех файлах *.cfg, */dof меняем все папки Delphi5 на папку, куда было установлено Delphi7.
4. В среде Delphi7 открываем проект (файл gedemin7.bpg).
5. В появившемся окне Project Manager появится список всех проектов, входящих в группу Gedemin7.

Поочередно открываем каждый проект, проверяем его свойства (меню Project->Options…), затем Build и для пакетов компонент -- Install.

SynEdit_D7.bpl

     Directories/Conditionals
       Output directory:” ..\..\..\bpl”
       Unit output directory:” ..\..\..\dcu”
       Search path: ” ..\Source;..\..\..\dcu;..\..\..\bpl;$(DELPHI)\Source\Property Editors;..\Source\Toolsapi;$(DELPHI)\Source\Toolsapi”
       DCP output directory: “..\..\..\bpl”

tb2k_d7.bpl

     Directories/Conditionals
       Output directory:” ..\..\..\bpl”
       Unit output directory:” ..\..\..\dcu”
       Search path: “..\Source”
       DCP output directory: “..\..\..\bpl”

tb2kdsgn_d7.bpl

     Directories/Conditionals
     Output directory:” ..\..\..\bpl”
     Unit output directory:” ..\..\..\dcu”
     Search path: “..\Source”
     DCP output directory: “..\..\..\bpl”

fr7.bpl

     Directories/Conditionals
     Output directory:”..\..\bpl”
     Unit output directory:”..\..\dcu”
     Search path: “..\Source”
     DCP output directory: “..\..\bpl”

greference7.bpl

   Directories/Conditionals
     Output directory:”..\bpl”
     Unit output directory:”..\dcu”
     Search path: “$(DELPHI)\Lib\Debug;..\ibx;$(DELPHI)\Source\Toolsapi;$(DELPHI)\Imports;$(DELPHI)\Lib;$(DELPHI)\Source\Rtl\Sys;$(DELPHI)\Source\Vcl;..\gedemin;..\gadmin;..\security;..\addressbook;..\bugbase;..\greference;..\log;..\directorygood;..\messaging;..\queryfilter;..\classtree;..\component;..\component\indy;..\attr;..\storage;..\common;..\bank;..\newtransaction;..\realization;..\component\repository;..\gudf;..\cattle;..\Component\SynEdit\Source;..\inventory;..\const;..\component\repository\gd;..\component\gdc;..\zlib;..\report;..\jcl\Source;..\Component\tb2k\Source;..\transaction;..\property;..\document;..\designer;..\component\gdc;..\setup;..\wage;..\jcl\packages;..\images;..\tax;$(DELPHI)\Ocx\Servers;..\property\functionwizard;..\modem;..\gdcFile;..\component\textdiff;..\imports;..\component\textdiff;..\jcl\Source\windows;..\jcl\Source\vcl;..\jcl\Source\common;..\common\tdbf;..\..\comp5\xstorm;..\..\comp5;..\..\comp5\async4\source;..\ToolsAPI;..\FastReport 4\Source;..\FastReport\source;..\dcu”
   DCP output directory: “..\bpl”
   Conditional defines: DELPHI7

При появлении диалога с предложением изменить greference7 нажать Cancel.

gedemin.exe

   Directories/Conditionals
     Output directory:”..\exe”
     Unit output directory:”..\dcu”
     Search path: “$(DELPHI)\Lib\Debug;c:\borland\delphi7\Lib\Debug;..\jcl\Source;..\jcl\Source\windows;..\jcl\Source\vcl;..\jcl\Source\common;..\jcl\packages;..\ibx;..\..\comp5\xstorm;..\..\comp5;..\FastReport 4\Source;..\FastReport 4\FastScript;..\FastReport 4\Source\ExportPack;..\FastReport 4\Source\ADO;..\FastReport 4\FastQB;..\FastReport 4\Source\IBX;..\FastReport 4\LibD5;..\setup;..\imports;..\component;..\component\diff;..\component\textdiff;..\component\gdc;..\component\repository;..\Component\tb2k\Source;..\Component\SynEdit\Source;..\common;c:\borland\delphi7\Source\Vcl;c:\borland\delphi7\Source\Toolsapi;c:\borland\delphi7\Ocx\Servers;c:\borland\delphi7\lib;..\designer;..\property;..\transaction;..\property\functionwizard;..\document;..\gdcFile;..\FastReport\source;..\report;..\zlib;..\..\comp5\async4\source;..\const;..\inventory;..\wage;..\gadmin;..\security;..\addressbook;..\bugbase;..\greference;..\log;..\directorygood;..\messaging;..\queryfilter;..\classtree;..\attr;..\storage;..\bank;..\newtransaction;..\common\tdbf;..\gudf;..\protect;..\gedemin;..\images;..\tax;..\backup;c:\borland\delphi7\Imports;..\component\repository\gd;..\component\indy;..\test\dunit\src;..\test\GedeminTest;..\dcu;..\ToolsAPI”
     BPL output directory: “..\bpl”
     DCP output directory: “..\bpl”
     Conditional defines:  “SPLASH;MESSAGE;SYNEDIT;GEDEMIN;GED_LOC_RUS;WITH_INDY;DEBUG;DELPHI7;FR4”
     
   Compiler: Пункт Assignable typed constants должен быть отмечен “галкой”.

Gudf.dll

   Directories/Conditionals
     Output directory:”..\exe\udf”
     Unit output directory:”..\dcu”
     Search path: “..\jcl\source;..\component\gdc;..\jcl\source\windows;..\jcl\source\common;..\common”
     BPL output directory: “..\bpl”
     DCP output directory: “..\bpl”

Компиляция платформы Гедымин (Delphi 7) документ