inc.pas

本源码是一个算法

//----------------------
//单元名  ：Inc
//功能    ：公共单元
//创建时间：2003.12.31
//作者    ：zbird
//E-Mail  :[e-mail]
//----------------------
unit Inc;

interface

const
  //城市的坐标范围
  g_Width = 550;
  g_Height = 400;
  //城市在图上的大小（半径）
  g_CitySize = 10;
  g_MaxLenght = 10000000;

implementation

end.