Überprüfung ob von Listbox1 das Item=dem anderen Item ist

[delphineuling88]

ch will nun in dem bereich (unten) überprüfen ob das zufällig ausgewählte Item gleich dem anderen zufällig ausgewähltem item ist.
Jeweils aus listbox1
Wie bau ich das da ein weiß gerade nicht wie ich anfangen soll?

Delphi-Quellcode:

If Checkbox2.Checked
    Then begin
     if meh >= 80
      then begin
       If RadioButton1.Checked
        Then begin
         If (mmh <= 100) and (mmh >25)
          Then begin
              label17.Caption:='Wer muss Trinken? ' + [color=#ff005f]listbox1.Items[random(listbox1.items.count)]+' und '+listbox1.Items[random(listbox1.items.count)]+[/color]' müssen ' + listbox4.Items[random(listbox4.Items.Count)]+ ' ' + listbox2.items[random(listbox2.Items.Count)]+ ' trinken !'
            end
          else begin
               label17.Caption:='Wer muss Trinken? ' + [color=#ff007f]listbox1.Items[random(listbox1.items.count)]+' und '+listbox1.Items[random(listbox1.items.count)]+[/color]' müssen einen Kurzen ' + listbox3.items[random(listbox3.Items.Count)]+ ' trinken !';
            end;
            end;