看不太懂你的意思,帮你改改:
var
items:string;
begin
data.ADOQuery.Close;
data.ADOQuery.SQL.Clear;
data.ADOQuery.SQL.Add('select Sum(得分) from perinfor_input,groinfor_input');
data.ADOQuery.SQL.Add('where perinfor_input.单位=groinfor_input.单位);
data.ADOQuery.Open;
而却你的第一和第二中方法都写的不对:
 1、adoquery1.SQL.Add('where 单位=:电气工程系'); 中的动态参数‘电气工程系'未赋值你就 open !
 2、不能用count,用sum
 3、还有让人摸名奇妙的地方:inc(count)???;