Exibir numa combobox registro de query

[Carcleo 4]

Olá pessoal, olha só.

 

Tenho 2 combobox no form

 

ComboBoxNome

ComboBoxCpfCnpj

 

 

o usando os dois códigos abaixo pra mostrar o cpf do cliente cujo nome, à medida que o nome é digitado no ComboBoxNome, mostrar no ComboBoxCpfCnpj.

Mas num dá certo, num da erro, nem sai o cpf.

O que estou fazendo de errado?

 

procedure TFormCadastros.ComboBoxCpfCnpjChange(Sender: TObject);beginSqlQueryClientes.Close;SqlQueryClientes.sql.Clear;SqlQueryClientes.SQL.Add('Select * from Clientes where CliNome = '+''''+ComboBoxNome.Text+''''+'');SqlQueryClientes.Open;SqlQueryClientes.first;while not SqlQueryClientes.EOF dobeginComboBoxCpfCnpj.Items.Add(VarToStr(SqlQueryClientes.Fields[2].value));SqlQueryClientes.Next;end;end;

procedure TFormCadastros.ComboBoxCpfCnpjChange(Sender: TObject);begin  SQLQueryClientes.Close;  SQLQueryClientes.SQL.Clear;  SQLQueryClientes.SQL.Add('select * from Clientes where CliNome = :Nome');  SQLQueryClientes.ParamByName('Nome').AsString := ComboBoxNome.Text;  SQLQueryClientes.Open;  SqlQueryClientes.first;while not SqlQueryClientes.EOF dobeginComboBoxCpfCnpj.Items.Add(VarToStr(SqlQueryClientes.Fields[2].value));SqlQueryClientes.Next;end;end;

Depois pretendo fazer o mesmo para todos os outros campos da tabela... Endereco, telefone...

 

Obrigado

[roger_fn 0]

voce ja tentou inverter os codigos ai?????/