Random und if Abfrage

[citybreaker]

Hallo,

Ich habe eine ListBox. Aus dieser soll durchzufall ein Item in einm Label angezeigt werden.
Soweit habe ich das auch. Alerdings soll jenachdem was in dem Label steht etwas passieren.
Hoffe ich habe mir klar genung ausgedrückt.

Delphi-Quellcode:

procedure TForm1.TButton1.Click(Sender: TObject);
var zufall: integer;
begin
  randomize;
  zufall := random(ListBox1.Items.Count) + 1;
  Label1.Caption := IntToStr(Zufall);
end;

Wie kann ich nun das nun überprüfen?

[sakura]

Wie wäre es mit

Delphi-Quellcode:

if Label1.Caption = '1' then
  // do 1
else if Label1.Caption = '2' then
  // do 2
else if Label1.Caption = '3' then
  // do 3
else if Label1.Caption = '4' then
  // do 4
else
  // do else

......

[citybreaker]

Naja, da unmengen von Items zur Laufzeit hinzugefügt werden können
vielleicht net grade die beste Idee, oder?

[sakura]

Zitat von citybreaker:

Hoffe ich habe mir klar genung ausgedrückt.

Dann musst Du Dich etwas klarer ausdrücken

......

[DennyC]

Zitat von citybreaker:

Naja, da unmengen von Items zur Laufzeit hinzugefügt werden können
vielleicht net grade die beste Idee, oder?

Aber allem Anschein nach soll doch bei jedem Item was anderes passieren, oder nicht? Dann wirst Du um so eine Struktur wohl nicht rumkommen.

Denny

[citybreaker]

Zitat von DennyC:

Zitat von citybreaker:

Naja, da unmengen von Items zur Laufzeit hinzugefügt werden können
vielleicht net grade die beste Idee, oder?

Aber allem Anschein nach soll doch bei jedem Item was anderes passieren, oder nicht? Dann wirst Du um so eine Struktur wohl nicht rumkommen.

Denny

Ja bei jedem Item soll was anderes Passieren. Aber ich kann nicht im voraus
planen wieviele Items später zur Laufzeit angelegt werden.

[sakura]

Zitat von citybreaker:

Ja bei jedem Item soll was anderes Passieren. Aber ich kann nicht im voraus
planen wieviele Items später zur Laufzeit angelegt werden.

Dann kannst Du es auch nicht programmieren

......

[citybreaker]

Das ja ein mist.

[sakura]

Hast Du denn eine Art Regel, was bei welchem Item passieren soll, wovon die Aktion abhängig ist, etc.?

......

[citybreaker]

Öhm gewisser weise schon. Habe ne Ini File.

[Frage1]
Frage=
Antwort1=
Antwort2=
Antwort3=
Antwort4=


Man kann fragen in die Ini hinzufügen. Die Ini Sections werden
dann in der ListBox aufgelistet und in einem label eine Zufalls
Frage angezeigt. Ich glaub das wars.