Ver Mensaje Individual
  #7  
Antiguo 14-12-2003
Ruben_Cu Ruben_Cu is offline
No confirmado
 
Registrado: oct 2003
Ubicación: Mariel, Cuba
Posts: 271
Reputación: 0
Ruben_Cu Va por buen camino
Hola a todos, pzala parece que no estás adicionando las columnas, para rellenar el DBGrid, en tiempo de ejecución es necesario tener esto en cuenta te propongo que adecues a tu necesidad este código:
Código:
procedure TForm1.Button1Click(Sender: TObject);
begin
        with DBGrid1 do begin
                Columns.Clear;
                Columns.Add;
                with Columns[0] do
                        begin
                        FieldName := 'material';
                        Title.Alignment := taCenter;
                        Title.Caption := 'Descripción';
                        Width:= 300;
                        end;
                Columns.Add;
                with Columns[1] do
                        begin
                        FieldName := 'usuario';
                        Title.Alignment := taCenter;
                        Title.Caption := 'Comprador';
                        Width:= 60;
                        end;
                end;
end;
Aquí he adicionado dos columnas con las propiedades que yo necesito puedes usar mas o menos en función tus requerimientos. Obviamente repitiendo los bloques adicionas mas columnas.
El método clear es por si creastes columnas en tiempo de diseño de no ser así te sobra.
Espero esto te sea útil.
Saludos
Responder Con Cita