verschachtelte if funktion

[jfheins]

Du hast keine Fehlerbeschreibung gepostet.

Aber vielleicht hilft schon eine passende Einrückung:

Delphi-Quellcode:

if form1.edit1.hint='0' then
begin
   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
   begin
      if form1.edit2.hint='0' then
      begin
         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
         begin
            if form1.edit3.text='0' then
            begin
               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
               begin
                  showmessage('Die Bedingungen wurden erfüllt');
               end
               else
               begin
                  showmessage('Die Bedingungen wurden erfüllt');
               end;
            end;
         end;
      end;
   end;
end;

P.S.: Du fragst zweimal einen Hint ab. Ist das gewollt?