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;