Цитата МИШАНЧИК:
А не подскажите как правильно секции "Code" объединять друг с другом? »
|
В секции кода могут быть процедуры (procedure) или функции (function), имена у них должны быть уникальные, т.е. два одинаковых имени не допускаются.
Если в какой-нибудь процедуре или функции (назовём её вызывающая функция) есть ссылка на другую процедуру или функцию (назовём её - вызываемая функция), то эта вызываемая функция должна быть расположена выше чем вызывающая функция.
Так же не надо забывать про структуру процедур и функций, т.е.:
Код:

procedure MyProc; // имя процедуры
begin // начало процедуры
// тело процедуры, какой-то код
end; // конец процедуры
Одним словом, сколько begin в процедуре, столько должно быть и end;
Пример объединения двух процедур InitializeWizard:
Код:

procedure InitializeWizard;
var // так обозначают, что будут заданны переменные
s: string; // задана переменная, только для этой процедуры
begin
// код 1
end;
и вторая:
Код:

procedure InitializeWizard;
var
i: Integer; // задана переменная, только для этой процедуры
begin
// код 2
end;
Результат:
Код:

procedure InitializeWizard;
var
s: string;
i: Integer;
begin
// код 1
// код 2
end;
Если коротко, то вот так...
P.S.
Удобней всего объединять скрипты в редакторе от Restools, т.к. у него слева есть окно в котором отображаются имена всех процедур в скрипте и что самое важное, эти имена сортируются не по расположению в скрипте, а по имени, т.е. все дубликаты процедур или функций видны сразу.