软件下载 | 资讯教程 | 最近更新 | 下载排行 | 一键转帖 | 发布投稿
您的位置:最火下载站 > 源码下载 > Delphi源码 > 文件操作 > Delphi 货郎担算法程序,源代码免费下载下载

Delphi 货郎担算法程序,源代码免费下载

  • 界面语言:简体中文 / 国产软件
  • 文件大小:9 KB
  • 资源等级:3星级
  • 相关链接:Home Page
  • 有无插件:无插件
  • 授权方式:免费版
  • 更新时间:2011-01-21 20:50:21
  • 运行环境:windows/delphi7
Delphi货郎担算法程序,源代码免费下载,最开始在毕业设计中发现的,后来又经过了一些修正,现在可直接编译,没使用第三方控件类库,截图大家可以先看下,部分代码释义:
Cities: array of TCity; //城市数组 [1..x]
CitiesDistance: array of array of real; //各个城市间的距离[1..x, 1..x]
CitiesToured: array of integer; //是否已经遍历过
CityNumber: integer; //城市的数目
ShortTestLength: real; //“最短”路径的长度
ShortestDistance: array of real; //最短路径
TouredLength: real; //已经走过的距离
//获取两个城市之间的距离
function GetDistance(a_ACity, a_BCity: TCity): real;
//生成距离矩阵
procedure GetAllDistance;
//遍历城市
procedure CreateCities; //生成城市
procedure FindShortTestPath; //寻找最短路径,获得各个城市之间的距离
//并将其添加到数组CitiesDistance[]
procedure Draw; //对画布进行重画,获得两个城市之间的距离
 报告下载错误
Delphi 货郎担算法程序,源代码免费下载
推荐下载
下载说明
栏目导航
推荐下载