Fórum CONTINUO COM PROBLEMAS NO COMBOBOX ! #407358
05/09/2011
0
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;
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;
Claudemir Lima
Curtir tópico
+ 0
Responder
Posts
06/09/2011
Wilson Junior
Substitua
Espero ter colaborado.
NomeGuerra:= ComboBox1.Text;
Espero ter colaborado.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)