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

[L'inconnu]

что-то вроде такого можно реализовать?

if procedure_name(...) then

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

[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

[L'inconnu]

суперско, работает, добрался наконец до этого. СПАСИБО!