Помогите плиз сделать отрисовку без мерцания стандартными средствами Blackbox

Пусть, есть некий контрол. Например, манометр со стрелочкой.
У клнтрола есть PROCEDURE  (c: Control) Paint-(f: Views.Frame)
Попробовал вот так:
PROCEDURE Paint(c: Control; f: Views.Frame);
VAR w, h, u: INTEGER;
p: Ports.Port;
BEGIN
u := f.unit;
c.context.GetSize(w, h);
p := f.rider.Base();
p.OpenBuffer(f.gx DIV u, f.gy DIV u, (f.gx + w) DIV u, (f.gy + h) DIV u);
c.Paint(f);
p.CloseBuffer();
END Paint;
Все отрисовывается без мерцания по Action (примерно раз в секунду).
Но документ, содержащий Control отрисовывается некорректно.
проблемы получаются и при прокрутке и просто когда документ свернуть и развернуть.
Остальная часть документа  рисуется частично.

Как стандартным способом перенаправить отрисовку controla на Bitmap?
А потом корректно отобразить