Incompatible types: 'TEdit' and 'Char'

bom pessoal bom diao q eu to querendo fazer aqui é o seguinte abrindo uma tela.. aparece um edit com o codigo do setor la o kra se der enter ele pesquisa no banco e traz o ultimo id + 1 pq identifica q é um cadastro novo ai fiz isso no onchange do edit com o codigo abaixo, primeira pergunta.. isso tem q ser feito no onchange ou é de outra forma que eu pego quando o kra apertar enter ou sair do campo com tab por exempo?  e olha o erro q ta dando
procedure TCadSetorForm.ed_CodSetChange(Sender: TObject);begin  datamodule1.zquery1.close;  datamodule1.zquery1.sql.clear;  datamodule1.zquery1.sql.add('select codset from setor');  datamodule1.zquery1.sql.add('order by codset');  datamodule1.zquery1.open;  if datamodule1.zquery1.recordcount = 0 then    ed_CodSet:='1'      else        begin          datamodule1.zquery1.last;          ed_codset := inttostr(datamodule1.zquery1.fieldbyname('codset').value + 1);          datamodule1.tb_setor.Append;        end;end;

erros
[Error] CadSetor.pas(62): Incompatible types: 'TEdit' and 'Char'[Error] CadSetor.pas(65): Incompatible types: 'TEdit' and 'String'[Fatal Error] OS.dpr(7): Could not compile used unit 'CadSetor.pas'