如何将窗体背景设为有图的北京(20分)

  • 主题发起人 主题发起人 samandar
  • 开始时间 开始时间
S

samandar

Unregistered / Unconfirmed
GUEST, unregistred user!
我觉得窗体的背景太过单调,想拿一个有图案的图片来做窗体的背景
不知是否可以
 
当然,[:D]
 
那要怎样做呀
可以告诉我吗?
 
简单啊,放一个image, 设align为client, Loading 你想用的图片
 
uses jpeg;
var
AJPEG:TJPEGImage;
x,y:integer;
procedure TForm1.FormCreate(Sender: TObject);
begin
AJpeg:=TJpegImage.Create;
AJpeg.LoadFromFile('beiging.jpg');
end;
procedure TForm1.FormPaint(Sender: TObject);
begin
x:=0; y:=0; //x,y由你自己定
Form1.Canvas.Draw(x,y,AJpeg);
end;

OK?OK!

 
忘说一声,把你要作背景的.JPG图片放在你保存程序文件的文件夹里。
这种方法不影响你Form上其他的控件。
 
画布功能。
 
放一个image, 设align为client, Loading 你想用的图片
 
up,easy...[:D]
 
up
easy
good!
 
同意楼上!!
 
moodboy,你的东东不行啊
 
把图片放到资源文件里
要窗体 Create 调出来
在 Paint 时画在背景上。
在 Free 时 free
OK?
 
后退
顶部