Funcao Sql

[kartter]

O problema é o seguinte: tenho este codigo no meu programa:

  dtamodule.Query1.Close;
  dtamodule.query1.SQL.clear;
  dtamodule.query1.sql.Text:='select count(*) from disciplina';
  dtamodule.Query1.Prepare;
  dtamodule.query1.open;

O codigo esta certo, mas queria receber o resultado desta consulta numa label.

Tipo, este comando sql vai me retornar qtos registros tenho na tabela.

Mas preciso mostrar o resultado numa label.

Como faço???

valeu!

KARTTER

[Progr'amador]

Olá, faz assim:

 dtamodule.Query1.Close;
 dtamodule.query1.SQL.clear;
 dtamodule.query1.sql.Text:='select count(*)count from disciplina';
 dtamodule.Query1.Prepare;
 dtamodule.query1.open;

 Label1.caption := dtamodule.query1.FieldByName('count').AsString;

Abs. Progr'amador.