Как можно избавится от перебора?

← →
Anton. (2003-12-03 12:50) [0]

for j:=0 to MainMenu1.Items.Count-1 do
begin
if MainMenu1.Items[j].Name="REPORTS" then
MainMenu1.Items[j].Add(NewItems[k]);
end;

← →
Юрий Федоров © (2003-12-03 12:53) [1]

MainMenu1.Items[j] - это компонент, следовательно
его можно найти методом FindComponent формы- владельца

← →
Reindeer Moss Eater © (2003-12-03 12:54) [2]

Но перебрать-то все элементы все равно придется.

← →
Babay © (2003-12-03 13:10) [3]

А так не подойдет?

Var J:Integer;
c:TMenuItem;
begin
j:=-1;
c:=MainMenu1.Items.Find("Reports");
if c<>Nil then
j:=MainMenu1.Items.IndexOf(c);

... :=))#
Судя по вопросу это
"if c<>Nil then
j:=MainMenu1.Items.IndexOf(c);
"
и ненужно

сразу делаем
c.Add(NewItems[k]);

Блин.... чета я намутил (пора домой)
вот так короче

Var
c:TMenuItem;
begin
c:=MainMenu1.Items.Find("Reports");
if c<>Nil then
c.Add(NewItems[k]);

думаю подход ясен у TMenuItem тоже есть Find....

Как можно избавится от перебора? Найти похожие ветки