Mostrar una tabla en un DBGrid por codigo

[NISOTO]

Hola a todos,

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

ID_MATERIA INTEGER *
NOMBRE VARCHAR
IHS INTEGER
AREA VARCHAR

Utilizo Delphi 2007 y Firebird 2.5.

[ecfisa]

Hola NISOTO.

Es bastante simple, según creo recordar de un hilo anterior usas los componentes IBX. Entonces, teniendo ya configurados tu TIBDatabase y tu TIBTransaction, agrega un TIBQuery, un TDataSource y un TDBGrid.

El código de ejemplo:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  DataSource1.DataSet:= IBQuery1;
  DBGrid1.DataSource:= DataSource1;
  with IBQuery1 do
  begin
    Database:= IBDatabase1;
    Transaction:= IBTransaction1;
    Close;
    SQL.Text:= 'SELECT ID_MATERIA, NOMBRE, IHS, AREA FROM TU_TABLA'; 
    Open;
  end;
end;

En la sentencia SQL, deberás reemplazar "TU_TABLA" por el nombre que le diste a la tabla.

Saludos