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

delphi 生成二维码图形

生成二维码图形使用TDelphiZXingQRCode控件。该控件可以直接引用单元,而不要安装控件。usesxZXIngQRCode生成二维码图形procedureTfbarcode.Button4Click(Sender:TObject);varQRCode:TDelphiZXingQRCode;beginQRCode…
类别:图像 标签: 作者:admin 日期:2018-04-09 23.23.50

Delphi图像处理 -- 图像卷积

阅读提示:《Delphi图像处理》系列以效率为侧重点,一般代码为PASCAL,核心代码采用BASM。《C++图像处理》系列以代码清晰,可读性为主,全部使用C++代码。尽可能保持二者内容一致,可相互对照。本文代码必须包括文章…
类别:图像 标签: 作者:admin 日期:2018-03-17 22.25.58

delphi JPG/JPEG 图片缩放函数

functionChangeJpegSize(FileName,FileName2:string;W,H:Integer):Boolean;varjpg:TJPEGImage;bmp:TBitmap;beginResult:=False;jpg:=TJPEGImage.Create;tryjpg.LoadFromFile(FileName);bmp:=TBitmap.Create;bmp.Widt…
类别:图像 标签: 作者:admin 日期:2018-03-17 22.07.17

delphi 取控件下的图象

unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls,ExtCtrls,jpeg;typeTForm1=class(TForm)pnl1:TPanel;pnl2:TPanel;img1:TImage;img2:TImage;&n...
类别:图像 标签: 作者:admin 日期:2018-03-05 12.37.23

delphi copyrect实现的几个图片的转换效果

unitChangeImage;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,jpeg,StdCtrls,ExtCtrls;procedureBaiYeChuang(Targer:Timage;Source:Tbitmap);//百叶窗procedureMaSai…
类别:图像 标签: 作者:admin 日期:2018-03-04 00.06.09

DELPHI写的截图小工具源码(部分)

unitImageJT;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,Menus,ExtCtrls,StdCtrls,DB,ADODB,ShellAPI,Clipbrd,pngimage;<div...
类别:图像 标签: 作者:admin 日期:2018-03-03 11.34.38

Delphi以二进制方式读取图片并显示出来

procedureTForm1.BitBtn1Click(Sender:TObject);varStringStream:TStringStream;FSize:integer;FileData:string;i:integer;DataStr:string;msStream:TMemoryStream;beginmsStream:=TMemoryStream.Create;self.img1.P…
类别:图像 标签: 作者:admin 日期:2018-02-27 00.10.16

delphi 调用系统图片查看器

usesWindows,ShlObj,ShellAPI;functionGetSpecialPath(CSIDL:word):string;vars:string;beginSetLength(s,MAX_PATH);ifnotSHGetSpecialFolderPath(0,PChar(s),CSIDL,true)thens:='';Result:=PChar(s);end;beginShell…
类别:图像 标签: 作者:admin 日期:2018-02-26 00.30.04

delphi 使用SHGetFileInfo函数获取任何文件大图标

为了实现在vista和更高版本的系统中能够获取任何文件的大图标(48*48像素,甚至256*256像素),真是找了很多资料,最终经过朋友的帮忙找到了实现方法。网络中有很多获取exe大图标的方法,可惜不能获取所有文件的,有…
类别:图像 标签: 作者:admin 日期:2018-02-02 18.24.29

Delphi里实现彩色图片转为黑白图像的功能

像PC端的QQ等聊天软件,都会显示用户在线状态,但离线用户显示的头像就是黑白的,Delphi里如何实现这种彩色头像转为黑白头像的功能呢?这里给大家分享下这个函数,该函数之前也是在网络上收集的资料的基础上进行修改…
类别:图像 标签: 作者:admin 日期:2018-01-30 14.39.12

Delphi里实现对图片Base64编码解码

前几天有个朋友问我这个问题:有段编码字符要转为图片,问我怎么实现?其实凭经验大多数人第一时间想到的就是这是base64编码,告知后但对方就是没法解,没办法啊,好人做到底,动手给对方写个demo,利用indy自带的TI…
类别:图像 标签: 作者:admin 日期:2018-01-30 14.38.26

delphi向ImageList中加入png类型的资源图片

//向ImageList中加入png类型的资源图片procedureAddPngToImageList(AImageList:TImagelist;AResName:string);varLResStream:TStream;LPng:TPngImage;LBitMap,LRowBitMap:TBitmap;LRect,LRowRect:TRect;begin//AImage…
类别:图像 标签:ImageList 作者:admin 日期:2018-01-28 17.00.34

delphi 下载一个jpg图片保存为bmp图片

usesJpeg,IdBaseComponent,IdComponent,IdTCPConnection,IdTCPClient,IdHTTP;{....}functionDownloadJPGToBitmap(constURL:string;ABitmap:TBitmap):Boolean;varidHttp:TIdHTTP;ImgStream:TMemoryStream;JpgImage:TJ…
类别:图像 标签: 作者:admin 日期:2018-01-27 22.49.08

delphi xe 在图片上写字

procedureTForm1.Button1Click(Sender:TObject);varLRect:TRectF;beginLRect.Create(0,0,500,200);myimage.Bitmap.Canvas.Font.Family:='宋体';myimage.Bitmap.Canvas.Font.Size:=25;myimage.Bitmap.Canvas.Fill.Col…
类别:图像 标签: 作者:admin 日期:2018-01-18 13.46.31

Delphi XE10写的转换图像文件大小,用于生成安卓和IOS的小图标和启动画面

记不清是从哪年开始学Delphi的了,可能是从Delphi1.0开始用的,一直用到D7,然后工作变动,不再写经常代码,但一直保持关注,最近XE10的出现,让我对Delphi移动开发产生了兴趣。学习时发现移动开发竟然需要准备20多个…
类别:图像 标签: 作者:admin 日期:2018-01-18 08.16.02

delphi BMP转换PNG

usesVcl.Imaging.pngimage;//usesVcl.Imaging.pngimage;//ConvertBMP2PNG('C:\Users\haokucn\Desktop\123.bmp');procedureConvertBMP2PNG(fName:S****ing);varBMP:TBitmap;PNG:TPNGImage;beginifnot(Ex****a…
类别:图像 标签: 作者:admin 日期:2018-01-16 18.53.50

Delphi下16进制位图数据转位图

如果我们在****中拖入一个Image控件,并设置好picture后,Alt+F12就可以看到****的源代码中已经将图片转成了16进制字符串,如下:****Image1:TImageLeft=536Top=24Width=105Height=105Picture.Data={07544269746D617…
类别:图像 标签: 作者:admin 日期:2018-01-16 07.45.23

Delphi QQ表情的实现

DelphiQQ表情的实现QQ表情描述蓝框提示信息鼠标在这个表情上面这个表情才动可以增加表情表情打包单击这个表情插入表情关闭本窗体主要使用Webbrowsr来实现的----------------...
类别:图像 标签: 作者:admin 日期:2018-01-15 19.52.27

delphi编程如何判断图片文件的真实类型?

本文主要讲解了如何判断一个图片文件的真实类型,并不是从后缀名来判断类型的方法:以下是引用片段:unitUnit55;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrl…
类别:图像 标签: 作者:admin 日期:2018-01-13 13.34.07

delphi WinAPI: ExtractIcon - 获取 EXE、DLL 或 ICO 文件中的图标

//声明:ExtractIcon(hInst:HINST;{调用函数的程序实例}lpszExeFileName:PChar;{文件路径;文件可以是*.exe、*.dll、*.ico}nIconIndex:UINT{图标索引}):HICON;{返回图标句柄;索引为0时返回第一个图标句柄;索引为#FFFFF…
类别:图像 标签: 作者:admin 日期:2018-01-13 02.53.31