Вниз
Скачать: CL | DM;

Функции в Delphi   Найти похожие ветки 

 
Id   (2006-08-02 16:24) [0]

Еще раз здраствуйте.
Вопрос по function.
Ee можно использовать для получения какого-то результата с входными параметрами. Выходной параметр один - Result.
А если мне надо несколько выходных параметров?
Подскажите синтаксис.(Если это возможно)


 
Alkid ©   (2006-08-02 16:30) [1]

Это можно сделать несколькими методами.
Самый простой: определять параметры по ссылке:

function sumAndCheck(a,b : integer;var c : integer) : boolean;
begin
 c := a + b;
 Result := c < 10;
end;

Данная функция суммирует 2 числа и возвращает true, если сумма меньше 10.
При этомо на так же возвращает И результат - через параметр c.

Синтаксис для вызова:

var r : integer;
    b : boolean;

begin
  b :=  sumAndCheck(10,15,r);
end;

Теперь в b - результат сравнения,  а  в r - сумма


 
Zeqfreed ©   (2006-08-02 16:35) [2]

function SomeRoutine(out OutParam; var VarParam) : ReturnParam;
begin
 OutParam := VarParam;
 Result := Whatever;
end;


See Also: Delphi Help: Parameter semantics


 
Сергей М. ©   (2006-08-02 16:37) [3]


> А если мне надо несколько выходных параметров?


К функции как таковой это отношения не имеет.


 
Desdechado ©   (2006-08-02 16:40) [4]

У тебя Result может быть и массивом типизированным или даже разнотипным, если он Variant.
Не запутайся только.
Возврат функцией нескольких значений, особенно разнотипных, говорит о плохом проектировании.


 
Id   (2006-08-02 16:52) [5]

Огромное спа!


 
Ega23 ©   (2006-08-02 17:06) [6]

Как Result ты можешь и класс и рекорд получить. А в нём уже всё, что тебе надо.

type
 TОфигеннаяСтруктура=record
    ОфигенныйПараметр1 : Boolean;
    ОфигенныйПараметр2 : Integer;
    ОфигенныйПараметр3 : String;
   ............
 end;

function Ля_ля:TОфигеннаяСтруктура;




Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.043 c
15-1153806797
Ega23
2006-07-25 09:53
2006.08.20
С Днём рождения! 25 июля


1-1152266221
kyn66
2006-07-07 13:57
2006.08.20
Не удаляется иконка из трея


2-1153490304
Destroyer
2006-07-21 17:58
2006.08.20
Заполнение буфера


2-1154374453
rem2
2006-07-31 23:34
2006.08.20
Как остановить выполнение процедуры/функции?


6-1143783537
guru-ru
2006-03-31 09:38
2006.08.20
Несколько WebBrouserофф




   Наверх