说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

用Delphi实现JPEG格式图像的显示

HTML文档下载 WORD文档下载 PDF文档下载
用Delphi实现JPEG格式图像的显示

Delphi中的TImage控件直接支持Bitmap格式(.bmp)、 Icon格式(.ico)和Metafile格式(.emf or .wmf)的图像文件。在Delphi的设计窗口中可以把这三种格式的文件赋给TImage控件的Picture属性。TImage控件还能显示其他格式的图像,如JPEG格式的图像。但不能直接把文件名赋值给Picture属性,而需要把图像对象赋值给属性Picture的Graphic属性。Delphi 3.0 提供了TJPEGImage类来支持JPEG图像,调用TJPEGImage的方法LoadFromFile可以从文件中装载JPEG图像。因此显示JPEG格式的图像,实现起来相对容易一些。以下是一个测试程序的制作过程:

1.建立一个新的应用程序,窗体(Form)的名字为Form1,对应的单元名为Unit1。

2.在窗体中放置一个TImage控件,名字为Image1,将其AutoSize属性设为True。

3.在窗体中放入一个按钮(即TButton控件),取名为Button1,把其属性Caption改为“装载图像”,在Button1的OnClick事件中,加入代码后如下:

procedure TForm1.Button1Click(Sender: TObject);

var

JPEGImage:TJPEGImage;

begin

JPEGImage:=TJPEGImage.Create;  //创建JPEG图像对象

try

JPEGImage.LoadFromFile(′F:\forest.jpg′);   //从文件F:\forest.jpg中装载图像,视实际情况改变此处的文件名

Image1.Picture.Graphic:=JPEGImage;  //赋值,使Image1显示JPEG图像

finally

JPEGImage.Free; //释放对象

end;

end;

4. 类TJPEGImage定义在单元jpeg.pas中,因此必须在本单元(即单元Unit1)的uses 子句中包括单元jpeg。

5.运行本程序,进行测试。

以上程序在Delphi 3.0下调试通过。

JEECG v2.3 发布,基于代码生成器的智能开发框架 Mozilla将设应用工场 Firefox OS瞄准欧洲南美 Summly创始人:12岁开始编程 17岁公司卖了3000万美元 因SaaS与NoSQL,Oracle雄风不在? 那些年云计算领域的大牛们 回顾:那些被平台方封杀的第三方应用 [热帖推荐] 中国的程序员,真的“短命”吗? 聚焦HTML5移动开发 第六届英特尔杯大学生软件开发大赛开幕 虚拟化技术新星Pluribus Networks获中国VC青睐 可穿戴开发!Pebble Watchface SDK 4月发布 我想做个程序员:一位编程小白的App开发故事 Go 1.1发布,支持向后兼容 Polycode:免费、开源的跨平台(游戏和APP)开发工具 为何大多数云计算公司注定要失败 究竟是什么让Redshift比Hive快10倍?! [评论]将Linux拒之门外 微软被开源社区指控垄断 精细化运营:友盟统计分析SDK 3.0版本发布 “锤子OS”功能猜测与罗式对比营销 神奇!1KB JavaScript代码编写的3D蜜蜂 顶尖技术人员“兜售”的顶尖编程语言、扩展工具等 移动阅读商业化:Flipboard支持用户DIY杂志 全球移动App:Top 52发行商排行榜 知新网CTO:从程序员的视角,实践精益创业 罗永浩锤子ROM:小团队的75项微创新 谷歌知识图谱扩展到Android平板电影中 云计算大战升温 服务器OEM押注OpenStack 如何将战略性的内容策略融入进网页设计中 数字天堂CTO:移动行业应用开发“潜规则” 众联智领CTO:从idea到面目全非的创业产品 CMDN Club 25期:knewone与路况电台的精益创业法则 Windows Blue的孪生兄弟?Office Gemini浮出水面 我又来提问了~前天复习是发现一道很怪异的题目~ 用activemovie控件打开一个URL,用哪个函数? 如何去掉ACTIVE MOIVE控件下面显示的几个键和进度条 c源程序。 >>>>高分求解!!!我在一个对话框中插入一个active report run time design,但程序运行时却不显示,在vb中却可以,如何解决这个问题?????? 关于sql server的安装 哪里有下载cc编译器的? 关于导出数据窗口数据的问题,明白人请进! delphi可不可以用于自动控制方面的开发呢 如何使对话框程序执行就让整个屏幕背景变黑色?? 想了解有关程序考试的一些情况? 不同系统就不可以直接电缆直接吗? 怎样使用PQMAGIC对硬盘进行调整分区 memory fault--core dumped的问题 有谁知道怎么解win98的开机密码? 用 procedure 与 trigger 、database link 能完成吗? flowerofwind,rjcludy()请回答 COM中的一个怪问题:我将::CoUninitialize();去掉后程序不出错,添上出现非法操作,是啥问题??? 请问?????? 如何在程序中播放rm格式的文件??? edit怎么用啊? JB6盘中不含 Borland Enterprise Server AppServer5.0,各位快载一个上去吧! 如何改变显示的分辨率? 那里有c#编译器免费下载?谢谢 如何在vc中播放rm格式的文件??? 那位大侠知道怎么创建并使用一个变量,每次只让一个进程访问???给个例子吧,大大大 大 delphi中怎么编写中断,获取外部设备传来的信息?急救!! 数值模拟与计算仿真,高手请帮忙! 请问:dos下图形放大算法或思路?还有.........(高手请进) 求教!!!!SOS!! --请问如何将一个BMP图形文件转成JPG图形文件,高分请教师--- 高分给出,win98的怪问题! 打印统计问题 请教 : html的javascript 中报错:document.Form1.client_name.value不是对象 VC++里面如何从文本文件中一行一行读取文件? 请问,如何用mail函数批量发送邮件.多谢. 各位请教一下,Jsp 的服务resin在win2000下是怎样配置的 各位兄弟: 有谁知道 侯杰 的 <多线程程序设计> 什么时候才能买到??? 哪里有VFP3.0下载? system.ini和win.ini的作用 怎样生成安装包,多谢! 如何在两个不同的应用程序之间拖动文本字符 请问,PTSTR 和 PSTR 有什么不同? 反对上海电信变相涨价的行为。我能不能告中国电信“违约”和“欺诈”呢。 求救!误删Office2000注册表! 生成.exe出错 在Excel中,如何让某些行不能滚动? 在--成都--程序员能拿多少--¥--???? 换了17寸纯平显示器,开心,放分. 错装PB7,不能无create datawindows的图标,全是XX,为什么? 请问怎样遍历一个页面中服务器端的所有对象? 能否跟我说说——自动控制方面——与delphi编程的基本常识?我一直想了解,但不知道我们编的程序如何去跟那些硬件搞在一起而且控制硬件呢? 如图所示,已知直线a与b是异面直线,直线c∩a=M,直线b∩a=N,又a∩平面α=A,b∩平面α=B,c∩平面α=C求证:A,B,C三点不共线急!大致图像是这样,可能图像不清. 过两点A、B能画几条直线?平面上有A、B、C三点,过其中任意两点画直线,能画几条? 已知三角形ABC的两边AC和BC分别交平面a于点MN,设直线AB与平面a交与点O,则点O与直线MN的位置关系如何急~~~~~~~~~~~~~ 反函数,向量,三角函数的计算公式? y=(lnx)^x·x^(lnx)的导数 在正方体ABCD-A'B'C'D'中,直线A'C交平面ABC'D'于点M,试作出点M的位置.说明理由,最好给图 有一支刻度均匀但读数不准的温度计,放在冰水混合物中示数为4℃,在沸水中的示数为96℃.用这支温度计测得烧杯中的水温是29摄氏度,则这杯水的实际温度是多少摄氏度? 经过平面内A,B,C三点中的任意两点只能画一条直线,其中正确的个数为( ) A.1 B.2 C.3 D.4 用对数求导法求下列导数函数.y=(x/(1+x)) 有一支温度计,其刻度是均匀的,但示数不准,把他插入冰水混合物中,示数为2℃,而放在1标准大气压小沸水里,示数为94℃,用这支温度计测一杯热水的示数是48℃,则这杯热水的实际温度是------. 在同一平面内有A,B,C,D,E五点,任意三点不在同一条直线上,能画()直线 磁场中静止的通电导线受安培力吗 一支温度计刻度均匀但示数不准,当把它插入冰水混合物中时,温度计示数为5摄氏度,插入1标准大气压下的沸一支温度计刻度均匀但示数不准,当把它插入冰水混合物中时,温度计示数为5℃,插入1 平面上三条直线相交,最多有几个交点?最少有几个交点?画图说明...1.平面上三条直线相交,最多有几个交点?最少有几个交点?画图说明.2.平面内四条直线相交,最多有几个交点?五条直线呢?n条直 通电直导线在磁场中受到的安培力方向是否与磁场方向平行? 已知:平面α∩β=直线l,又直线a与α有一个公共点P,试分析α与β的位置关系 同一平面内的五条直线最多有几个交点,请画图说明要图喔! 已知三角形ABC的三个顶点A,B,C及平面内一点P,若PA+PB+PC=AB,则点P与三角形ABC的位置关系是什么 直线l,m与平面α,β,γ,满足l=β∩γ,l∥α,m∈α,m⊥γ,则必有〔〕 a.α⊥γ且m∥β b.α⊥γ且l⊥m c.m∥α且l⊥m d.α∥β且α⊥γ 平面上有5条直线两两相交,可能有多少个交点?请画图表示出来. 洛伦兹力对运动电荷一定不做功,安培力对通电导线一定不做功, 求过程」一刻度均匀的温度计放在冰水混合物中时,示数为10°C;用它测一个标准大气压下沸水的温度时,示数为90°C.若用它来测得温水的温度为70°C.则温水的实际温度是____. (1)在一个平面上画5条直线,最多有几个交点?请画图说明.(2)在一个平面上画5条直线,可以有4个交点吗?如果可以,请画出所有图形;如果不可以,请说明理由. 为什么洛仑兹利不对运动电子做功,但安培力作为洛仑兹力的宏观表现却对导线做功 高数求导疑问如图,我有个疑问,df(u)/du,我觉得df(u)就是对f(u)求导,也即是f`(u),分母是du是什么意思,有什么作用,为什么要除以du? ⑴平面上三条直线相交,最多有几个交点?最少有几个交点?请画图说明.⑵平面内四条直线相交,最多有几个交点?五条直线呢?n条直线呢?⑶平面内有n个点,其中任意三个点都不在同一条直线上,那 带电粒子在匀强磁场中运动一定受到洛伦兹力作用对吗 通电导线在匀强磁场中运动一定受到安培力作用对吗RT 高数求导问题为什么选C 有一支刻度不标准的温度计,将她插入冰水混合物中,读数为15摄氏度,把他插如1标准大气压下的开水中,读数为95摄氏度,如果将它插入某液体中,读书为35摄氏度,则此液体的实际提问是多少?写出 有学过大学物理的么,问两个问题:关于1、匀速圆周运动中的做功 2、磁场中安培力和洛伦兹力的做功问题高二学弟躬身拜上.-----------安徽太和中学高二12班学号200912061、以理想状态下的匀速 高数求导的问题不知道红线部分是怎么来的 红线部分到绿线部分也不知道是怎么来的 用对数求导法求下列函数的导数 怎么使用对数求导法 我想请教怎么使用对数求导法啊 高数, 用对数求导法,求这个函数的导数 同一平面内的两条直线有哪几种位置关系?限30分钟 关于高数求导的问题能够告知这个极限的求导分子部分的求导过程,分母部分我懂,但是分子部分是怎样求导能否详细说明? 在如图4×4的方格内画△ABC使他的顶点都在格点上,三条边长分别为1/5根号125,4,根号(3²+2²) 在同一个平面内,两条直线有哪几种位置关系? 如图,请画图说明平面上到三角形的三遍所在的直线距离的点一共会有多少个?(任意一个三角形) 一支不准确的温度计,放入冰水混合物中时.示数-0.7摄氏度;放入标准大气压下的沸水是示数102.3摄氏度那么这支温度计-6摄氏度时,实际温度是____摄氏度.(精确到0.01摄氏度) 是初一的科学试卷中 空间内直线与平面的位置关系有几种 三个平面把空间分成几个部分?画图表示各种情况.(请画图,有加赏,)6,7,8.主要是8个平面,画不来……求画,不尽感激. 用对数求导数法则求下列函数的导数 通电导线所受的安培力方向,磁场方向,电流方向三者之间一定是相互垂直的.这话错哪了 y=(lnx)^x的导数 放置在磁场中的通电导线,一定受到安培力作用.这种说法对吗 在平面上的三条直线a、b、c有几种位置关系?并说明全说出来 y=lnx/(x^2+1)的导数,怎么求, 通电导线在磁场中受到安培力计算时忽略通电导体的磁场吗通电导线在磁场中受到安培力计算时导体本身也有磁场啊,这时忽略通电导体的磁场吗 一小段通电直导线在磁场中受到的安培力的方向一定垂直电流的方向么? y=lnx/x 的导数是多少 通电导线会不会受到自身产生的磁场的安培力作用?比如有两条导电滑轨,在上面横卧一根导体棒,在导轨一端通电,导体棒会不会在产生的磁场中受到安培力而运动? 在三角形ABC 中AB等于10 BC等于6,经过点C且与AB相切的动员与CB,CA分别相切与E,F求EF最小值额 在三角形ABC 中AB等于10 BC等于6,经过点C且与AB相切的动员与CB,CA分别相切与E,F求EF最小值 有一只刻度均匀的温度计,但是在冰水混合物中,温度计显示的度数为5°c ,在一个标准大有一只刻度均匀的温度计,但是在冰水混合物中,温度计显示的度数为5°c ,在一个标准大气压下的沸水温度 经过平面上的三点中的任意两点可以画直线( )A 3条 B 1条 C 1条或3条 D 以上都不对 在同一平面内有3条直线ABC,如果A⊥B,B⊥C,那么AC的位置关系是什么,为什么要说明理由 直线a,b,c在同一平面内,a//b,a与c相交于一点M,则b与c的位置关系是 y=(lnx)^x/x^lnx的导数 求过程 对于同一平面内的直线abc,如果a与b平行,c与a相交,那么c与b的位置关系是相交还是平行?
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn