AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Bedingungen mit Boolean und Listbox ausgeben

Ein Thema von MrSGcustom · begonnen am 4. Mär 2014 · letzter Beitrag vom 5. Mär 2014
Antwort Antwort
Seite 3 von 3     123   
Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#21

AW: Bedingungen mit Boolean und Listbox ausgeben

  Alt 5. Mär 2014, 08:48
*Öhm*...
Zitat:
Delphi-Quellcode:
  A := false;
  B := false;
  C := false;
Überflüssig, sind im Anschluss die Schleifenvariablen.
Zitat:
Delphi-Quellcode:
       BB :=
          {Bedingung 1} (A AND C) OR (NOT A AND NOT C) AND
          {Bedingung 2} (B OR C) OR (B AND C) AND
          {Bedingung 3} (A OR B) OR (NOT A AND NOT B);
entspricht
Delphi-Quellcode:
       BB :=
          {Bedingung 1} (A AND C) OR ((NOT A AND NOT C) AND
          {Bedingung 2} (B OR C)) OR ((B AND C) AND
          {Bedingung 3} (A OR B)) OR (NOT A AND NOT B);
es müsste aber wahrscheinlich heißen
Delphi-Quellcode:
       BB :=
          {Bedingung 1} ((A AND C) OR (NOT A AND NOT C)) AND
          {Bedingung 2} ((B OR C) OR (B AND C)) AND
          {Bedingung 3} ((A OR B) OR (NOT A AND NOT B));
Da deklariere ich mir lieber 3 Variablen, das ist übersichtlicher
Weiß gar nicht was du hast, steht doch alles so da

Insgesamt würde ich das schon vom Ansatz her anders umsetzen
  • Berechnung und Darstellung trennen
  • Weder das Eine noch das Andere im OnClick-Handler implementieren, sondern eine Methode aufrufen, die das erledigt
  • Iteration über Boolean-Werte mit for BoolValue := Low(Boolean) to High(Boolean) do (nennt mich paranoid, aber mir doch egal in welcher Reihenfolge die definiert sind, Hauptsache ich kriege sie alle und ich muss mir keinen Kopf machen)
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.617 Beiträge
 
Delphi 12 Athens
 
#22

AW: Bedingungen mit Boolean und Listbox ausgeben

  Alt 5. Mär 2014, 08:51
Ich würde das normalerweise ja auch "schöner" machen, aber da es sich um eine Schulaufgabe handelt, wollte ich keine didaktische Katastrophe abliefern
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#23

AW: Bedingungen mit Boolean und Listbox ausgeben

  Alt 5. Mär 2014, 09:02
Ich würde das normalerweise ja auch "schöner" machen, aber da es sich um eine Schulaufgabe handelt, wollte ich keine didaktische Katastrophe abliefern


Der Kern der Aufgabe ist wohl auch nicht wartungsfreundlichen Code zu produzieren
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.014 Beiträge
 
Delphi 12 Athens
 
#24

AW: Bedingungen mit Boolean und Listbox ausgeben

  Alt 5. Mär 2014, 09:22
Genau, den Code guckt sich ja später eh nie wieder jemand an.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 3 von 3     123   

 

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:57 Uhr.
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