Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Pessoal eu preciso adaptar esse código de autocompletamento de combobox usando ZQuery, para autocompletamento de DBEdit usando ZTable
A ideia é,
A cada letra digitada no DBEditNome, vai sendo feito uma pesquiza por uma correspondencia na tabela de Clientes e autoompletando o nome da pessoa....
E automaticamente a segunda parte do código, mostra os outros dados referente aquele nome escolhido.
Como ficaria?
ZQueryClientes.Active := False;ZQueryClientes.SQL.Clear;ZQueryClientes.SQL.Add('Insert into Clientes(CliNome,CliCpfCnpj) Values('+''''+ComboBoxNome.Text+''''+','+''''+ComboBoxCpfCnpj.Text+''''+')');ZQueryClientes.ExecSQL;ZQueryClientes.Refresh;ZQueryClientes.first;while not ZQueryClientes.EOF dobeginComboBoxNome.Items.Add(VarToStr(ZQueryClientes.Fields[1].value));ZQueryClientes.Next;end;ZQueryClientes.LOCATE('CliNome',ComboBoxNome.Text,[loCaseInsensitive, loPartialKey]);ComboBoxID.TEXT:=ZQueryClientes.fieldbyname('CliID').Value;ComboBoxCPFCNPJ.TEXT:=ZQueryClientes.fieldbyname('CliCpfCnpj').Value;ComboBoxTelefone.TEXT:=ZQueryClientes.fieldbyname('CliTelefone').Value;ComboBoxEndereco.TEXT:=ZQueryClientes.fieldbyname('CliEndereco').AsString;ComboBoxCidade.TEXT:=ZQueryClientes.fieldbyname('CliCidade').AsString;ComboBoxNacimento.TEXT:=ZQueryClientes.fieldbyname('CliNacimento').Value;
Adaptação de Código - Como ficaria?
Carregando comentários...