Ajuda com validação de componentes

Gostaria de uma ajuda na validação de componentes em um formulário, minha ideia e não validar por exemplo os 4 combobox e um edit um a um antes de executar os demais comandos segue o código.

procedure TFormAdicionarImpressora.BAdicionarClick(Sender: TObject);
var
cod_impressora, numero_impressora: String;
begin
// Pega Id Impressora
cod_impressora := FormLogin.impressoraDAO.BuscarIdPorNome(FormLogin.bancoDados, CBImpressoras.Text);
// Pega Numero Impressora
numero_impressora := FormLogin.centroResultadoDAO.BuscarNumeroPorId(FormLogin.bancoDados, cod_impressora);


// Validar os componentes antes de executar os códigos abaixo.

// Grava no Arquivo
FormLogin.cdsImpressoras.Insert;
FormLogin.cdsImpressorasid_impressora.Value := StrToInt(numero_impressora);
FormLogin.cdsImpressorasimpressora.Value := CBImpressoras.Text;
FormLogin.cdsImpressorasfabricante.Value := CBFabricante.Text;
if CBCom.Text = ''USB'' then
begin
FormLogin.cdsImpressorascomunicacao.Value := CBCom.Text;
end
else
FormLogin.cdsImpressorascomunicacao.Value := EIp.Text;
FormLogin.cdsImpressorasCentroDeResultado.Value := cbCentroDeResultado.Text;
FormLogin.cdsImpressoras.Post;
FormLogin.cdsImpressoras.SaveToFile(''C:\AllFood\impressoras.xml'');
Close();
end;