Delphi-PRAXiS
Seite 2 von 3     12 3      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   if not abfragen (https://www.delphipraxis.net/155188-if-not-abfragen.html)

DeddyH 12. Okt 2010 12:26

AW: if not abfragen
 
Das AND greift, wenn beide Bedingungen zutreffen, OR greift schon, wenn mindestens eine Bedingung zutrifft.

xxsasch4xx 12. Okt 2010 12:30

AW: if not abfragen
 
wäre dann in der digitaltechnik eine nicht oder verküpfung oder?

DeddyH 12. Okt 2010 12:35

AW: if not abfragen
 
Was meinst Du jetzt? Nicht oder (NOR) heißt ja, das Ergebnis einer Oder-Verknüpfung zu negieren.

mkinzler 12. Okt 2010 12:37

AW: if not abfragen
 
Hier wird aber eine AND Verknüpfung negiert

Sir Rufo 12. Okt 2010 12:53

AW: if not abfragen
 
Das hier
Zitat:

Zitat von DeddyH (Beitrag 1055299)
Delphi-Quellcode:
  begin
  if not((edit3.text='1') and (edit2.text='1'))
  then
  showmessage('vorbei')
  end;

ist das Gleiche wie das hier (alle Klammern beachten)
Zitat:

Zitat von youuu (Beitrag 1055302)
Delphi-Quellcode:
begin
  if not(edit3.text='1') OR not (edit2.text='1')
  then
  showmessage('das game ist vorbei')
  end;

denn
Code:
not A or not B = not ( A and B )
not ( A and B ) <> not A and B
Wer es nicht glaubt macht sich eine Wertetabelle ;)

DeddyH 12. Okt 2010 13:06

AW: if not abfragen
 
IIRC (ist lange her) ändert eine Zusammenfassung/Auflösung in Verbindung mit NOT das AND immer in OR und umgekehrt.
Code:
not (a and b)
<=> not a or not b

not (a or b)
<=> not a and not b

Aphton 12. Okt 2010 13:25

AW: if not abfragen
 
Des Problem's Lösung:
Delphi-Quellcode:
var
  e2, e3: Integer;
begin
  e2 := StrToInt( Edit2.Text ) mod 2;
  e3 := StrToInt( Edit3.Text ) mod 2;
  if Boolean( e2 xor e3 ) or ( e2 and e3 = 0 ) then
    ShowMessage( 'Vorbei' );
end;

mkinzler 12. Okt 2010 13:27

AW: if not abfragen
 
Diese Lösung ist immer noch zu einfach :stupid:

Aphton 12. Okt 2010 13:32

AW: if not abfragen
 
Man könnte ja - wenn man Lust darauf hat - die Bedingungsabfrage in die GPU verlagern, aber ... btw. das hätten wir übrigens schonmal und zwar als ein gewisses Forummitglied wissen wollte, wie man Zahlen negiert...
*Nostalgie

MfG

DeddyH 12. Okt 2010 13:33

AW: if not abfragen
 
Außerdem würde wenn ich das richtig sehe jede Kombination ungerader Zahlen als gültig angesehen.


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:09 Uhr.
Seite 2 von 3     12 3      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz