学院首页 软件应用 编程开发 创意设计 认证培训 软件论坛
ASP ASP.NET PHP JSP SQL MYSQL Java VB

您的位置:学院 >> 编程开发 >> Delphi >> 有“背景”的窗体


有“背景”的窗体


  许多网页都有背景图案,这样可以使页面看起来更加醒目。不过在DELPHI里你也可以设计这种类型的窗体。马上会想到的一个方法就是使用IMAGE构件,然后指定一幅图片就可以啦。这样做当然是可行的,但是一幅可以充满整个窗体的BMP图,要占用很多的内存空间,这样就划不来了。最好的办法是只下载一幅很小的BMP图,然后把它粘贴到整个窗体上。
? 这里我没有采用Image 构件,而是使用了Bitmap构件,用它来下载一幅很小的位图。?首先是在窗体的Public部分加入变量定义:Bitmap :TBitmap ;然后在窗体的OnCreate事件中生成此对象,代码如下:

procedure TForm1.FormCreate(Sender:Tobject);
 begin Bitmap:=TBitmap.Create;?
  Bitmap.LoadFormFile(1.bmp);//图文件1.bmp 只有1KB大小?
 end;
  第三步是在窗体的OnPaint事件中把位图的图案粘贴到整个窗体上。添加代码如下:?
procedure TForm1.FormPaint(Sender:Tobject)
var x,y:integer;
begin y:=0;
while y$#@60;Height
  do begin X:=0;
  while X$#@60;Width
   do begin cancas.Draw(X,Y,Bitmap);?
        X:=X+Bitmap.Width;
     end;
  Y:=Y+Bitmap.Heigth;
  end;
end; ?
? 最后不要忘了在窗体的OnDestory事件中释放Bitmap对象。具体代码:Bitmap.Free ;好了,这样窗体显示时就会像网页那样带有背景,而且并没占多大的内存空间。



技术文章快速查找

栏目导航
软件应用
·操作系统 ·杀毒防黑 ·应用软件
·聊天软件 ·网络软件  
Web开发
·ASP ·JavaScript ·CGI
·JSP ·VbScript ·Web服务器
·PHP ·XML  
开发语言
·VB ·VC ·ASP.NET
·Java ·C/C++ ·Delphi
数据库开发
·MySQL ·SQL/Access ·PowerBuilder
·Oracle ·DB2  
网站设计
·Flash ·Dreamweaver ·HTML/CSS
·Fireworks ·FrontPage  
平面设计
·Photoshop ·CorelDraw ·AutoCAD
·FreeHand ·Illustrator ·3DsMAX
媒体动画
·Director ·Authorware ·Maya
·视频处理    


相关软件 产品库推荐
·笔记本 ·台式机 ·服务器
·数码相机 ·手机 ·GPS
·DV摄像机 ·MP3 ·MP4
·CPU ·硬盘 ·内存
·主板 ·显卡 ·显示器
·打印机 ·投影机 ·路由器

还没人留言,抢个先,哈哈!
对"有“背景”的窗体"的评论 - 快速回贴
内容:
  [完成后可按Ctrl+Enter发布]

百度中 有“背景”的窗体 相关内容
Google搜索中 有“背景”的窗体 相关内容
雅虎中 有“背景”的窗体 相关内容
Sogou搜索中 有“背景”的窗体 相关内容

相关软件 最新回复帖子:

·Windows Vista 中卸载软件的不同方式
·没有mysql支持时的替代方案
·一个可以发送附件及HTML格式邮件的PHP类
·AutoCAD打造精致三维鸟笼实例详解
·Photoshop自定义水晶字特效样式
·AutoCAD三维基础实例教程
·PS为黑背景长发美女照片抠图换背
·用Photoshop自制个性摩托车贴花小经验
·轻松几步将美女照片处理为手工素描
·巧用Photoshop画笔轻松绘制创意特效


  相关软件 有“背景”的窗体相关文章
自定义快速报表的打印预览窗口 用Delphi实现自定义颜色对话框及其构件
Delphi实用编程经验二则