Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Заставить выполнять все ф-ции в if Func1 and Func2 
V
    Опции темы
Delphist
Дата 7.8.2007, 18:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2145
Регистрация: 3.2.2004
Где: всегда в сети

Репутация: 2
Всего: 3



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

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

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


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
ALeXandrK
Дата 7.8.2007, 19:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 342
Регистрация: 31.1.2007
Где: Санкт-Петербург

Репутация: 3
Всего: 6



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


Это сообщение отредактировал(а) ALeXandrK - 7.8.2007, 19:12


--------------------
Богат не/ни тот, у кого много, а тот, кому хватает
PM WWW   Вверх
ivan219
  Дата 7.8.2007, 19:06 (ссылка) |  (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: 2
Всего: 12



Код

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

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


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

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

Это сообщение отредактировал(а) ivan219 - 7.8.2007, 19:12
PM MAIL ICQ   Вверх
volvo877
Дата 7.8.2007, 19:15 (ссылка) |    (голосов:4) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2073
Регистрация: 15.11.2004

Репутация: 14
Всего: 116



Цитата(ivan219 @  7.8.2007,  19:06 Найти цитируемый пост)
Вобщем гдето так.

Лучше - так:

Код

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

PM MAIL   Вверх
ivan219
  Дата 7.8.2007, 19:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: 2
Всего: 12



Цитата(volvo877 @  7.8.2007,  19:15 Найти цитируемый пост)
Лучше - так:

Воистину smile 
PM MAIL ICQ   Вверх
aktuba
Дата 7.8.2007, 20:55 (ссылка) |    (голосов:2) Загрузка ... Загрузка ... Быстрая цитата Цитата


Смышленный
***


Профиль
Группа: Завсегдатай
Сообщений: 1915
Регистрация: 24.4.2006
Где: Планета Земля

Репутация: 16
Всего: 38



Цитата

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


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


--------------------
user posted image
PM MAIL WWW Skype   Вверх
DBZ
Дата 7.8.2007, 21:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 4
Регистрация: 7.8.2007

Репутация: нет
Всего: нет



Юзай {$BOOLEVAL ON} до кода обработки и {$BOOLEVAL OFF} после кода
PM MAIL   Вверх
MetalFan
Дата 7.8.2007, 22:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 62
Всего: 128



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


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0508 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.