Ayuda con COMBOBOX

[mcarazas]

Gracias por responder, yo necesito saltar cuando encuentre el codigo del lector si coloco con el Case, seria que estoy buscando uno por uno y yo tengo una lista de productos muy grande.

Código Delphi [-]
procedure TForm1.ComboBox1Select(Sender: TObject);
begin  
case ComboBox1.ItemIndex of  
0: begin    Showmessage('nada');  
1:..........una lista grande  end; end; end;