Delphi Random und if Abfrage

Thema durchsuchen

Ansicht

Themen-Optionen

Random und if Abfrage

Ein Thema von citybreaker · begonnen am 4. Jan 2004 · letzter Beitrag vom 5. Jan 2004

Vorheriger Beitrag

Nächster Beitrag

citybreaker

(Gast)

n/a Beiträge

Random und if Abfrage

4. Jan 2004, 19:05

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.

markieren

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?