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

    −50

    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
    ...
TMAINForm = class (TForm)
...
  N50:TMenuItem;
  N51:TMenuItem;
  N52:TMenuItem;
...

end;

implementation

{$include ../common/common_main.inc}

    После 10 лет развития проекта возникла потребность вынести куда-то повторяющийся код.

    Запостил: tucvbif, 24 Января 2016

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

    • ava tucvbif 24.01.2016 11:07 # 0

      Забыл написать: в описании класса содержатся декларируются методы N50Click, N51Click и т.д., а в inc-файле — реализуются.
      Ответить

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