Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Otros entornos y lenguajes > C++ Builder
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #3  
Antiguo 07-08-2014
Yugo Yugo is offline
Miembro
NULL
 
Registrado: jul 2014
Posts: 25
Poder: 0
Yugo Va por buen camino
Hola lmpadron, quería agradecerte tu interés en responder a mi duda y por supuesto que trataré de seguir el consejo acerca de la claridad en la explicación de las dudas.

Básicamente has entendido bastante bien la cuestión, pero para que quede aún más claro voy a tratar de explicarlo de otra manera sólo para un registro de la tabla2, por ejemplo:

1.- Uso estos componentes: TTable1, TTable2, TDataSource1, TDBNavigator1, 13 TLabels, 26 TDBEdits (uno por cada campo de la tabla2 para ver los datos del registro actual) y un TQuery1 para realizar la consulta.
2.- Uso BDE para trabajar con bases de datos locales.
3.- En la tabla2, recorrer todos los campos del registro actual y tomando cada par de Frec2.x---Id2.x
para comparar sus datos con el par Frec1---Id1 de todos los registros de la tabla1. Por lo tanto, tendría
que usar un bucle for, tal que así:
Código:
for(x=1;x<=13;x++)
{
  Query1->Close();
  Query1->SQL->Clear();   
     String sConsulta = "  SELECT * FROM  tabla1 WHERE tabla1.Frec1 =  tabla2.Frec2.x AND  tabla1.Id1 = tabla2.Id2.x  ORDER BY Nombre1";
     Query1->SQL->Add(sConsulta);
     Query1->Open();
   
     //Si la consulta devuelve alguna coincidencia
       if(!Query1->IsEmpty())
     {
            //Hacer que la etiqueta contenga el nombre (ordenado alfabeticamente)
            Labelx->Caption = Query1->FieldByName("Nombre1")->AsString; 
      }
  //Si la consulta no devuelve ninguna coincidencia
      else
      {
    Labelx->Caption = "Ninguna coincidencia encontrada.";
       }
}
4.- En este caso, ¿debería insertar dicho código de actuación en el evento AfterScroll del componente TTable2? que es verdaderamente el componente que enlaza con la tabla que voy recorriendo con el TDBNavigator, ¿cierto?
5.- Por otro lado, si al abrir la aplicación también se debe realizar esta operación con el primer registro de la tabla2, que sería el registro actual, ¿qué debería hacer para ello?

Un saludo compañero!!

Última edición por ecfisa fecha: 07-08-2014 a las 07:38:14. Razón: Agregar etiquetas [code]
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Migrar version BCB6 Toni C++ Builder 6 20-10-2014 14:44:32
TurboPower Systool bcb6 eldonfsr C++ Builder 0 15-01-2008 04:11:35
Coincidencia?? vtdeleon Debates 2 28-04-2006 13:43:17
Exportación de datos de Excel a Tablas Paradox Mone Conexión con bases de datos 1 31-10-2005 21:15:40
Como buscar en una tabla Paradox ? gregorio Tablas planas 2 25-04-2005 18:54:29


La franja horaria es GMT +2. Ahora son las 10:33:29.


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
Copyright 1996-2007 Club Delphi