Thema: Delphi Random und if Abfrage

Einzelnen Beitrag anzeigen

citybreaker
(Gast)

n/a Beiträge
 
#1

Random und if Abfrage

  Alt 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.

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?
  Mit Zitat antworten Zitat