[Oleg]

Как мне организовать запись своей функции, обращение к ней. Возвращать ничего не надо.
Нужно что-то типа:

Код:

1	Function test(Const arg1: string;Const arg2: string;Const arg3: string;)

[aleksnine]

Код:

1 2 3 4

Function TEST (arg1,arg2,arg3:string):String; begin result:= arg1+arg2+arg3; end;

[Oleg]

Как её правильно описать, вызвать ?

[aleksnine]

Код:

1	Label1.caption:=TEST('asd','hgh','ytyr');

[Rosenkrantz]

Фрагменты кода, предназначенные для повторного использования оформляются в виде подпрограмм. Подпрограмма может возвращать какое-то значение, такие подпрограммы в Паскале называются функциями, а может не возвращать ничего, тогда это процедура.

Если в вашем случае возвращать ничего не нужно, то оформляйте процедуру.
Для этого в разделе interface опишите заголовок процедуры:

Код:

1	procedure Имя_процедуры(Имя_Параметра_1: Тип_Параметра_1;...Имя_Параметра_N: Тип_Параметра_N)

Параметры одного типа можно группировать:

Код:

1	procedure Имя_процедуры(Имя_Параметра_1, Имя_Параметра_2: Тип_Параметров_1_и_2;...Имя_Параметра_N: Тип_Параметра_N)

Например:

Код:

1	procedure MyProc(S1, S2: String; N: Integer)

Если вы не планируете изменять значение строкового аргумента внутри процедуры, то лучше передавать его как константу. Для этого перед именем аргумента укажите ключевое слово const:

Код:

1	procedure MyProc(const S1: String)

Такой вызов экономит ресурсы памяти. Для других типов данных также можно указывать const, но на памяти это никак не отразится.
Если у процедуры нет параметров, объявление заканчивается точкой с запятой сразу после имени процедуры:

Код:

1	procedure MyProc;

В разделе implementation размещается реализация процедуры - заголовок, идентичный ранее объявленному, и само тело процедуры:

Код:

1 2 3 4

procedure MyProc(S1, S2: String; N: Integer); begin { тело процедуры } end;

Для использования процедуры нужно в том модуле, где вы собираетесь ее вызывать, в разделе uses указать имя модуля, в котором описана процедура. Непосредственно для вызова процедуры пишете ее имя и указываете фактические параметры:

Код:

1	MyProc(FirstName, LastName, 10);

Все, что написано выше про синтаксис объявления процедур, действительно и для функций.