Atribuir uma consulta a uma variável

[leandro gawleta]

Bom dia pessoal,

Estou tentando montar um filtro para um relatório em que o usuário informa o período de data e em um combobox o Código do cliente, gostaria de ao colocar o código do cliente no combobox ele mostra-se o nome em um textbox. 

Fiz algo assim mas está informando dados incompatíveis,

procedure Button1OnClick(Sender: TfrxComponent);
          
begin
        if CbCliente.Text <> '' then
           tblCancelados.SQL.Add(' AND Clientes.CodCliente = ''' + CbCliente.Text + '''');
           tblCancelados.SQL.Add(' ORDER BY Clientes.Data DESC');
end;
var
w: string;                                 
begin
  
       w := Cliente.SQL.Add('SELECT RAZAO FROM CLIENTES WITH(NOLOCK)WHERE CODIGO=' + StrToInt( CbCliente.Text) + );  
      
       Cliente.Close;
       Cliente.Open;                                
       Edit1.Date := date - 30;
       Edit2.Date := date;    

end.