Yo pienso lo mismo que el compañero vtdeleon.
si fuera tu hiciera lo siguiente:
Pusiera un ADOQuery, le modificas la propiedad conection (en modo Design).
ya en Runtime, haces lo siguiente:
Código Delphi
[-]
With Adoquery1 DO
Begin
Close;
Adoquery1.SQL.Clear;
Adoquery1.SQL.Add('Select Sum(Campo_a_Sumar) Where A=100 or A=200');
Open;
end;
Edit1.text:=Adoquery1.field.Field[0].asString;
salu2.