|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#31
|
|||
|
|||
Цитата:
например к нейже можно отнести неиспользование проверок на ошибки а для оптимизации в данном коде достаточно ввести одну булеву переменную |
#32
|
||||
|
||||
Чо шумишь, у нас в проекте такое нередко попадается, притом писалось мужыками с ВО (профессианалими программирования на поцкале).
|
#33
|
|||
|
|||
Короче, резюмируя. Это форум не только для бородатых мегагуру, которые взглядом правого глаза перегружают методы, взглядом левого проводят такой рефакторинг, что дядюшка Фаулер умиляется, а пристальным взглядом обоих глаз применяют шаблоны заставляя GoF нервно хихикать, осознавая собственную ничтожность (а о том, что творится с беднягой Влессидесом вообще упоминать не стоит).
Складывается такое впечатление, что г-н robt приходит на форум не для того, что бы помочь (или попросить помощи), а что бы доказать всем, какой он раскрутой мегаспец (хотя я что-то не припомню, что бы он очень уж часто высказывал какие-то мысли насчет вопроса, он чаще критикует демонстрируемое решение и вступает в перепалки). Готов спорить, что в следующем своем посте он выскажет все что думает и о Фаулере и о GoF, просто потому что нужно что-то сказать. Кстати, топикстартер не появляется уже давно. Как вы думаете, это из-за того, что решение нашлось или еще почему-то? |
#34
|
||||
|
||||
Код:
type TButton = class(StdCtrls.TButton) private procedure CMMouseEnter(var Message: TMessage); message CM_MOUSEENTER; procedure CMMouseLeave(var Message: TMessage); message CM_MOUSELEAVE; end; TForm1 = class(TForm) Button1: TButton; Image1: TImage; ... { TButton } procedure TButton.CMMouseEnter(var Message: TMessage); begin Form1.Image1.Picture.LoadFromFile('2.bmp'); end; procedure TButton.CMMouseLeave(var Message: TMessage); begin Form1.Image1.Picture.LoadFromFile('1.bmp'); end; http://data.cod.ru/152238 Пишу программы за еду. __________________ |