mostrar texto associado
A instrução While objTxtRd.Read do indica um loop no Delphi; entretanto, está sintaticamente errada porque precisa de um ponto-e-vírgula no final da linha.