Conheça o Digitando XE
Precisando de freelancer em JavaScript, AJAX, C, C++, Java, Delphi, PHP, C#, VB.NET, JSP, Servlets, JSF, etc? Fale comigo: osmar@arquivodecodigos.net
Você está aqui: Inicio -> Dicas e Truques -> Delphi -> Como pesquisar e selecionar um item em uma ListBox
Como pesquisar e selecionar um item em uma ListBox
Esta dica foi visualizada 13528 vezes

Categoria: VCL - Visual Component Library
Sub-Categoria: TListBox [Veja dicas relacionadas]

Meu site é muito confuso mesmo. Se até agora não encontrou o que procura, experimente minha pesquisa interna abaixo. É provável que a resposta para a sua pergunta esteja em uma das mais de 5.000 páginas do site.
Pesquisa:




Compartilhe esta página com seus amigos no Facebook

Tópicos mais populares de Delphi


Como pesquisar e selecionar um item em uma ListBox

O trecho de código abaixo mostra como podemos usar a mensagem LB_SELECTSTRING da Windows API para pesquisar e selecionar um item em uma ListBox. Veja que aqui eu usei a função InputBox() para permitir ao usuário inserir o texto a ser pesquisado. Note também o valor -1 fornecido como wParam para a função SendMessage(). Este valor faz com que a busca se inicie no primeiro item da lista e continue até o final da lista. Veja o código:

procedure TForm1.Button2Click(Sender: TObject);
var
  pesquisa: string;
begin
  // vamos solicitar o texto a ser pesquisado na ListBox
  pesquisa := InputBox('Pesquisar', 'Informe o texto', '');

  // vamos pesquisar e selecionar o item encontrado
  if SendMessage(ListBox1.Handle, LB_SELECTSTRING, - 1,
      Longint(PChar(pesquisa))) <> LB_ERR then
    begin
      ShowMessage('O texto pesquisado foi encontrado no ' +
        'índice: ' + IntToStr(ListBox1.ItemIndex));
    end
  else
    begin
      ShowMessage('O texto pesquisado não foi encontrado.');
    end;
end;

Note que a busca efetuada por LB_SELECTSTRING não é sensitiva a maiúsculas e minúsculas. Assim, Osmar e OSMAR são tratadas igualmente.

Para fins de compatibilidade, esta dica foi escrita usando Delphi 2009.
Sobre o autor:
Osmar J. SilvaOsmar J. Silva (dono deste site e de 99,99% de seu conteúdo)

Olá, muito obrigado por estar visualizando esta página do meu site. Sou programador freelancer nas linguagens e frameworks Java, C/C++, Delphi, C#, VB.NET, PHP, Python, Ruby, JSP, Servlets, JSF, JPA, Hibernate, e muitas outras. Entre em contato comigo caso esteja precisando de algum trecho de código não encontrado no site. Meu Skype é: osmar@recomende.com. Meus telefones são (62) 3261-7018 / 8185-0734 e meu e-mail é osmar@arquivodecodigos.net.
 
Digitando 2011 - O programa de digitação mais usado em todo o Brasil
Patrocinador oficial: O Digitando 2011 é um dos programas para a prática de digitação mais usados no Brasil. É o preferido das franquias DATA BYTE, Microlins, MICROCAMP e PREPARA. Faça o download e conheça-o você também. O Digitando é o único no Brasil que permite a execução de músicas e rítmos de bateria enquanto se pratica a digitação.
Veja mais Dicas & Truques na sub-categoria: TListBox
Veja mais Dicas & Truques de outras linguagens
JSP (Java Server Pages) - Aprenda a excluir diretórios usando JSP
Fechar
Osmar J. Silva - Criador do site Arquivo de CódigosVocê está precisando de freelancer para ajudá-lo em seus códigos JavaScript, Java, PHP, C#, C/C++ e outras linguagens?
Meu nome é Osmar J. Silva e atuo como freelancer desde 2001. Clique aqui e fale comigo por telefone, e-mail ou Skype.
Faculdade Delta - Goiânia-GO
Faculdade Delta - Goiânia-GO
Assinantes
Por favor, informe os dados abaixo para acessar sua conta:
Usuário:
Senha:
 
Esqueci minha senha
Quero criar uma conta
Veja mais Dicas & Truques de Delphi
 
Dicas e truques de Java
Dicas e truques de C++
Dicas e truques de Delphi
http://www.arquivodecodigos.net
2000 - 2013 - Todos os direitos reservados a Osmar J. Silva
Todo o conteúdo deste site, quando não devidamente observado, pertence a seus idealizadores e não
poderá ser usado para outras finalidades senão estudo e aprimoramento de técnicas de programação.

Posso copiar o conteúdo do site e colocar em meu site ou blog? Pode sim, desde que você coloque um link e referência
ao meu site. Caso não faça isso meu advogado fará todo o possível para deixar sua conta bancária com algumas centenas
de Reais a menos.

Fale Conosco: (62) 3261-7018 / (62) 8185-0734
E-Mail: suporte@recomende.com
MSN: osmar@recomende.com (só para negócios, por favor)
Perfil no LinkedIn: http://br.linkedin.com/pub/osmar-j-silva-silva/8/94a/630

Para me contratar como freelancer ligue: (062) 3261-7018 / (62) 8185-0734

Desenvolvedor Responsável: Osmar J. Silva
Clique para fechar este anúncio Baixe uma cópia de avaliação do Digitando XE
Códigos-fonte e exemplos completos em Delphi
Aprenda ou aprimore seus conhecimentos em Delphi estudando e modificando uma aplicação completa com códigos comentados:
Cadastro de Clientes - CRUD completo - Delphi + Firebird + dbExpress - 3 Tabelas com Integridade Referencial
Este código fonte é direcionado aos iniciantes em programação Delphi que queiram ver o exemplo de uma aplicação completa usando Delphi + Firebird + dbExpress. Neste exemplo eu mostro como fazer um CRUD completo (INSERT, SELECT, UPDATE e DELETE) em um banco de dados Firebird a partir do Delphi. A diferença entre este exemplo e este é que agora eu mostro como relacionar três tabelas (criadas usando integridade referencial).

Temos três tabelas: CLIENTES, ESTADOS e CIDADES. Na hora de cadastrar o cliente o usuário selecionará o estado e o combobox de cidades será preenchido com as cidades correspondentes ao estado selecionado, ou seja, comboboxes dinâmicos. E tudo isso usando apenas dbExpress. Nada daquela confusão de combos e listas de lookups.. Código fonte disponível para Delphi 7 e 2010.

Preço do código: R$ 20,00 [Clique aqui para mais informações]
Veja mais exemplos e códigos fonte aqui
Fechar esta janela