Зависимость скорости API GetDiBits от... фиг поймёшь чего.

[Mikle]

Делаю такой тест - очищаю PictureBox, у которой Visible=False с помощью Line(0, 0)-(w, h), Color, bf (это быстрее, чем Cls), забираю изображение в массив с помощью API функции GetDiBits, далее вывожу на форму с помощью SetDiBitsToDevice и замеряю fps. При некоторых параметрах получаю fps=200, компилирую программу, запускаю скомпилированную - fps=70, отключаю опции оптимизации, компилирую - fps=70, компилирую в P-Code - fps=70. Запускаю из среды - fps=200.
Далее, запускаю любую из скомпиленных программ, но не закрываю среду VB6 - fps=200, даже если среда свёрнута в панель задачь. При работе программы закрываю среду VB6 - fps остаётся 200. Соответственно, если программу запустить без наличия среды, а потом запустить среду - fps остаётся 70.
Исключением выяснил, что меняет скорость GetDiBits.
Так же, как среда VB6, на работу программы влияет запущенный Internet Explorer, но не влияет проводник.

[Хакер]

То есть среда и IE ускоряют работу программы? Причём только если среда или IE были открыты именно на момент рождения процесса твоей программы?

[Mikle]

То есть среда и IE ускоряют работу программы? Причём только если среда или IE были открыты именно на момент рождения процесса твоей программы?

Да, вот пример, конкретно этот EXE-шник ведёт себя так, исходник присутствует.

[Хакер]

Блин. Сколько раз говорил людям не использовать DoEvents для организации подобных циклов. Всё равно используют.

В DoEvents есть вызов Sleep. В DoEvents есть обращения к реестру с целью получения информации об EventMonitor-ах. В DoEvents вагон и маленькая тележка всяких тяжеловесных штуковин.

[Qwertiy]

А что надо использовать?

[Хакер]

Сформулируй вопрос полностью. Только не пользуйся словом «вместо» и «взамен».

[Qwertiy]

Сформулируй вопрос полностью.

Блин. Сколько раз говорил людям не использовать DoEvents для организации подобных циклов. Всё равно используют.

А что надо использовать для организации подобных циклов?

[Хакер]

Ты думаешь вопрос «что надо использовать взамен DoEvents», задавание которого я запретил, многим хуже вопроса «что надо использовать взамен DoEvents»?

Хорошо. У меня этот демопример выдаёт 1200 fps. Внимание вопрос: зачем вообще иметь такой цикл, который генерирует 1200 кадров в секунду, если монитор способен показать только ~70 кадров в секунду?

[Mikle]

Сколько раз говорил людям не использовать DoEvents для организации подобных циклов.

До сих пор наоборот, слышал только противоположное - "не забывайте DoEvents!".
Я убирал GetDiBits - скорости выравнивались. И я проверил на других компьютерах - такого нет. Подозреваю, что зависит от видюшки/её драйвера/его настроек. На компе, где такая зависимость есть - встроенный Intel G31/G33.

Внимание вопрос: зачем вообще иметь такой цикл, который генерирует 1200 кадров в секунду, если монитор способен показать только ~70 кадров в секунду?

Естественно, в таком виде цикл никому не нужен, это просто тест скорости. Я формирую изображение на битмапе и отправляю его в текстуру DirectX или в спрайт SR2D.
1200 fps - это под семёркой? Там GetDiBits и SetDiBitsToDevice ускоряются аппаратно.

[Хакер]

До сих пор наоборот, слышал только противоположное - "не забывайте DoEvents!".

Надо отправлять в топку все советы в стиле «делайте так», которые ограничиваются этим самым «делайте так», и не заставляют задумываться, что к чему.

Ну а насчёт того, что DoEvents в подобных циклах, это настоящее зло, можешь почитать тут:
1) viewtopic.php?f=1&t=41820
2) viewtopic.php?f=1&t=40185
3) Ещё что-то тут http://forum.sources.ru/index.php?showt ... ew=showall — но по-моему только с отсылами на меня.

1200 fps - это под семёркой?

Да ни за что на свете. Это под Windows XP.

[ger_kar]

И я протестировал (Процессор Core2Duo 4500 (2,2ГГц) nForce570 Видео GeForce 6600GT) на Windows XP.
У меня хоть в скомпилированном виде, хоть под IDE дает одинаковый и неизменный результат 112-115.
Причем VB IDE и IE6 вообще на показания никаким боком не влияют, как я только не пробовал.

И я так и не понял какая вообще может быть взаимосвязь между DoEvents и открытым VB IDE, либо EI влияющим на производительность. Походу DoEvents здесь вообще никаким образом на такое поведение влиять не должен.

[Qwertiy]

1200 fps - это под семёркой?

У меня под семёркой 600-700, под другой - около 400. Запуск IE ни на что не влияет. Запуск VB6 ни на что не влияет (где 600-700, где 400 - нет VB6).

Ты думаешь вопрос «что надо использовать взамен DoEvents», задавание которого я запретил, многим хуже вопроса «что надо использовать взамен DoEvents»?

Есть же конкретный код, про него и спрашиваю.
Собственно, по ссылкам из твоего последнего поста вроде понятно.

[Хакер]

И я так и не понял какая вообще может быть взаимосвязь между DoEvents и открытым VB IDE, либо EI влияющим на производительность. Походу DoEvents здесь вообще никаким образом на такое поведение влиять не должен.

Сколько можно повторять. Если взять DoEvents в виде исходника, выйдет пару тысяч строк кода. Там всякие разные COM-вызовы, вроде бы как даже иногда межпроцессные. Я уже не помню деталей. Но суть примерно такая. Так что влиять оно может.

[Хакер]

Кстати, сама фраза

под семёркой? Там GetDiBits и SetDiBitsToDevice ускоряются аппаратно.

звучит достаточно абсурдно.

[Mikle]

Хакер, вот ты тоже не вникаешь в то, что тебе пишут. Я конкретизировал, что тормозит именно GetDiBits. Сейчас я убрал DoEvents, сделал так, как в твоей первой ссылке. Как и следовало ожидать, программа продолжает вести себя так же. Я ПРИНЯЛ ВО ВНИМАНИЕ информацию на счёт DoEvents, впредь буду пользоваться указанной альтернативой, но В ДАННОМ ПРИМЕРЕ ДЕЛО НЕ В ЭТОМ.
На компьютере стоит WinXP SP3, встроенное видео - Intel G31/G33, процессор - Core2 Quad Q6600.
На других компьютерах я тоже этого эффекта поймать не могу, но пока других со встроенным видео и WinXP не попадалось.

звучит достаточно абсурдно

Там используется DirectX для пользовательского интерфейса, подробнее не скажу, не уточнял, но убеждался не раз - GetDiBits и SetDiBitsToDevice работают в разы быстрее. А вот TextOut, к примеру, значительно медленнее.

[Хакер]

Хорошо, если ты сам понимаешь, что проблема наблюдается только под одной конкретно взятой конфигурации, и не получается воспроизвести её на других конфигурациях, то чем мы (или конкретно я) можем помочь?

но убеждался не раз - GetDiBits и SetDiBitsToDevice работают в разы быстрее

Ну это значит, что они её просто оптимизировали

[ger_kar]

и не получается воспроизвести её на других конфигурациях, то чем мы (или конкретно я) можем помочь?

НУ как вариант проверить на своих компах и убедиться в наличии/отсутствии эффекта или даже глюка. Я к тому же могу и на аналогичной конфигурации как как у майкла потестить, так как у меня есть компьютеры на Intel G31, причем там есть как встроенное видео, так и отдельная видеокарта GF9500GT.
Завтра я достану такой комп и потестирую.

[Qwertiy]

Если взять DoEvents в виде исходника, выйдет пару тысяч строк кода. Там всякие разные COM-вызовы, вроде бы как даже иногда межпроцессные. Я уже не помню деталей.

А для каких целей они там?

[Filyus]

Про альтернативный DoEvents написал здесь:
viewtopic.php?f=1&t=41820&p=6767847#p6767847

Разницы между стандартным DoEvents и альтернативным не заметил. Также, как разницы FPS в Windows XP и Windows 7 - не обеих FPS около 280.