一个月没有人能解决的有关问题，求高手帮助

一个月没有人能解决的问题，求高手帮助！
我用的是Delphi7+Access，欲实现轻轨票价的查询。
数据库中表名为“zd”，有“站点序号”、“站点名”、“与下站距离”三个字段，在form上有两个DBlookupcomboBox控件连接“站点名”字段用来选择要查询的起始站和终止站。
我遇到的问题是如何把选择的两个站点名所对应的“与下站距离”字段之间的数据进行累加以求出两站间的距离（当然还要减去终止站“与下站距离”数据），求出两个站点间的距离再求票价就简单了。麻烦各位了！
数据表结构如下：
                     
                            站点序号               站点名                     与下站距离（公里）

                                  1                       火车站                               3

                                  2                       清大路                             3.5

                                  3                       理工大学                         4




------解决方案--------------------
给你做成了一个函数，startsite_edit为开始站点名称，endsite_edit为结束站点名称
function TForm1.getlong:integer;
var
sitename:string;
s:integer;//距离
begin
adotable1.location( '站点名 ',startsite_edit.txt,[]);//定位开始站点
s:=0;
sitename:=adotable.fieldbyname( '站点名 ').asstring;
while sitename <> endsite_edit.txt do
begin
s:=s+adotable.fieldbyname( '与下站距离（公里） ').asinteger;
adotable.next;
sitename:=adotable.fieldbyname( '站点名 ').asstring;
end;
getlong:=s;
end;