Runtime ile SpinEdit toplamı alma

[denizfatihi]

Herkese merhaba,

Runtime süresi içerisinde oluşturduğum SpinEdit're nasıl toplam aldıracağıma dair bir çözüm bulmadım, toplama esnasında son kullanılanı baz alıp topluyor.
Normal olmuş olsa aşağıdaki gibi bir çözüm var ama runtime olduğu için tek ayırt edici özelllik tagları.

Total := SpinEdit1.Value + SpinEdit2.Value + SpinEdit3.Value;

if Sender is TSpinEdit then
 begin

  if TSpinEdit(Sender).Tag = 1 then
  begin

  TSpinEdit(Sender).MinValue := 200;
  TSpinEdit(Sender).MaxValue := 10000;
  TSpinEdit(Sender).Increment:= 200;

end;

  if TSpinEdit(Sender).Tag = 2 then
  begin 
  TSpinEdit(Sender).MinValue := 100 ;
  TSpinEdit(Sender).MaxValue := 10000;
  TSpinEdit(Sender).Increment:= 100;
  end;


  if TSpinEdit(Sender).Tag = 3 then
  begin
 TSpinEdit(Sender).MinValue := 25 ;
  TSpinEdit(Sender).MaxValue := 10000;
  TSpinEdit(Sender).Increment:= 25;
  end;