1. Pascal / Говнокод #549

    +152

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    if currIndex=2 then
      begin
      // разкрываем выделенные узлы
        TreeView_U.Items[r].Expanded:=true;
        if TreeView_U.Items[r].Parent <> nil then
        begin
          TreeView_U.Items[r].Parent.Expanded:=true;
          if TreeView_U.Items[r].Parent.Parent <> nil then
          begin
            TreeView_U.Items[r].Parent.Parent.Expanded:=true;
            if TreeView_U.Items[r].Parent.Parent.Parent <> nil then
            TreeView_U.Items[r].Parent.Parent.Parent.Expanded:=true;
          end;
        end;

    Наткнулся тут в прокете. Поначалу просто кусок закоментировал не разбираясь, потому что просто не нужен. Суть - попытка раскрыть полностью ветвь дерева, если в ней есть хоть один выбранный (с помеченным чекбоксом) элемент, о чём говорит currIndex=2.
    Весь офис валяется под столами :)))

    Запостил: guest, 13 Февраля 2009

    Комментарии (5) RSS

    • ava guest 13.02.2009 21:35 # 0

      Keeper:
      Автор не знал про рекурсию?
      Ответить

    • ava guest 13.02.2009 23:32 # 0

      Капитан Очевидность:
      вопрос ^ риторический :))
      Ответить

    • ava guest 17.02.2009 18:37 # −1

      угаг:
      автор не знал, что его код запостят на говнокод :)))
      Ответить

    • ava guest 16.03.2009 02:08 # 0

      Дмитрий:
      а фигле, ну впадло было рекурсивную функцию писать =) А тут быстро не думаю нашлепал, лижбы побыстрее....
      Ответить

    • ava guest 01.04.2009 11:14 # 0

      Del:
      Какая нафиг рекурсия, камрады? При открытии ветки дерева всё, что выше - оно без вашего участия откроется, ЕМНИП.
      Ответить

    Добавить комментарий