Código Delphi [-] EDCodigo.Text:= IntToStr(Adosuplidor.RecordCount);
EDCodigo.Text:= IntToStr(Adosuplidor.RecordCount);