Page 1 of 1

возврат флага/значения процедурой

Posted: 05.05.2006 17:26
by L'inconnu
что-то вроде такого можно реализовать?

if procedure_name(...) then

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

Re: возврат флага/значения процедурой

Posted: 05.05.2006 18:33
by CFA
для этого в паскале используються функции:

Code: Select all

function sqr(i : integer) : integer;
begin
    result := i * i;
end;
...
    b := sqr(5); //25

Code: Select all

    if procedure_name(...) then
можно только если procedure_name(...) имеет тип boolean, если у нее другой тип то надо так

Code: Select all

    if procedure_name(...) = value then

Posted: 16.05.2006 15:41
by L'inconnu
суперско, работает, добрался наконец до этого. СПАСИБО!