Precisando de freelancer em C, C++, Java, Delphi, PHP, JavaScript, 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 11556 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

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
Fechar
Osmar J. Silva - Criador do site Arquivo de CódigosVocê está precisando de freelancer para ajudá-lo em seus códigos Java, Delphi, PHP, C#, VB.NET 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
Fechar
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
Código-fonte completo para um cadastro de clientes em Delphi + Firebird + dbExpress. Neste CRUD (Create, Read, Update e Delete) eu mostro como realizar as quatro operações no banco de dados Firebird a partir do Delphi (INSERT, SELECT, DELETE e UPDATE). Direcionado a iniciantes em Delphi, o exemplo mostra também como usar máscaras para a digitação de datas e a inserção e leitura de datas no Firebird. Adquira já e veja como é fácil desenvolver aplicações de banco de dados em Delphi usando as classes SQLConnection e SQLDataSet. 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