gib doch mal bitte die Typdefinition von 'wunschdaten' an.
Die AND Anweisungen bei dir verknüpfen höchstwahrscheinlich 2 Binärzahlen und testen das Resultat auf <>0, ich nehme an da kommt murks raus.
Delphi-Quellcode:
if wunschdaten[1].geschlecht = wunschdaten[2].geschlecht then
punktzahl1:=punktzahl1+0
else
if wunschdaten[1].geschlecht <> wunschdaten[2].geschlecht then
punktzahl1:=punktzahl1+3;
die Logik ist hier nicht ersichtlich... die erste if-Anweisung tut nichts. Die zweite if-Anweisung wird nur dann ausgeführt wenn sie sowieso stimmt...???
oder einfacher: dieser Text ersetzt den obigen vollständig:
Delphi-Quellcode:
if wunschdaten[1].geschlecht <> wunschdaten[2].geschlecht then
punktzahl1:=punktzahl1+3;
mfg
Matthias