Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.16;
Скачать: CL | DM;

Вниз

Обход двумерного массива   Найти похожие ветки 

 
raymond ©   (2005-09-21 10:40) [0]

Насколько верна данная конструкция?
     
   fExit := false;
       for i := 0 to a do
         begin
             if fExit then Break;
             for j := 0 to b do
                if Code = CodesArray[i, j] then
                     begin
                         // Код найден
                         fExit := true;
                         Break;
                     end;
         end;


Спасибо!


 
umbra ©   (2005-09-21 10:55) [1]

синтаксически верна. А чего предполагается достичь?


 
Digitman ©   (2005-09-21 12:20) [2]

будучи беспардонно вырванной из контекста использования данная конструкция не может быть материалом для сколь-либо серьезного обсуждения ее "верности"


 
raymond ©   (2005-09-21 13:08) [3]

Уточняю. Если условие выполнятеся во вложенном цикле, то нужно прекратить обработку.


 
Digitman ©   (2005-09-21 13:44) [4]


> raymond ©   (21.09.05 13:08) [3]


если эта т.н. "обработка" достаточно часто вызывается и используется в разных фрагментах проекта, то логичней было бы оформить ее в виде отдельной ф-ции, например:

function IsCodeValid(параметры): Boolean;
begin
 Result := True;
 for i := 0 to a do
    for j := 0 to b do
       if условие_истинно then
         Exit; //выход из ф-ции с рез-том True (код найден)
 Result := False;
end;


 
umbra ©   (2005-09-21 13:45) [5]


> Уточняю. Если условие выполнятеся во вложенном цикле, то
> нужно прекратить обработку.


тогда тоже верна


 
raymond ©   (2005-09-21 14:02) [6]


> Digitman ©   (21.09.05 13:44) [4]
>
> если эта т.н. "обработка" достаточно часто вызывается и
> используется в разных фрагментах проекта, то логичней было
> бы оформить ее в виде отдельной ф-ции, например:


Вобщем-то да, согласен.

Digitman, umbra, большое человеческое  С П А С И Б О!



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

Текущий архив: 2005.10.16;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.047 c
14-1127730098
boriskb
2005-09-26 14:21
2005.10.16
Кто здесь спорит об антивирусах?


14-1127395657
Kot Andrei
2005-09-22 17:27
2005.10.16
Соломон и Руссинович


5-1100270416
SergV
2004-11-12 17:40
2005.10.16
Свойство Transperent в компоненте Panel.


3-1125482468
Layner
2005-08-31 14:01
2005.10.16
Инсталляция серверной части ПО на MSSQL 2000


3-1125497727
Dmitrich
2005-08-31 18:15
2005.10.16
Почему БД (interBase 6.0) не работает с диска?