Fórum Mostar Mensagem em tela #295806

Caros Amigos.

tenho este select
SELECT
COD_AIT

FROM
TAtualizaDE AD

WHERE (AD.Cod_AIT IN (SELECT Cod_AIT FROM TAIT WHERE (Num_L = 613)))
AND (AD.Cod_Recebimento IS NULL OR AD.Cod_Recebimento <>14)
AND (AD.DtEntrada_Operacao =
(SELECT MAX(DtEntrada_Operacao) FROM TAtualizaD ATD WHERE (AD.Cod_AIT = ATD.Cod_AIT)))
AND AD.cod_ait NOT IN (SELECT cod_ait FROM TCancelamento)
AND AD.cod_ait NOT IN (SELECT cod_ait FROM TCancNo)



Como faço para todos os resultados deste um select aparecerem num
application message? tipo uma lista de todos os campos retornados!
e

ste e o que eu tenho

if (FieldByName(´COD_AIT´).AsString > IntToStr(0)) then
Application.MessageBox(PChar(´Não é possível gerar ´ + ´Porque existe(m) pendência(s) de ´ +
FieldByName(´COD_AIT´).AsString + ´ local.´),
´Erro´, MB_OK + MB_ICONERROR)


Desde ja grato pela gentileza de todos...

Atenciosamente.