S
shanghuaguo
Unregistered / Unconfirmed
GUEST, unregistred user!
我想把form1/框架frame21/paintbox1 的坐标原点位置改变，于是在
form1的oncreat事件中加入如下代码：
procedure TForm1.FormCreate(Sender: TObject);
begin
SetViewportOrgEx (Frame21.PaintBox1.Canvas.Handle,Frame21.PaintBox1.ClientWidth div 3,Frame21.PaintBox1.ClientHeight div 3,nil);
end;
可是在paintbox中画图时，坐标原点还是在原来默认的左上角，该怎么做才行？
form1的oncreat事件中加入如下代码：
procedure TForm1.FormCreate(Sender: TObject);
begin
SetViewportOrgEx (Frame21.PaintBox1.Canvas.Handle,Frame21.PaintBox1.ClientWidth div 3,Frame21.PaintBox1.ClientHeight div 3,nil);
end;
可是在paintbox中画图时，坐标原点还是在原来默认的左上角，该怎么做才行？
