Показать сообщение отдельно
Лжэц
:|
Аватар для Лжэц
Сообщения: 1,747
Регистрация: 14.01.2009
Старый пост, нажмите что бы добавить к себе блог 7 июня 2011, 17:55
  #1405 (ПС)
-Цитата от Ридл Гатофель Посмотреть сообщение
-Цитата от Лжэц Посмотреть сообщение
ребята нужна помощь,кто подскажет как сделать поиск по TreeView в Delphi.
нашел например вот так:
Показать скрытый текст
Если вы хотите производить поиск по дереву, может быть для того, чтобы найти узел, соответствующий определенному критерию, то НЕ ДЕЛАЙТЕ ЭТО ТАКИМ ОБРАЗОМ:
for i := 0 to pred(MyTreeView.Items.Count) do
begin
if MyTreeView.Items[i].Text = 'Банзай' then
break;
end;



...если вам не дорого время обработки массива узлов.

Значительно быстрее будет так:
Noddy := MyTreeView.Items[0];
Searching := true;
while (Searching) and (Noddy <> nil) do
begin
if Noddy.text = SearchTarget then
begin
Searching := False;
MyTreeView.Selected := Noddy;
MyTreeView.SetFocus;
end
else
begin
Noddy := Noddy.GetNext
end;
end;

только непойму куда это и как это.
можете показать на этом примере ?
https://www.hip-hop.ru/forum/attachment.php?attachmentid=...1304704769
Я гляжу, ты заебись продвинулся с прошло раза.

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

offline
Ответить с цитированием