instruccion WITH...
Colegas del grupo tengo un problema un tanto tonto que no se come
resolver... Me explico:
with Tablas.tbVisVen do
try
Disablecontrols;
...
...
finally
EnableControls;
end;
Todos conocemos esta intruccion, bien mi problema es el siguiente, a
mi me gustartia hacer esto:
Case seleccion of
0: tabla:=Tablas.tbVisVen;
1: tabla:=Tablas.tbVisAve;
2: tabla:=Tablas.tbVisRev;
end;
with tabla do
try
Disablecontrols;
...
...
finally
EnableControls;
end;
Explico Tablas es un DataModule y tbVisVen son TDataSets. Mi pregunta
es si lo puesto en el codigo se puede hacer, como debo declarar la
variable "tabla" y si no fuera asi, creo que este pequño codigo es
claro, como podria hacer algo parecido?
El tema esta que lo que va entre las sentencias WITH..Try..end se debe
repetir lo mismo solo que cambia la tabla de la base de datos...
Espero haber sido claro, y desde ya muchas gracias
PD: Quiero aclarar que intente declarar la variable Tabla como TDataSet y TpFIBDataSet (Ya que es el componente DataSet que utilizo) Pero nada no funciona
|