咋么在Form里画图，比如画关于数学坐标的！

Question

在其的canvas下！

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
var
    ca:TCanvas;
begin
  ca:=TCanvas.Create;
  try
    ca.Handle:=GetWindowDC(Form1.handle);
    ca.Brush.Color:=clred;
    Ca.FillRect(rect(50,50,300,300));
  finally
    ca.Free;
  end;
end;

Answer 2

我用Image.canvas 画的，但是不知道，有没有直接画数学坐标的方法！

Answer 3

form.canvas.line
form1.canvas.Ellipse

Answer 4

Image1.Cancas.pixels[x,y]:=clblack;
用连续的点画成线，但比较慢：（
直线的话用lineto就可以了

Answer 5

我搞定了，是画了个方框来代替的，谢谢大家！
用的是moveto和lineto