Судя по:
Код:
S1[r]:=copy(b,15,6);
S2[v]:=copy(d,22,6);
S1 и S2 - вероятно массивы, а т.к. код проходит без ошибок, то массивы типа string (возможно строки из мемо

)
Код:
Label1.Caption:=FloatToStr(sum([S1+S2]));
не проходит, т.к. тупо массив + массив не сложить - нужно складывать поэлементно, это если мои рассуждения правильны