Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

 
 
Herramientas Buscar en Tema Desplegado
  #6  
Antiguo 29-09-2010
Avatar de naty_prog
naty_prog naty_prog is offline
Miembro
 
Registrado: sep 2010
Ubicación: los condores,calamuchita
Posts: 25
Poder: 0
naty_prog Va por buen camino
problema con dbgrid y sql

Hola nuevamente, les comentamos que el problema no viene exactamente de las conexiones, ya que hemos revisado cada una y están correctas. Creemos que es algo referido a sql o parte del código ejecutable.
A continuación, le damos la lista de los componentes que usamos:
Código Delphi [-]
IBDataset_correlativas:para conectar con la tabla correlatividad por medio de un ibdatabase_sistema.
DataSource_Correlativas: conecta con el ibdataset_correlativas.
DataSource_cCorrelativas_regular_rendir: para conectar con el IBQuery_Correlativas_regular_rendir.
DataSource_Ccorrelativas_regular_cursar: conecta con IBQuery_Correlativas_Regular_cursar.
DataSource_Ccorrelativas_aprobada_rendir: conecta con IBQuery_Correlativas_Aprobada_rendir.
DataSource_Ccorrelativas_aprobada_cursar: conecta con IBQuery_Correlativas_Aprobada_Cursar.
En el formulario_correlativas, en el evento OnShow, tenemos que mostrar las correlatividades que tiene una materia seleccionada previamente. La idea es mostrar los registros de las correlatividades en 4 grillas:
DBGrid_cursar_regular
DBGrid_rendir_regular
DBGrid_cursar_aprobado
DBGrid_rendir_aprobado
Para ello, utilizamos el siguiente código:
 begin
                   DM.IBQuery_Correlativas_Regular_cursar.SQL.Clear;
                   DM.IBQuery_Correlativas_Regular_cursar.SQL.Add('Select * from correlatividad where id_materia=:mat and TIPO=(CURSAR) and ESTADO_CORRELATIVIDAD=(REGULAR)');
                   dm.IBQuery_Correlativas_Regular_cursar.ParamByName('mat').AsInteger:=dm.IBQuery_materiaID_MATERIA.Va  lue;
                   dm.IBQuery_Correlativas_Regular_cursar.Open;
                   DM.IBDataSet_Correlativas.Locate('id_CORR',DM.IBQuery_Correlativas_Regular_cursarID_CORR.Value,[]);
                 end;

                 begin
                   DM.IBQuery_Correlativas_regular_rendir.SQL.Clear;
                   DM.IBQuery_Correlativas_regular_rendir.SQL.Add('Select * from correlatividad where TIPO=RENDIR and estado_correlatividad=REGULAR');
                   dm.IBQuery_Correlativas_regular_rendir.Open;
                   DM.IBDataSet_Correlativas.Locate('id_CORR',DM.IBQuery_Correlativas_regular_rendirID_CORR.Value,[]);
                 end;

                 begin
                   DM.IBQuery_Correlativas_Aprobada_Cursar.SQL.Clear;
                   DM.IBQuery_Correlativas_Aprobada_Cursar.SQL.Add('Select * from correlatividad where TIPO=CURSAR and estado_correlatividad=APROBADA');
                   dm.IBQuery_Correlativas_Aprobada_Cursar.Open;
                   DM.IBDataSet_Correlativas.Locate('id_CORR',DM.IBQuery_Correlativas_Aprobada_CursarID_CORR.Value,[]);
                end;

                begin
                  DM.IBQuery_Correlativas_Aprobada_rendir.SQL.Clear;
                  DM.IBQuery_Correlativas_Aprobada_rendir.SQL.Add('Select * from correlatividad where TIPO=RENDIR and estado_correlatividad=APROBADA');
                  dm.IBQuery_Correlativas_Aprobada_rendir.Open;
                  DM.IBDataSet_Correlativas.Locate('id_CORR',DM.IBQuery_Correlativas_Aprobada_rendirID_CORR.Value,[]);
                end;
Esperamos que puedan entender cuál es la situación, y desde ya lesdamos las gracias.
Saludos a todos.

Última edición por marcoszorrilla fecha: 29-09-2010 a las 11:27:11.
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
Restar/Sumar entre DBGrid's Lenny Varios 5 02-07-2010 13:54:13
Conectar dos pc en red Caral Linux 4 10-05-2010 00:20:36
DBGrid de DBGrid's hector.roma OOP 1 11-08-2006 13:28:09
Funciona el RecordCount en los ibQuery's???? AGAG4 Varios 7 04-11-2004 16:24:11
Vistas en IBQuery's StartKill Firebird e Interbase 3 23-03-2004 19:24:41


La franja horaria es GMT +2. Ahora son las 12:30:37.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi