RSS订阅 | 匿名投稿
您的位置:网站首页 > 图像

delphi2010 图片格式转换Bmp, Png,Jpeg, Gif, Tiff , WMPhoto

unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,ExtCtrls,StdCtrls;typeTForm1=class(TForm)Button1:TButton;Image1:TImage;procedureButton1Click(Sender:TO…
类别:图像 标签: 作者:admin 日期:2013-01-20 22.58.44

Delphi显示 jpg、png、gif 图片及 gif 动画

unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls,ExtCtrls;typeTForm1=class(TForm)Button1:TButton;Button2:TButton;Button3:TButton;Button4:TButt…
类别:图像 标签: 作者:admin 日期:2013-01-20 22.57.14

32位图像处理库 delphi简单实现

32位图像处理库delphi简单实现unitImage32;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,ExtCtrls,StdCtrls,ComCtrls,ToolWin,ImgList,GraphicEx,Jpeg,Buttons,Math,T…
类别:图像 标签: 作者:admin 日期:2013-01-20 21.20.48

delphi 把pf8bit位图变换成pf24bit位图

unitScreenGetPaletteEntries;interfaceusesWindows,Messages,SysUtils,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls,ExtCtrls;typeTForm1=class(TForm)Image1:TImage;ButtonReadpf8bit:TButton;Memo1:TMemo;&…
类别:图像 标签: 作者:admin 日期:2013-01-20 21.13.11

delphi 24位真彩色图形转化为ICO文件

摘要本文详细介绍了ICO文件的格式,以及利用Jpeg、BMP等格式的24位真彩色图片,生成图标的一种方法。关键词图标,位图,24位真彩色引言Delphi是目前广泛使用的可视化开发工具,它自身带有一个图片、图标的编辑器——…
类别:图像 标签:ICO 作者:admin 日期:2013-01-20 19.34.27

delphi 屏幕整体拉出源代码

单纯的图形整体拉出效果比较简单,动态地改变图形区域的大小就可以实现,但事先应将图形的“Stretch"设置为“True"。举例说明下拉效果:1.在表单上放置一图片,高度为200,属性“Height"设为0,"Stretch"设置为True。添加“…
类别:图像 标签: 作者:admin 日期:2013-01-06 10.06.12

delphi 屏幕拷贝程序的源代码

orland公司的天才设计师们用画布(Tcanvas)对象封装了Windows的大部分图形输出功能,这使得我们可以通过他以更直观的方式和Windows的屏幕打交道,而不必关心令人头疼的WindowsAPI函数。//下面的一小段程序就可以实现…
类别:图像 标签: 作者:admin 日期:2013-01-06 10.04.38

Delphi 抓屏技巧二三例

这里有一些抓屏的技巧汇总,是本人平时编程积累下来的。在这里写出来,希望对大家有用。其实其技巧也不难,只要知道几个API函数,再加一些设备描述表的操作,你几乎可以做出非常好的抓屏软件。废话少说,现在开始介绍…
类别:图像 标签: 作者:admin 日期:2013-01-06 09.33.54

delphi 将memo转化为JPG输出

units1;interfaceusesWindows,Messages,SysUtils,Graphics,Controls,Forms,StdCtrls,Classes;typeTForm1=class(TForm)Button1:TButton;Memo1:TMemo;procedureButton1Click(Sender:TObject);private&n...
类别:图像 标签: 作者:admin 日期:2012-12-28 15.32.01

delphi 截图函数ScreenShot

programScreenShot;usesWindows,Graphics,Jpeg;procedureScreenToFile(FileName:string;Quality:Word;Percent:Word);varBmp:TBitmap;Jpg:TJpegImage;beginBmp:=TBitmap.Create;Jpg:=TJpegImage.Create;tryBmp.Width:…
类别:图像 标签: 作者:admin 日期:2011-08-18 12.56.49

delphi截图程序无窗口版

programScreenShot;usesWindows,Classes,Graphics,Jpeg;procedureDrawCursor(Bmp:TBitmap);varr:TRect;CI:TCursorInfo;Icon:TIcon;II:TIconInfo;beginr:=Bmp.Canvas.ClipRect;Icon:=TIcon.Create;tryCI.cbSize:=Size…
类别:图像 标签: 作者:admin 日期:2011-08-18 12.34.18

Delphi TPicture 和 TBitmap 的相互转换

DelphiTPicture和TBitmap的相互转换TPicture转TBitmapTempBmp.width:=100;TempBmp.height:=100;...
类别:图像 标签: 作者:admin 日期:2011-08-17 10.42.46

一个最简单的Delphi2010的PNG异形窗口方法

同事演示了一个.NET的的PNG异形窗口.挺漂亮.于是也想用Delphi显摆一个.关于Delphi用PNG做异形窗口的资料有不少.都是用GDIPlus或者TPNGImage组件加载PNG图像做的.但是我很懒,不想引用的GDIPlus,也不想去找PNGImage下载…
类别:图像 标签: 作者:admin 日期:2011-08-17 10.41.39

Delphi的动画效果例子

源代码:unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,ExtCtrls,jpeg;typeTForm1=class(TForm)&nbs...
类别:图像 标签: 作者:admin 日期:2011-08-17 10.27.26

delphi实现屏幕抓图

procedureTForm1.Button1Click(Sender:TObject);varFullscreen:Tbitmap;FullscreenCanvas:TCanvas;dc:HDC;myJpeg:TJpegImage;beginFullscreen:=TBitmap.Create;//createabimaptosavepicturemyJpeg:=TJpegImage.Creat…
类别:图像 标签: 作者:admin 日期:2011-08-12 23.56.02

delphi 使用ECC200绘制二维码

函数的具体实现如下:procedureGenerate2DCode(AStr:string;ASize:Integer;ABmp:TBitmap);vars:TByteArray;m:TByteArray;i,j:Integer;w,h:integer;cc:Integer;beginifnotAssigned(ABmp)thenExit;Set...
类别:图像 标签: 作者:admin 日期:2011-08-11 13.28.56

delphi多线程图片转换类实现

delphi多线程图片转换类实现1文档目的本文将介绍在Delphi中,利用多线程技术实现批量图片格式转换的类的实现。文档将涉及程序的结构安排、多线程编程的基本方法和面向对象的封装、继承、多态技术的使用。对于图片格式…
类别:图像 标签: 作者:admin 日期:2011-08-08 12.21.26

Delphi Image上文字平滑移动

varForm1:TForm1;MaxTxtWindth,Y:Integer;implementation{$R*.dfm}procedureTForm1.FormCreate(Sender:TObject);beginDoubleBuffered:=True;Y:=Image1.ClientWidth;MaxTxtWindth:=Image1.Canvas.TextWidth('dg');Ima…
类别:图像 标签: 作者:admin 日期:2011-08-03 12.04.46

delphi 解决TImage无法在窗体Resize时改变Canvas的大小

解决方法:改变Image.Picture.Bitmap的宽度和高度,代码如下:image.Picture.Bitmap.Width:=Image.ClientWidth;image.Picture.Bitmap.Height:=Image.ClientHeight;
类别:图像 标签: 作者:admin 日期:2011-08-02 17.13.44

delphi TBitmap创建时提示Object or class type required

首先看是否在uses段加入了Graphics,如果没有加上,如果有看是否引用windows单元,且windows单元在Graphics后面,如果是把它放到前就OK了。因为windows单元也有TBitmap的定义,它的引用在后面就按Windows里的TBitmap…
类别:图像 标签: 作者:admin 日期:2011-08-02 17.13.21