关闭
当前搜索:

opencv 实现Otsu全局阈值处理

//使用Otsu算法进行灰度图的全局阈值处理 输入灰度图像返回阈值 uchar Otsu(Mat &img) { int i,j; //行列 int row = img.rows; int col = img.cols; double rc = row*col; //存储各级灰度的个数 初始为0 int n[256] = {0}; uchar *ptr; for(i = 0; i...
阅读(14) 评论(0)

delphi FMX使用模糊集合进行边缘提取

//模糊集合的边缘提取 procedure mohulvbo(b : TBitmap); var b_read : TBitmap; x, y , I : Integer; //0 黑 白 三个输入隶属度函数 ze , bl, wh : array [0..255] of single; wdata , rdata: TBitmapData ; p0,p,p1...
阅读(197) 评论(0)

delphi FMX使用模糊集合进行灰度变换

//模糊灰度变换 procedure mohuhuidu(b : TBitmap); var x, y , I : Integer; //黑 灰 亮 三个输入隶属度函数 dark , gray, bright : array [0..255] of single; rwdata : TBitmapData ; p: PByteArray; begin //初始...
阅读(49) 评论(0)

delphi FMX用TImage显示不同格式的图片

//一个按钮的点击函数 procedure TForm3.Button1Click(Sender: TObject); var s , ss: string; begin //选择一个图片 open: TOpenDialog; if open.Execute then begin //获取完整路径 s := open.FileName;...
阅读(65) 评论(0)

delphi FMX图像的直方图匹配

//直方图匹配 pipei procedure pipei(b : TBitmap; var g : array of Integer); var x, y , I ,J: Integer; A_BMPData : TBitmapData ; p: PByteArray; n : array [0..255] of Integer; begin //初始化数组 c...
阅读(41) 评论(0)

delphi FMX图像的局部直方图均衡

//局部直方图均衡 jubu 3x3 procedure jubu(b : TBitmap); var b_read : TBitmap; x, y , I: Integer; wdata , rdata : TBitmapData ; p0,p,p1,pw: PByteArray; n : array [0..255] of Integer; begin b_...
阅读(46) 评论(0)

delphi FMX图像的直方图统计增强

//直方图统计增强 3x3 procedure tongji(b : TBitmap); var b_read : TBitmap; //增强的参数 c k0,k1,k2,e : single ; //均值 和 方差 c mg,ug,m3,u3 : single ; x, y , I: Integer; wdata , rdata : TBitm...
阅读(44) 评论(0)

delphi FMX图像的直方图均衡

//直方图均衡 junheng procedure junheng(b : TBitmap); var x, y , I: Integer; A_BMPData : TBitmapData ; p: PByteArray; n : array [0..255] of Integer; begin //初始化数组 c for I := 0 to 255 do...
阅读(342) 评论(0)

javascript 动态画心加文字

测试 //铺满屏幕 var width = document.documentElement.clientWidth; var height = document.documentElement.clientHeight; document.getEleme...
阅读(75) 评论(0)

javascript 动态画心

测试 canvas{ background: lawngreen;//画布背景色 } //铺满屏幕 var width = document.docu...
阅读(88) 评论(0)

javascript 动态画直线

测试 canvas{ background: lawngreen;//画布背景色 } //铺满屏幕 var width = document.documentElement.clientW...
阅读(52) 评论(0)

javascript 画心型线

测试 canvas{ background: lawngreen;//画布背景色 } //铺满屏幕 var width = document.documentElement.clientWidth; var height = document.documentElement.clientHeight; document.getEl...
阅读(41) 评论(0)

javascript 简单画心型线

测试 canvas{ background: lawngreen;//画布背景色 } //铺满屏幕 var width = document.documentElement.clientWidth; var height = document.documentElement.clientHeight; //gycanvas.set...
阅读(57) 评论(0)

delphi 删除文件

del('C:\Users\Administrator\Desktop\delphi\wenjian\Win32\Debug\','*.txt'); //删除文件 目录 //文件名 可以有通配符 procedure del(mulu : string ; f : string); var SearchRec : TSearchRec; begin...
阅读(279) 评论(0)

delphi FMX gridlayout与gridpannellayout

Gridlayout:       如果将ItemWidth设置为-1,则单元格的宽度自动按TGridLayout的宽度进行等分计算.       使用TGridLayout布局控件,其子控件的Position,Align,Anchors属性都自动设置,忽略你对这些属性值的修改。   //---------------------------------------------------...
阅读(414) 评论(0)
52条 共4页1 2 3 4 下一页 尾页
    个人资料
    • 访问:7979次
    • 积分:586
    • 等级:
    • 排名:千里之外
    • 原创:52篇
    • 转载:0篇
    • 译文:0篇
    • 评论:1条
    文章分类
    最新评论