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:

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 :)