Fórum Exibe String em DBCombobox Salvando Integer no Banco #364694

Senhores,

estou a 1 mes +- com uma duvida Cruel.

ai vai minha Query..

if DmPrincipal.tb_Movimento.State in [dsEdit, DsInsert] then
DbComboBox4.Clear;
begin
with DmPrincipal.Q_Carrega_Pessoa do
begin
Close;
SQL.Clear;
SQL.Add(´SELECT nome_cliente ´);
SQL.Add(´FROM tb_clientes C´);
SQL.Add(´INNER JOIN tb_tipo_pessoa TP´);
SQL.Add(´ON C.cod_tipo_pessoa = TP.cod_tipo_pessoa´);
SQL.Add(´AND (C.cod_tipo_pessoa = :p_Cod_tipo_pessoa)´);
ParamByName(´p_Cod_tipo_pessoa´).AsInteger := DmPrincipal.tb_MovimentoCod_tipomovimento.Value;
Prepare;
Open;
DmPrincipal.Q_Carrega_Pessoa.First;
while not DmPrincipal.Q_Carrega_Pessoa.EOF do
begin
DbComboBox4.Items.Add(DmPrincipal.Q_Carrega_Pessoa.fieldbyname(´nome_cliente´).AsString);
DmPrincipal.Q_Carrega_Pessoa.Next;
end;
end;
end;
end;


Meu DbComboBox4 esta listando os nomes corretamente porém quando tento sair ele gera o seguinte erro:

is not a valid integer for field ´Cod_Cliente´ ou seja, campo string nao pode ser salvo na tabela pois ela somente armazena inteiros.

Minha duvida é:

Como quero somente alguns clientes e nao todos nao posso usar o LoockupComboBox, por isso uso o DbCombobox. Como devo proceder::??

Obrigado!!