文档章节

如何实现一张图片覆盖窗体 - 回复 "客栈老人" 的问题

涂孟超
 涂孟超
发布于 2014/09/26 15:35
字数 211
阅读 11
收藏 0
点赞 0
评论 0
问题来源: http://www.cnblogs.com/del/archive/2008/11/25/1339604.html#1381839

方法1: 用 TImage
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls;

type
  TForm1 = class(TForm)
    Image1: TImage;
    procedure FormCreate(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  Image1.Align := alClient;
  Image1.Stretch := True;
  Image1.Picture.LoadFromFile('c:\temp\test.bmp');
  {其实不用代码, 在设计时设置一下也可以}
  {也可以用 Image1.Picture.Bitmap.LoadFromResourceName() 从资源文件调入}
end;

end.

 
 
 
 
 

 

 

  

方法 2: 用 TBitmap
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
    procedure FormDestroy(Sender: TObject);
    procedure FormPaint(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

var
  bit: TBitmap;

procedure TForm1.FormCreate(Sender: TObject);
begin
  bit := TBitmap.Create;
  bit.LoadFromFile('c:\temp\test.bmp');
//  bit.LoadFromResourceName(); //或者从这个命令从资源文件调入
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  bit.Free;
end;

procedure TForm1.FormPaint(Sender: TObject);
begin
  Canvas.StretchDraw(ClientRect, bit);
end;

end.

 
 
 
 
 

 

 

  

本文转载自:http://www.cnblogs.com/del/archive/2008/11/25/1340936.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
AWTUtilities.setWindowOpaque引起的字体质量问题的一种解决方案

2011-01-10写于iteye的一篇文章,今迁至此,以后这里便是三哥的大本营! AWTUtilities.setWindowOpaque的功能在Java7中可以通过Window.setBackground来实现,但问题依旧!以下为原文: 上个周...

003
2012/06/07
0
2
Qt多线程学习(一)——继承QThread

目录 前言 通过继承的函数来实现。 学习!分享!感谢! 多线程 多线程的优点 提高应用程序的响应速度。对开发图形界面程序尤为重要,当一个操作耗时很长时,整个系统都会等待这个操作,程序就...

simonforfuture
2017/12/15
0
0
Newbe.Mahua 1.8.1 发布,紧急 BUG 修复

开篇一张图,功能全靠编。 QQ机器人平台意指那些支持通过QQ进行消息收发和群员软件平台。 使用该SDK开发可以实现一次开发,运行于多个不同QQ机器人平台平台的绝佳体验。 基于SDK开发,可以实...

Newbe36524
04/27
0
0
微信机器人高级版常见问题汇总

下面列出微信机器人高级版可能碰到的一些问题和解决方案,以便大家碰到类似的问题的时候能够快速找到答案并修正,本文也会长期更新 1. 如何安装和升级 安装:上传到 wp-content/plugins/ 目录...

小天博客
2017/06/08
0
0
ASP.NET 如何做出简单的验证码

如果说要做验证码,那不得不提的就是GDI+绘图了。我们都知道验证码是以图片形式展示的,而且是动态生成的,这样就需要我们去画出它。 科普一下,什么是GDI+? GDI+是图形设备接口(GDI)的高...

我不会抽烟
2014/07/29
0
0
Newbe.Mahua 1.9.1 发布,引入 Session

开篇一张图,功能全靠编。 QQ机器人平台意指那些支持通过QQ进行消息收发和群员软件平台。 使用该SDK开发可以实现一次开发,运行于多个不同QQ机器人平台平台的绝佳体验。 基于SDK开发,可以实...

Newbe36524
06/17
0
0
Node.js 微信后台搭建系列 - 微信集成

Contents 1. 接入验证 2. 接收消息 3. 发送消息 终于基本到了最后的一步了。微信集成主要包含三个部分: 接入验证,让微信确认你的服务器,就是你公众号的拥有人。 接收微信给你服务器的消息...

鹄思乱想
2017/07/30
0
0
拯救不靠谱:他是怎样将技术外包做到纠纷率3%?

  基于行业的B端共享经济创业可以说是2016年企业服务领域一个小热点,而“滴滴叫程序员”则是这个领域中较有代表性的一种商业模式。从2015年开始,基于程序员群体的共享经济平台开始在市场...

程序员客栈
2016/08/16
25
0
(四)优化总结--让你的窗体变美的秘密

前言:敲学生的时候,师傅就建议我,把控件美化一下,实现控件透明话,这样窗体就会非常的美观。当时以为很难,可是现在一试,其实非常简单。下面和大家分享一下优化的方法。 首先放一张优化...

a954553391
02/23
0
0
前和讯新浪微博高级工程师姚飞:合作,共赢。

拥有十多年的开发经验,先后在华夏大地、和讯网、新浪微博担任高级前端工程师,作为一名程序界的“老炮儿”,看看他是如何理解共享经济大环境下程序员的解放生态,怎样合作共赢让未来的职业规...

程序员客栈
2016/09/24
13
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

CORS 跨域实践

本文首发于个人微信公众号《andyqian》,期待你的关注~ 前言 系统通常都是由单体应用逐渐演化而来,演化成为前后端分离的分布式应用。在享受分布式系统带来的诸多好处之时,随之而来的也有不...

andyqian
11分钟前
7
0
开源 java CMS - FreeCMS2.8 会员管理

项目地址:http://www.freeteam.cn/ 会员组管理 会员管理 会员管理 从左侧管理菜单点击会员管理进入。 添加会员 在会员列表下方点击“添加”按钮。 填写相关属性后点击“保存”按钮即可。 编...

freeteam
12分钟前
0
0
bboss升级至 v5.0.6.8版本,改善对Elasticsearch SQL 的支持

v5.0.6.8功能改进如下: (1)持久层支持支持Elasticsearch SQL,使用参考文档:玩转Elasticsearch SQL功能 (2)解决持久层/elasticsearch模板变量解析多层级不起作用问题 (3)完善国际化功能 (4...

linux-tao
13分钟前
0
0
扫码二维码跳转到某个网站

添加maven依赖 <dependency><groupId>com.google.zxing</groupId><artifactId>core</artifactId><version>3.0.0</version></dependency><dependency><groupId>com.goog......

gaomq
20分钟前
0
0
Windows平台下搭建Git服务器的图文教程

Git没有客户端服务器端的概念,但是要共享Git仓库,就需要用到SSH协议(FTP , HTTPS , SFTP等协议也能实现Git共享,此文档不讨论),但是SSH有客户端服务器端,所以在windows下的开发要把自己...

MKChan
26分钟前
0
0
告警系统主脚本&告警系统配置文件&告警系统监控项目

20.20 告警系统主脚本 准备工作 定义监控系统的各个目录,然后再去定义主脚本,因为是分布式的,所以需要每一台机器都需要定义,事先创建好各个脚本和各个目录,随后脚本直接拷贝过去即可,然...

影夜Linux
26分钟前
0
0
谈谈神秘的ES6——(一)初识ECMAScript

谈谈神秘的ES6——(一)初识ECMAScript 在《零基础入门JavaScript》我们就说过,ECMAScript是JavaScript的核心,是JavaScript语法和语义的解释器,同时也是一个标准。而ECMAScript标准其实也...

JandenMa
今天
1
0
第16章 Tomcat配置

16.1 Tomcat介绍 ####Tomcat介绍 LNMP架构针对的开发语言是PHP语言,php 是一门开发web程序非常流行的语言,早些年流行的是asp,在Windows平台上运行的一种编程语言,但安全性差,就网站开发...

Linux学习笔记
今天
1
0
流利阅读笔记29-20180718待学习

高等教育未来成谜,前景到底在哪里? Ray 2018-07-18 1.今日导读 在这个信息爆炸的年代,获取知识是一件越来越容易的事情。人们曾经认为,如此的时代进步会给高等教育带来众多便利。但事实的...

aibinxiao
今天
13
0
OSChina 周三乱弹 —— 你被我从 osc 老婆们名单中踢出了

Osc乱弹歌单(2018)请戳(这里) 【今日歌曲】 @小鱼丁:分享五月天的单曲《后来的我们 (电影《后来的我们》片名曲)》: 《后来的我们 (电影《后来的我们》片名曲)》- 五月天 手机党少年们想...

小小编辑
今天
920
21

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部