图像的调用和操作问题 如何从数据库里调用图片,并且能够对此调用的图片进行旋转,放大等操作,谁能够解决高分相赠!! 我的QQ是19950158 谢谢各位大侠提供源码!! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在数据库提取图象,要用数据库控件ttable、tquery等等,随你怎么用,提图象用Tblob*的控件。旋转、放大就简单了。使用bitblt,是个API函数。要不直接使用Canvas进行copyrect操作。总之,方法太多了。 数据库那部分我就不说了。说说图像放大的吧。给你一个简单的例子 CopyRect窗体上放两个Image, Image1先Load 一幅图,AutoSize 为true;点击按钮,就可以把Image1的图像缩放到Image2里。源码如下:unit Unit1;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls;type TForm1 = class(TForm) Image1: TImage; Image2: TImage; Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementation{$R *.DFM}procedure TForm1.Button1Click(Sender: TObject);begin Image2.Canvas.CopyRect(Image2.ClientRect, Image1.Canvas, Image1.ClientRect);end;end. Imagelist stretch 这句代码报错能解决吗 请问delphi中的tstringlist的add()和append()的区别啊?? 如何操作*.DB数据库文件。 请问怎样从压缩文件(zip或rar)中取数据? 怎样屏蔽TStringGrid中的方向键?请指点。先谢了! 高分求救:delphi 中如何生存临时文件 如何实现鼠标拖动桌面快捷方式到本软件窗体时,程序获取拖动快捷方式对应的文件路径 关于消息的问题 help! 有谁能把DELPHI5的序列号告诉我,有分给! 在delphi中如何对oracle数据库建表?
旋转、放大就简单了。
使用bitblt,是个API函数。
要不直接使用Canvas进行copyrect操作。
总之,方法太多了。
说说图像放大的吧。
给你一个简单的例子 CopyRect窗体上放两个Image, Image1先Load 一幅图,AutoSize 为true;
点击按钮,就可以把Image1的图像缩放到Image2里。源码如下:unit Unit1;interfaceuses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ExtCtrls;type
TForm1 = class(TForm)
Image1: TImage;
Image2: TImage;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.DFM}procedure TForm1.Button1Click(Sender: TObject);
begin
Image2.Canvas.CopyRect(Image2.ClientRect, Image1.Canvas, Image1.ClientRect);
end;end.