Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Заставить выполнять все ф-ции в if Func1 and Func2

Автор: Delphist 7.8.2007, 18:56

Есть такая конструкция

Код


if Func1 and Finc2 and Finc3 and FuncN then //Func1, Func2..FuncN - функции
begin
...
end

Так вот если Func1 = False, то Delphi остальные функции не выполняет можно ли его заставить выполнить все Func именно в if'e.

Автор: ALeXandrK 7.8.2007, 19:02

Просто выполнять ф-ии отдельно и записывать результат каждой ф-ии.
А потом условие проверять на записанных результатах. Т.е. ф-ии в условия не ставить.

Автор: ivan219 7.8.2007, 19:06

Код


 if Func1 then Ar[X] := True;
.
.
 if FuncN then Ar[Xn] := True;

 while Ar[I] do
  begin
   if I = Xn then ...
   Inc(I);
  end;

Вобщем гдето так.

А зачем тебе такой изврат???

Автор: volvo877 7.8.2007, 19:15

Цитата(ivan219 @ 7.8.2007, 19:06

)

Вобщем гдето так.

Лучше - так:

Код


{$B+}
if Func1 and Finc2 and Finc3 and FuncN then
begin
...
end
{$B-}

Автор: ivan219 7.8.2007, 19:33

Цитата(volvo877 @ 7.8.2007, 19:15

)

Лучше - так:

Воистину

Автор: aktuba 7.8.2007, 20:55

Цитата

if Func1 and Finc2 and Finc3 and FuncN then //Func1, Func2..FuncN - функции

Слушай, пересмотри подход... Бред какой-то...

Автор: DBZ 7.8.2007, 21:39

Юзай {$BOOLEVAL ON} до кода обработки и {$BOOLEVAL OFF} после кода

Автор: MetalFan 7.8.2007, 22:43

DBZ, смотри выше пост volvo877 ;)