Pulir codigo

[Bikerator]

tengo uma aplicacion en la que hay unos if anidados que miran los valores de una tabla y asignan otro en funcion del resultado

if agentsquadrant.Value='e1' then plantorn.Value:=escamotse1.value
else
if agentsquadrant.Value='e2' then plantorn.Value:=escamotse2.value
else
if agentsquadrant.Value='e3' then plantorn.Value:=escamotse3.value
else
if agentsquadrant.Value='e4' then plantorn.Value:=escamotse4.value
else
if agentsquadrant.Value='e5' then plantorn.Value:=escamotse5.value
else
if agentsquadrant.Value='e6' then plantorn.Value:=escamotse6.value
else
if agentsquadrant.Value='e7' then plantorn.Value:=escamotse7.value
else
if agentsquadrant.Value='e8' then plantorn.Value:=escamotse8.value
else
if agentsquadrant.Value='e7' then plantorn.Value:=escamotse9.value
else
if agentsquadrant.Value='e10' then plantorn.Value:=escamotse10.value;

pues bien quisiera hacer lo mismo pero con un bucle de forma que pudiera tener n valores i no solo 10

[roman]

¿Qué son escamotseN? ¿Qué es plantorn?

// Saludos

[Bikerator]

Es una aplicacion de bases de datos, escamots es una tabla i e1, e2,... son los campos.

Yo quisiera poder hacer un bucle para q es codigo sea independiente de número de "Ex" (campos), o sea que e1, e2,... los tenga en una tabla o lista i no esten limitados a 10 como ahora

[roman]

Puedes acceder a los campos de una tabla por índice (propiedad Fields) y de esa manera hacer el ciclo.

// Saludos

[Bikerator]

Gracias, no hay nada como ver las cosas con perspectiva.