| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Поиск координаты точки [D7, WinXP]
Larry © (2004-02-10 16:38:00)Вообщем у меня есть массив класса TPoint! В процессе
работы задается еще одна точка с определенными координатами. Как мне перебрать все точки в массиве и если какая-лиюо точка с такими же координатами имеется, выйти из цикла??? Заранее благодарен....
Fenik (2004-02-14 10:41:00) [21]functionPointInArray( constA: array ofTPoint; constP: TPoint): Boolean;
vari: Integer;
begin
Result := False;
fori := 0 toHigh(A) do
if(A[i].x = P.x) and(A[i].y = P.y) then begin
Result := True;
Break;
end;
end;
KilkennyCat (2004-02-11 22:55:00) [22]a я предпочитаю repeat until ... удобнее в данном случае, ИМХО.
MBo (2004-02-11 12:26:00) [23]сравнение в Паскале реализуется с помощью операторов if и =
Larry (2004-02-11 11:22:00) [24]Блин, ну попросил же, хоть бы пример, что ли? Я знаю что циклом. Дык как нужно перебирать и [b]сравнить идентичность[/b]. В ентом-то вся и сложность!!!!!!!!!1
MBo (2004-02-10 16:45:00) [25]цикл for
Break
| |
Страницы: 