Как выводить на экран пикселы без

← →
Miller © (2003-03-03 16:43) [0]

Вопрос заключается в следующем: необходимо организовать режим поочередного вывода пикселов на экран. Наличие строчки 1 либо строчки 2 (см. код) обеспечивает данный режим, но экран моргает, что некрасиво. При остутствии этих строчек, пикселы сначала рисуются в памяти, а потом появляются все вместе.
for i:=0 to N-1 do begin dLat:=y-round(Latitude[i]*Scale_Factor); dLong:=x+round(Longtitude[i]*Scale_Factor); Form1.Image1.Canvas.Pixels[dLong,dLat]:=ClBlack; Application.ProcessMessages; { 1} // Form1.Image1.Refresh; { 2} Sleep(50); end;

← →
MBo © (2003-03-03 16:46) [1]

Form1.DoubleBufferd:=True попробуй

Спасибо. Помогает. Только скорость появления очень низкая :(. Кстати в 7-й версии такого бага нет. Т.е. с Application.ProcessMessages работает без моргания.

Как выводить на экран пикселы без Найти похожие ветки