Variables creadas en forma dinamica

[GerTorresM]

Buenos días a todos

Quisiera saber si es posible crear variables en forma dinamica, para ser claro pongo el siguiente ejemplo, mediante un consulta obtuve el nombre de las tablas de BD y quiero crearlas dinamicamente en un modulo de datos, entonces quisuiera saber si hay una forma de crear el numero de variables que necesito de un determinado tipo, para que por medio de ciclo repetitivo pueda crear las variables necesarias

Gracías de antemano


Germán Torres

[[Lepe]]

Por supuesto que puedes. Para agruparlos, puedes usar un TObjectList o un array.

Código Delphi [-]

Type TTablas = array of TTable;

....

var tablas: TTablas;
begin
 SetLength(tablas, 20); // reservamos espacio para 21 tablas (empieza en cero)
 for i:= low(tablas) to high(tablas) do
 begin
    tablas[i] := TTable.Create(Application);
    tablas[i].TableName := .....
 end;

Yo he puesto que al cerrar la aplicación se liberen los TTables automáticamente, pero puedes usar un "nil" en ese parámetro y construir tu propia rutina para liberarlos.

Si necesitas crear y liberar tablas a voluntad (o no sabes cuantas tablas deben crearse), te aconsejo el TObjectList, es más cómodo.

Saludos