Ver Mensaje Individual
  #6  
Antiguo 07-10-2011
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Reputación: 27
Caral Va por buen camino
Hola
Vamos a la pregunta bien planteada:
Se pueden usar los mismos componentes ?, como ?:
Supongamos que tenemos dos o varias TList y queremos usar el mismo zQuery para llenar todos:
Código Delphi [-]
ZQuery1.Sql.Text:= 'Select nombre, apellido from medico';
ZQuery1.Open;
 While not zQuery1.eof do
 begin
 bsSkinListBox1.Items.Add(nombre);  //primer listBox
 zQuery1.Next;
 end;
ZQuery1.Close;  // cierro
ZQuery1.Sql.Text:= 'Select Direccion, Telefono from medico';
ZQuery1.Open;
 While not zQuery1.eof do
 begin
 bsSkinListBox2.Items.Add(nombre); // segundo listBox
 zQuery1.Next;
 end;
////ETC;;;
En el caso de un ZTable, simplemente se cambie el nombre de la tabla en la propiedad TableName:
Código Delphi [-]
ZTable1.TableName:= 'Nada';
ZTable1.Open;
// hago lo que necesito hacer y:
ZTable1.Close;
ZTable1.TableName:= 'Otra';
ZTable1.Open;
Saludos
__________________
Siempre Novato
Responder Con Cita