acceder a una variables

[cahosoft]

hola como estan....
lo quiero hacer es acceser a una cambiar el valor de una variable pero que el nombre de la variable sea por media de una cadena....
disculpen si ne me explicar...
es algo como asi:
por ejemplo voy cambiar el valor de las

Código Delphi [-]
var
i1,i2,i3:integer
begin
  accedervariable('i1'):=1
end;