| 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 |
|
 |
|