CONTINUO COM PROBLEMAS NO COMBOBOX !

Caros amigos, continuo tentando terminar esta rotina, o pessal tá me ajudando, a coisa tá indo devagar, to pesquisando mas sou mto leigo no assunto: Tô tentando a rotina abaixo, que seleciona dados da tabela TB_PESSOAL, selecionados através de dois ComBobox, está dando o erro (Incompatible Types: 'String' and 'TStrings'), somente no 2º ComboBox, serei grato se alguém puder me ajudar!       Var PG, NomeGuerra: String;
begin
  PG:= IntToStr(ComboBox1.ItemIndex + 1);
  NomeGuerra:= IntToStr(ComboBox1.ItemIndex + 1);
  DM.SDPessoal.Close;
  DM.SDPessoal.DataSet.CommandText := 'Select * From TB_PESSOAL Where COD_GRAD = ' + PG + ' AND NOME_GUERRA = ' + QuotedStr(NomeGuerra);
  DM.SDPessoal.Open;
end;