新手学做验证码识别,有难度才有动力啊。 新手学做验证码识别,有难度才有动力啊。image显示的彩色图像怎么样转成黑白的啊。只要是非白色或非透明的全部变成黑色这个怎么办呢??????还有就是怎么样将image显示的图案切成四块分别显示在四个image上啊。。谢谢了。。100分,大家如果觉得不够可以再加100分,。。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 晕。你从哪句话里看出我不要脸了不要将CSND变成网易的评论跟贴。 这个直接转黑白Procedure PixelsFormat(Bmp: TBitmap);Begin Bmp.PixelFormat := pf8bit; Bmp.PixelFormat := pf1bit;End;这个可以从原图抓指定位置图存到另一个BMP里,这样就可以存到 image了Procedure CropImage(Src, Dest: TBitmap; R: TRect);Begin With Dest Do Begin Width := R.Right - R.Left; Height := R.Bottom - R.Top; Canvas.CopyMode := cmSrcCopy; Canvas.CopyRect(Rect(0, 0, Width, Height), Src.Canvas, R); End;End;想分图简单的就用TPicClip, 指定一个图按列或按行分的数目, 打开图就可以从GraphicCell属性取得第个图了 SendMessage WM_settext的问题 FastReport 4.0 导出EXCEL有乱码的问题? 客户端如何接收来自ftp服务器上某个运行程序x的句柄 当然程序x是自己开发的 Delphi7如何使用TBDEClientDataSet??? 几百个客户端服务器端如何架构? 请问哪位有indy组件做pop3的资料? 求教combobox控件与sql的使用方法 请问如何在程序中封锁键盘!!! 奇怪用tstoredproc控件,提示找不到存储过程 我想在删除一条记录后,第一字段能自动排成有序的。 delphi 控件 如何使用多线程操作访问dll
晕。你从哪句话里看出我不要脸了
不要将CSND变成网易的评论跟贴。
Procedure PixelsFormat(Bmp: TBitmap);
Begin
Bmp.PixelFormat := pf8bit;
Bmp.PixelFormat := pf1bit;
End;
这个可以从原图抓指定位置图存到另一个BMP里,这样就可以存到 image了
Procedure CropImage(Src, Dest: TBitmap; R: TRect);
Begin
With Dest Do
Begin
Width := R.Right - R.Left;
Height := R.Bottom - R.Top;
Canvas.CopyMode := cmSrcCopy;
Canvas.CopyRect(Rect(0, 0, Width, Height), Src.Canvas, R);
End;
End;想分图简单的就用TPicClip, 指定一个图按列或按行分的数目, 打开图就可以从GraphicCell属性取得第个图了