随笔分类 -  图片相关

图像相关
摘要:function GetScreenAll: TBitmap; // 截取全屏var C: TCanvas;begin C := TCanvas.Create; result := TBitmap.Create; result.Width := Screen.Width; result.... 阅读全文
posted @ 2015-12-25 10:39 王云盼 阅读(699) 评论(0) 推荐(0)
摘要:function CutImgToBase(fn: string): string; // 压缩图片只能压缩bmp:将jpg转换成bmp再压缩var m1: TMemoryStream; m2: TStringStream; jpg: TJPEGImage; bmp: TBitmap;begin ... 阅读全文
posted @ 2015-12-07 13:41 王云盼 阅读(1022) 评论(0) 推荐(0)
摘要:前面说了已经获取到颜色值了,现在需要比较两个颜色的差值。两个颜色的根据RGB的差来取,有两种情况:1.(R的平方+G的平方+B的平方)开根号,再两个颜色值相减获取差值。2.(((R1-R2)的平方) + ((R1-R2)的平方) + ((R1-R2)的平方))开根号,即为差值第一种情况差值比第二种情... 阅读全文
posted @ 2015-11-28 18:11 王云盼 阅读(675) 评论(0) 推荐(0)
摘要:前言:http://www.cnblogs.com/studypanp/p/5002953.html 获取的颜色值前面获取到一个像素点的颜色值后(十六进制),比如说(黄色):FFD1C04C(共八位),我自认为前面两位代表透明度,其它顺序为R-G-B, 没想到顺序是G-B-R下面为从十六进制解析RG... 阅读全文
posted @ 2015-11-28 17:34 王云盼 阅读(4715) 评论(0) 推荐(0)
摘要:前言:在VCL里有GetPixel函数,可直接用,在FMX里直接用这个函数没有定义,在FMX的library中找这个函数在FMX.Graphics.TBitmapData.GetPixel中 结果我引用FMX.Graphics不行,引用FMX.Graphics.TBitmapData也不行,然后我... 阅读全文
posted @ 2015-11-28 16:51 王云盼 阅读(3508) 评论(0) 推荐(0)
摘要:剪切bmp:效果为指定的rect大小,若图片比rect小,则会放大。都要uses Vcl.Imaging.jpeg;需要注意的是FMX里也需要jpeg的支持,虽然没引用编译器不会报错,但用到jpg时会报内存错误。procedure TForm1.Button1Click(Sender: TObjec... 阅读全文
posted @ 2015-11-17 20:34 王云盼 阅读(6205) 评论(0) 推荐(0)
摘要:下载一个SVG格式的图标,千图网,http://tool.58pic.com/tubiaobao/用txt文本打开SVG图标拖一个PathLabel控件在PathLabel控件的Data属性添加 下载的SVG复制d=""里的内容拖一个FillRGBEffect,改变color,改变图标颜色(需要注意... 阅读全文
posted @ 2015-10-27 21:59 王云盼 阅读(249) 评论(0) 推荐(0)
摘要:放一个image,load 一张png/..图片再放一个FillRGBEffect, 将此控价拖到image下改变FillRGBEffect的Color,就改变了image图标上的颜色。原图为黑色, 改变任意颜色后:颜色改变后,变成: 阅读全文
posted @ 2015-10-27 21:55 王云盼 阅读(289) 评论(0) 推荐(0)
摘要:{************************************************************************** 名称: BaseImage 参数: fn: TFilename 返回值: string 功能: 将fn文件转换成Base64编码... 阅读全文
posted @ 2015-10-24 10:39 王云盼 阅读(8549) 评论(0) 推荐(0)
摘要:用FMX压缩图片,发现FMX里的canvas没有draw,stretch,cliprect类,FMX里程序创建时会自动引用FMX.Graphics,而这个单元内的TBitmap类的Canvas没有StretchDraw属性,也没有ClipRect类,所以定义TBitmap的图片不能裁剪。而在VCL里... 阅读全文
posted @ 2015-09-13 10:21 王云盼 阅读(1530) 评论(0) 推荐(0)