Exibir mensagem anterior :: Exibir próxima mensagem |
Autor |
Mensagem |
oiselcroo Novato
Registrado: Domingo, 19 de Fevereiro de 2017 Mensagens: 29
|
Enviada: Ter Fev 21, 2017 11:07 am Assunto: ComboBox1.Items.AddObject no XE8 mobile |
|
|
BOM DIA A TODOS
MEU PROJETO NAO CARREGA O COMBOBOX DA ERRO,
ALGUEM PODE ME AJUDAR.
DESDE JA AGRADEÇO.
while not sql.Eof do
begin
nome := VarToStr(sql.Fields[1].Value);
codigo := VarToStr(sql.Fields[0].Value);
ComboBox1.Items.AddObject(nome ,TObject(StrToInt(codigo)));
sql.Next;
end; |
|
Voltar ao Topo |
|
|
wolverinefarah Colaborador
Registrado: Sábado, 17 de Junho de 2006 Mensagens: 1770
|
Enviada: Seg Mar 13, 2017 9:17 pm Assunto: Re: ComboBox1.Items.AddObject no XE8 mobile |
|
|
oiselcroo escreveu: | BOM DIA A TODOS
MEU PROJETO NAO CARREGA O COMBOBOX DA ERRO,
ALGUEM PODE ME AJUDAR.
DESDE JA AGRADEÇO.
while not sql.Eof do
begin
nome := VarToStr(sql.Fields[1].Value);
codigo := VarToStr(sql.Fields[0].Value);
ComboBox1.Items.AddObject(nome ,TObject(StrToInt(codigo)));
sql.Next;
end; |
Tente:
Código: | ComboBox1.Items.Add(nome ,TObject(StrToInt(codigo))); |
_________________ Fernando Farah
PROGRAMADOR PROGRESS
PROGRAMADOR DELPHI + FIREBIRD |
|
Voltar ao Topo |
|
|
|