Тест скоростных характеристик некоторых компонентов в Delphi delphid.dax.ru WinSov.com Как-то на досуге написал программку для подсчета количества счастливых билетиков. Для тех, кто не в курсе - это вроде шутка такая, дают тебе в автобусе билет. Там шесть цифр, если сумма первой тройки цифр совпадает со второй, значит, билетик считается счастливым. В общем, это не важно, а важно то, что когда я стал всякие украшательства вешать, всякие там ProgressBar, вывод результатов в Memo и т.д. скорость подсчета значительно упала. И решил я все это потестить отдельно, вот что получилось. Тест 1 в процессе проверки: - Real-Time вывод кол-ва счастливых билетиков(СБ) - работает Progressbar. - работает вывод номеров СБ в RichEdit. - Application.ProcessMessages; Время подсчета 123456 билетов: 15.658 Тест 2 для наглядности список возможностей программы сохранен, но отключенные возможности закоментированы. в процессе проверки: //- Real-Time вывод кол-ва СБ. - работает Progressbar. //- работает вывод номеров СБ в RichEdit. //- Application.ProcessMessages; Время подсчета 123456 билетов: 8.435 Тест 3 в процессе проверки: //- Real-Time вывод кол-ва СБ. //- работает Progressbar. - работает вывод номеров СБ в RichEdit. - Application.ProcessMessages; Время подсчета 123456 билетов: 4.977 Тест 4 в процессе проверки: - Real-Time вывод кол-ва СБ. //- работает Progressbar. //- работает вывод номеров СБ в RichEdit. - Application.ProcessMessages; Время подсчета 123456 билетов: 1.065 Тест 5 в процессе проверки: //- Real-Time вывод кол-ва СБ. //- работает Progressbar. //- работает вывод номеров СБ в RichEdit. //- Application.ProcessMessages; Время подсчета 123456 билетов: 0.04 Тест 6 в процессе проверки: //- Real-Time вывод кол-ва СБ. //- работает Progressbar. //- работает вывод номеров СБ в RichEdit. //- Application.ProcessMessages; - Вместо ProgressBar был использован Gauge Время подсчета 123456 билетов: 0.101 Вывод: прежде чем собачить в процесс какой-нибудь лишний финт, лучше сначала подумать нужен ли он вам...:)