Zufälliges Element einer ComboBox auswählen

[everdream]

heyho, ich hab ein kleines problemchen:
Ich möchte einen zufälligen String einer Combobox auswählen, weiß aber nicht, wie viele Strings diese grade hat.
meine überlegung:

Delphi-Quellcode:

Combobox1.Itemindex:=random(Combobox1.Items.Count)-1;

wär cool, wenn mir da jemand helfen könnte!

[Jelly]

Was klappt an deinem Code denn nicht. Die Combobox weiss sehr wohl, wieviele Items in ihr sind.

Ich würde nur noch das -1 weglassen, weil du sonst nie den letzten Eintrag kriegst:

Delphi-Quellcode:

Combobox1.Itemindex:=random(Combobox1.Items.Count);

[everdream]

sicher? weil der erste eintrag hat doch den index "0"...
wie auch immer, ich hab's mal versucht und irgendwie gehts immernoch nich.

die combobox is dann einfach immer leer.

[jmd anders]

du musst ja auch
ComboBox1.Text=Combobox1.Itemindex:=random(Combobo x1.Items.Count)-1;
setzen, damit ein random text nachher in der combobox steht.

[everdream]

text steht ja in der combobox drin.... nur halt immer unterschiedlich viele strings

ich müsste also nur den itemindex auf 'n wert setzen und dann müsste der das anzeigen...


edit: ich seh grade, dass es auch nich läuft, wenn man nen festen wert nimmt... bei na anderen CB gehts aber..

muss ich erst nochmal den quelltetx durchgehn -.-'

[Van HelF]

kommt drauf an welchen style die combobox hat, auf fixed dürfte man den text nicht ändern können.

[everdream]

hm, der muss aber ab und an mal geändert werden, aber ich kann das ja mal versuchen....

[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;

[everdream]

mhm, so hatte ich das ja.... nur halt noch ewig viel drumrum usw... wahrscheinlich irgendwas, wofür ich eh wieder den halben quelltext umstellen müsste -.-'

naja, hab eh keinen bock mehr auf die FA... alles andere läuft ja.