Dúvida no Listbox

Delphi

19/01/2006

Olá galera tudo bem?
Eu estou com duas dúvidas...
1 - Eu tenho um ListBox com algums registros e quero que quando ele pedir para adicionar outro registro neste ListBox ele verifique se este item já existe. Se existir ele não faz nada e se não existir ele insere.


Prof. Baco

Prof. Baco

Curtidas 0

Respostas

Marco Salles

Marco Salles

19/01/2006

use ListBox1.Items.IndexOf

Var
OQueVoceQuerProcurar:String;
begin
OQueVoceQuerProcurar:=´Recebe Qaulquer Coisa´;
if ListBox1.Items.IndexOf(OQueVoceQuerProcurar) >= 0 Then
 Showmessage(´tem´)
else
  Showmessage(´não´);
end;


muito obrigado...


GOSTEI 0
POSTAR