verschachtelte if funktion

[Satty67]

Als ich versuchte, der Beschreibung zu folgen, hat mein Gehirn ein paar Extra-Windungen bekommen. Ich hoffe das macht mich auch klüger.

Willst Du prüfen, ob ein Tick-Tack-Toe Sieg erfolgt ist?

Ich kann dem ganzen Bedingungs-Wirrwarr anhand der Beschreibung noch nicht ganz folgen, versuche es aber gleich nochmal.

PS: ...und wieso manchmal Edit.hint statt Edit.text?

Delphi-Quellcode:

if form1.edit1.hint='0' then

  if (form1.edit4.text='0') and (form1.edit7.text='0') or
     (form1.edit4.text='0') and (form1.edit7.text='1') or
     (form1.edit4.text='1') and (form1.edit7.text='0') or
     (form1.edit2.text='0') and (form1.edit3.text='0') or
     (form1.edit2.text='0') and (form1.edit3.text='1') or
     (form1.edit2.text='1') and (form1.edit3.text='0') then

        if form1.edit2.hint='0' then

          if (form1.edit5.text='0') and (form1.edit8.text='0') or
             (form1.edit5.text='0') and (form1.edit8.text='1') or
             (form1.edit5.text='1') and (form1.edit8.text='0') then

               if form1.edit3.text='0' then
                 
                 if (form1.edit2.text='0') and (form1.edit1.text='0') or
                    (form1.edit2.text='1') and (form1.edit1.text='0') or
                    (form1.edit2.text='0') and (form1.edit1.text='1') or
                    (form1.edit6.text='0') and (form1.edit9.text='0') or
                    (form1.edit6.text='1') and (form1.edit9.text='0') or
                    (form1.edit6.text='0') and (form1.edit9.text='1') then
                      
                      showmessage('Die Bedingungen wurden erfüllt')
else

  showmessage('Die Bedingungen wurden erfüllt');

.
Mit Einrückung sieht man, das hier eine ganze Menge erfüllt sein muss, wenn Edit1.hint <> '0'. Kann es sein, das Du garnicht alle Bedingungen voneinander abhängig haben wolltest?