Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #9  
Antiguo 21-03-2012
Avatar de ElDioni
[ElDioni] ElDioni is offline
Miembro Premium
 
Registrado: jul 2005
Ubicación: Murcia (España)
Posts: 935
Poder: 22
ElDioni Va por buen camino
Hola,

en una ocasión vi un ejemplo de unos grids que dependía uno del otro, uno de los grids está oculto y aparece cuando haces click en un registro del grid que se está viendo. Quiero decir que tu verías el grid de los usuarios y al hacer click o al ir moviendote por los registros podrías ir enseñando el grid oculto con los permisos correspondientes, como si fuera un desplegable del grid principal. Lo podrías hacer de la siguiente forma.

Código Delphi [-]
procedure TFrmMenuArt.DBGridUsuariosCellClick(Column: TColumn);
begin
if QueryUsuarios.IsEmpty then
  begin
    DbGridPermisos.Visible:=False;
  end
else
  begin
    QueryPermisos.close;
    QueryPermisos.SQL.Text:='SELECT * FROM permisos WHERE usuario='+QueryUsuarios.FieldByName('Usuario').AsString;
    QueryPermisos.Open;
    DbGridPermisos.Top:=DBGridUsuarios.Top+(QueryUsuarios.RecNo*18)+18;
    DbGridPermisos.Visible:=true;
  end;
end;
No se que te parece el asunto, ya me contarás.

Saludos.
__________________
Confórmate con lo que tienes pero anhela lo que te falta.
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
Consulta con inner join juanjo123 MySQL 3 11-02-2010 22:34:16
Consulta INNER JOIN NeWsP SQL 3 27-12-2009 14:01:46
Consulta Con INNER JOIN Rockin SQL 2 14-07-2008 08:30:42
Consulta sobre left / Right outer join ContraVeneno MS SQL Server 2 06-07-2006 15:18:12
EdatabaseError FIELD NOT FOUND en consulta JOIN syntetiko SQL 5 02-10-2004 00:35:31


La franja horaria es GMT +2. Ahora son las 19:43:25.


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