>>Сообщение от hackroute
>>алгоритмы писать я мостак
>>
>>Цитата:Сообщение от hackroute
>>мой алгоритм работает 1 мин а в икснвьюв он проходит за 5 сек)
>Первое противоречит второму =)
не противоречит по одной простой причине - алгоритм и реализация алгоритма есть разные "вещчи" - а на счет того что "ничего кроме проца не использует" - за это спасибо, будем знать куда копать - будем переходить на работу с памятью и вложения ассемблера, раз других способов нет
var ds: tdibsection; p: pointer;
GetObject(image2.Picture.Bitmap.Handle, SizeOf(DS), @DS);
p := pointer(ds.dsBm.bmBits); - указатель на начало растра, получилось быстрее чем сканлайн(и темболее канвас.пиксельс) - теперь алгоритм работает 5 сек - всем спасиб
|