4 respuestas en este tema

[nilsemsolano]

Hola a todos,

Por favor, alguien podria desirme como muestro la siguiente tabla en un DBGrid, pero que sea por codigo.

Osea, el DBGrid esta en pantalla, al pulsar un boton me muestre la tabla.

delphi

CREATE TABLE MATERIAS (
    ID_MATERIA    INTEGER NOT NULL,
    NOMBRE          VARCHAR(30) NOT NULL,
    IHS                 INTEGER NOT NULL,
    AREA               VARCHAR(2) NOT NULL
    PRIMARY KEY(ID_MATERIA)
);

[egostar]

Hola a todos,

Por favor, alguien podria desirme como muestro la siguiente tabla en un DBGrid, pero que sea por codigo.

Osea, el DBGrid esta en pantalla, al pulsar un boton me muestre la tabla.

CREATE TABLE MATERIAS (
    ID_MATERIA    INTEGER NOT NULL,
    NOMBRE          VARCHAR(30) NOT NULL,
    IHS                INTEGER NOT NULL,
    AREA              VARCHAR(2) NOT NULL
    PRIMARY KEY(ID_MATERIA)
);

¿ Y que usas para desarrollar programas ?

Saludos

[nilsemsolano]

Ok,

Utilizo Delphi 2007 y Firebird 2.5.

[Delphius]

A lo que se refiere el compañero egostar es wue suite de componentes de acceso a base de datos usas. En Delphi hay muchas suites... IBX, ADO, Zeos, FireDac por mencionar algunas. Dependiendo de cual uses algunas cosas se hacen diferentesEn lineas generales basta en conectar el DBGrid al DataSource. Y este DataSource al DataSet propio de la suite.
Por tu pregunta aprecio que recién te inicias, sugiero una leida a los manuales y tutoriales que ofrecemos en el foro y sobre todo una profunda leida al libro La Cara Oculta de Delphi. En ese libro se expone todo lo fundamental para dominar Delphi...es lectura obligada.

Saludos,

[cram]

Supongo que por código te referirás a en forma no visual (programmatically como dicen en inglés)

Te paso un código de prueba, no te ofendas, puede tener errores, pero si mal no interpreté tu petición, es algo así y quizás te ayude.
utiliza IBControls, DB Firebird, y es obvio que algunos componentes no se encuentran allí.
dmcen es un DataModule.
trListados es un Transacción.
qryStockCritico es una IBQuery.

delphi

// Crea un panel con controles internos para mostrar el stock crítico y un botón para la destrucción misma del panel.
// El botón que cierra el panel también cierra las transacciones.
procedure TfrmPrincipal.btInfoStockCrClick(Sender: TObject);
var
  But: TButton;
  Pan: TPanel;
  Grilla: TDBGrid;
  dsSC: TDataSource;
begin
// DataSource
  dsSC:= TDataSource.Create(Self);
  dsSC.DataSet:= dmcen.qryStockCritico;
  dmcen.trListados.StartTransaction;
  dmcen.qryStockCritico.Open;
// Panel de información rápida
  PanInfo:= TPanel.Create(Self);
  with PanInfo do
  begin
    Parent:= frmPrincipal;
    Align:= alClient;
    Caption:= '';
  end;
// Panel inferior del panel de información rápida
  Pan:= TPanel.Create(Self);
  with Pan do
  begin
    Parent:= panInfo;
    Align:= alBottom;
    Height:= 40;
    Caption:= '';
  end;
// Botón de cierre
  But:= TButton.Create(Self);
  with But do
  begin
    Parent:= Pan;
    Caption:= 'Cerrar';
    Align:= alRight;
    AlignWithMargins:= True;
    Height:= 40;
    OnClick:= btInfoStCrClick;
  end;
// Grilla de datos
  Grilla:= TDBGrid.Create(Self);
  with Grilla do
  begin
    Grilla.Parent:= PanInfo;
    Grilla.DataSource:= dsSC;
    Grilla.Align:= alClient;
    Grilla.Columns.Add;
    Grilla.Columns[0].FieldName:= 'DENOMINACION';
    Grilla.Columns[0].Title.Caption:= 'Denominación del artículo';
  end;
end;

En este caso sólo hay una columna. Pero créalas análogamente.
Espero que utilices componentes de InterBase.

Se que muchos se verán espantados, pero es una prueba y si me pongo a perfeccionarla talvez ya hayas desistido.

PD: se escribe "decir" no "desir".