Array Variant...

[Perio]

Hola:
Como estan, les comento mi problema, estoy trabajando con arreglos de tipo Variant y me pasa lo siguiente:

*Creo y cargo mi arreglo:

Código Delphi [-]
  //Arreglo variable
  arrData := VarArrayCreate([1, MaximoFilas, 1, MaximoColumnas], varVariant);
  //Datos de la grilla 'PlanillaDetallada1'
  for i := 0 to MaximoFilas do
    for j := 1 to MaximoColumnas do
      arrData[i + 4, j] := IfThen((PlanillaDetallada1.Cells[j, i] = '') and (j > 2),
                           '0,00', PlanillaDetallada1.Cells[j, i]);

* Despues de esto realizao calulos sobre los datos y otras cosas, por ultimo a siertas celdas necesito agregarle el string '%':

Código Delphi [-]
procedure TFrmOtrosReportesCargasExpo.colocarProcentajes(arrData: Variant);
begin
  arrData[1,1] := arrData[1,1] + '%';
  arrData[1,1] := arrData[1,1] + '%';
end;

* Pero esto no me da resultado, no me concatena nada, tambien probe cosas como:

Código Delphi [-]
  arrData[1,1] := VarTypeAsText(arrData[1,1]) + '%';
  arrData[1,1] := VarToStr(arrData[1,1]) + '%';

No se si fui claro, desde ya, y como siempre muchas gracias...
Saludos
Perio