当前位置:首页 » 软件开发
开发技术指南» 文章正文
    引言: 最简单的一种角点检测算子,但是由于采用了非最大化抑制,效果和OpenCV相当。
 

 

 ·pl0编译器turbopascal版再现     »显示摘要«
    摘要:(********************* pl0 编译程序turbo pascal代码 *********************) program pl0(fa,fa1,fa2); (* pl0 compile with code generation *) label 99; (* turbo pascal do not support goto between d......
 ·conwin scripter     »显示摘要«
    摘要:conwin pascal脚本解释器,exe免费版。脚本语言采用object pascal (delphi)语言子集,基本语法与object pascal类似,但存在如下限制:* 不支持class、interface定义,但可以通过嵌入编译方式将类、接口加入脚本* 暂不支持forward函数* 暂不区分unit/program分别,interface/implementation的定义都是公开的,......


角点检测算子的代码描述

最简单的一种角点检测算子,但是由于采用了非最大化抑制,效果与opencv相当.

【程序编程相关:GetPartFilter+SumSto

  tpointinfo = record 【推荐阅读:如何将几个DBGRID里的内容导入同一个

【扩展信息:支持XP下托盘栏气球提示的托盘单元

    info: tpoint;

    w: extended;

    color: tlabcolor;

  end;

  tsinglepointinfoarray = array of tpointinfo;

procedure cornerdetect(width, height: longint);

var

  i, j, fi, fj, sum: longint;

begin

  pointcount := 0;

  for i := 7 to width - 8 do

    for j := 7 to height - 8 do begin

      sum := 0;

      for fi := i - 7 to i + 7 do

        for fj := j - 7 to j + 7 do

          sum := sum + abs(imagegray[i, j] - imagegray[fi, fj]);

      imagepoint[i, j] := sum div $100;

    end;

  {标准角点检测算子部分}


...   下一页
 ·解决无法按y轴显示的问题!     »显示摘要«
    摘要:如果用dbchart,假设数据库如下:a b1 22 23 34 2a作为x轴,y作为y轴,显示图形如下43 x / \2 x--x x1 1 2 3 4我想显示成如下图形(a作为y轴,b作为x轴)4 x \3 x / 2 x |1 x 1 2 3 4可是如果单纯用a作为y轴,b作为x轴,显示的结果为4 x | \3 | x | 2 x |1 x 1 2 3 4我个人认为dbchart的line在......
» 本期热门文章:

©2000-2007 All Rights Reserved. 最佳浏览:1024X768 MSIE