last1:=Form3.table1.Fields[1].AsString; 很简单呀应这样表达:此语句是将FORM3中的数据集TABLE1里的当前的(注意是每一时刻只有一列是当前的) 第一列的值转换为字符串后赋给了LAST1。此后通过Form3.Table1.First; repeat 不断调整当前列,从而实现你所写的的功能;