Zufälliges Element einer ComboBox auswählen

[Van HelF]

hier ein kleines bsp:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var i:byte;
begin
  randomize;// in form create

  // nur als bsp
  combobox1.Clear;
  for i:=0 to 5 do
    combobox1.Items.Add('Item'+inttostr(i));
  //
  combobox1.ItemIndex:=random(combobox1.Items.Count);
end;