• Б (22.11.08 09:34) [0]
    Удалено модератором
    Примечание: http://www.delphimaster.ru/forums.shtml#rule Рекомендуется: п.2
  • Vetal (22.11.08 17:18) [1]
    Рисовать на отдельном Bitmap'е, а затем его выводить.
  • Б (23.11.08 14:06) [2]
    Можно поподробнее... с кодом.
  • Vetal (23.11.08 22:05) [3]
    TMyControl = class(TGraphicControl)
    protected
     procedure Paint; override;
    end;

    TMyControl.Paint;
    var
     Bmp: TBitmap;
    begin
     Bmp := TBitmap.Create;
     try
       Bmp.Width := Width;
       Bmp.Height := Height;
       рисуем на битмапе
       ...
       выводим
       BitBlt(Canvas.Handle, 0, 0, Width, Height, Bmp.Canvas.Handle, 0, 0, SRCCOPY);
     finally
       Bmp.Free;
     end;
    end;



    Битмап можно хранить и отдельно.
Есть новые Нет новых   [134431   +10][b:0][p:0.001]