Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Pulir codigo (https://www.clubdelphi.com/foros/showthread.php?t=80303)

Bikerator 17-09-2012 23:38:18

Pulir codigo
 
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 18-09-2012 02:31:46

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

// Saludos

Bikerator 18-09-2012 10:25:50

Ui lo siento como yo ya sabia...
 
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 18-09-2012 15:27:18

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

// Saludos

Bikerator 18-09-2012 17:41:15

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


La franja horaria es GMT +2. Ahora son las 07:28:13.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi