Q qiaojoyce Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-20 #2 你可以把图像的长和宽乘以一组整数!如一,二,三之类的整型数! 就能得到比较満意的效果拉!当然也可以用其它类型的数! 方法类同! []
陈 陈桂坚 Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-20 #3 有image1装入一副图片,把image1.stretch属性改为TRUE; procedure TForm1.BitBtn1Click(Sender: TObject); begin image1.Width:=image1.Width+10;//后面的数字随你改 image1.Height:=image1.Height+20; end;
有image1装入一副图片,把image1.stretch属性改为TRUE; procedure TForm1.BitBtn1Click(Sender: TObject); begin image1.Width:=image1.Width+10;//后面的数字随你改 image1.Height:=image1.Height+20; end;
R roy_toy Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-21 #5 放大位图画质就不大好了哦 可以新建一目标位图,分成和源位图点一样多的矩阵 然后扫描源位图的点 把颜色信息填充到矩阵中吧
M mythank Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-21 #7 有image1装入一副图片,把image1.stretch属性改为TRUE; procedure TForm1.BitBtn1Click(Sender: TObject); begin image1.Width:=image1.Width+10;//后面的数字随你改 image1.Height:=image1.Height+20; end; 这个方法
有image1装入一副图片,把image1.stretch属性改为TRUE; procedure TForm1.BitBtn1Click(Sender: TObject); begin image1.Width:=image1.Width+10;//后面的数字随你改 image1.Height:=image1.Height+20; end; 这个方法
M mythank Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-21 #8 qiaojoyce: 你的方法跟那个有代码的一样的吗? 改个属性,然后菜单点击过程里把长和宽改一改就行了? 没有用嘛 能给点代码吗?