×××Delphi中如何实现VC中Ondraw()的自动刷新功能（高手帮帮我啊！）×××

把你的画画在 TPanel 控件上呀！

解决方案 »

  1.   

    哦，这样就行了吗？那如果我就是画在form上呢，我想Delphi一定有办法解决的啊
      

  2.   

    To  riddler(笑傲江湖):
       如何使用啊？举个简单例子好吗？
      

  3.   

    To  riddler(笑傲江湖):   举个简单例子好吗？
      

  4.   

    在Form.OnPaint事件中画图。
      

  5.   

    Form1的OnPaint事件，是在窗口的每次重画时触发：
    procedure TForm1.FormPaint(Sender: TObject);
    var
      MyCanvas: TCanvas;
    begin
      MyCanvas := Form1.Canvas;
      MyCanvas.Ellipse(1, 1, 100, 100);
    end;
      

  6.   

    同意楼上的意见，VC中的OnDraw()和Delphi中的OnPaint事件是一会事