Ver Mensaje Individual
  #1  
Antiguo 07-05-2006
Avatar de armadillo
armadillo armadillo is offline
Miembro
 
Registrado: abr 2005
Posts: 35
Reputación: 0
armadillo Va por buen camino
Question 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
Responder Con Cita