Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 08-09-2011
Avatar de Darkseratul
Darkseratul Darkseratul is offline
Miembro
NULL
 
Registrado: feb 2011
Posts: 58
Poder: 14
Darkseratul Va por buen camino
Exclamation !! Ordenar el DBGrid ¡¡

hola amigos del club un cordial saludos a todos y espero que todos anden muy bien en sus proyectos

Mi problema es que no puedo ordenar un DBGrid



esta es una pantalla de mi aplicación quisiera agregarle un botón para ordenar los registros de el DBGrid por decir (de la A - Z) de (recien ingresado)

ya he buscado en los foros pero no encuentro como hacerlo si alguien se da el tiempo de explicarme o quisas un link a un manual o algo asi

mi modo de conexion un TAdoconection, con un Tadotable y un datasuer

espero que me puedan ayudar y de ante mano muchas gracias
Responder Con Cita
  #2  
Antiguo 08-09-2011
Avatar de oscarac
[oscarac] oscarac is offline
Miembro Premium
 
Registrado: sep 2006
Ubicación: Lima - Perú
Posts: 2.010
Poder: 20
oscarac Va por buen camino
yo uso algo como esto al hacer click en la barra de titulos

Código Delphi [-]
 
procedure TfrmCatalogoAnexo.dbgAnexoTitleClick(Column: TColumn);
$J+}
 const PreviousColumnIndex : integer = -1;
{$J-}
begin
  if dbgAnexo.DataSource.DataSet is TCustomADODataSet then
  with TCustomADODataSet(dbgAnexo.DataSource.DataSet) do
  begin
    if PreviousColumnIndex > -1 then
    begin
      dbgAnexo.Columns[PreviousColumnIndex].title.Font.Style :=
      dbgAnexo.Columns[PreviousColumnIndex].title.Font.Style - [fsBold];
    end;
     try
     except
    end;
    Column.title.Font.Style := Column.title.Font.Style + [fsBold];
    PreviousColumnIndex := Column.Index;
    if (Pos(Column.Field.FieldName, Sort) = 1) and
       (Pos(' DESC', Sort)= 0) then
      Sort := Column.Field.FieldName + ' DESC'
    else
      Sort := Column.Field.FieldName + ' ASC';
  end;
__________________
Dulce Regalo que Satanas manda para mi.....
Responder Con Cita
  #3  
Antiguo 08-09-2011
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.057
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Cita:
Empezado por Darkseratul Ver Mensaje
ya he buscado en los foros pero no encuentro como hacerlo si alguien se da el tiempo de explicarme o quisas un link a un manual o algo asi
Pues no sé cómo has buscado, salen montones de entradas con esas dos palabras "ordenar dbgrid" .
Fíjate que justo al final de esta página, al fondo del todo, se te ha presentado 5 enlaces a temas similares y con el mismo título. Para algo sirve poner títulos descriptivos
Responder Con Cita
Respuesta



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
ordenar un dbgrid anoniboxx C++ Builder 6 22-04-2010 21:24:36
Ordenar una tabla en un Dbgrid RockFaster Varios 1 12-10-2008 15:34:05
Ordenar por cambos un dbgrid radge OOP 5 18-06-2008 10:25:11
Ordenar datos en un DBGrid jona-182 Conexión con bases de datos 3 30-03-2007 21:43:06
Ordenar dbgrid jzk OOP 4 17-12-2004 13:45:45


La franja horaria es GMT +2. Ahora son las 18:29:28.


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