Delphi-PRAXiS
Seite 2 von 4     12 34      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Taschenrechner ein Editfeld (https://www.delphipraxis.net/171899-taschenrechner-ein-editfeld.html)

Beat 1. Dez 2012 10:28

AW: Taschenrechner ein Editfeld
 
Okaaay .. ! Nun ich wollte mit dem if - Befehl diese Zweite Variable eingentlich umgehen, da ich dachte ich könnte mit der Booleansche True und False das irgendwie austricksen. Mein Problem ist und war, wie ich diesen Button Befehl als Variable einspeichern kann. Brauch ich dazu dann nicht auch ein IF Befehl oder zumindestens eine neue procedure , welche sich in dem Bestimmten Button aufruft . Sorry ich glaub ich steh gerade ein bisschen auf der leitung. :D Mir liegt es auf der Zunge was du meinst aber ich kommme nicht drauf :D

Sir Rufo 1. Dez 2012 10:49

AW: Taschenrechner ein Editfeld
 
Nun du musst wissen welche Rechenoperation (Button) gewünscht ist, darum musst du diese Information auch speichern. Wo ist dabei egal, aber in einer dafür vorgesehenen Variable sehr geschickt und erheblich einfacher ;)

Auch das if funktioniert nur wenn ich was vergleichen kann. Wenn ich nichts weiß, kann ich nichts vergleichen.

Du kommst also nicht daran vorbei ;)

Beat 1. Dez 2012 11:01

AW: Taschenrechner ein Editfeld
 
Zitat:

Zitat von Sir Rufo (Beitrag 1193851)
Nun du musst wissen welche Rechenoperation (Button) gewünscht ist, darum musst du diese Information auch speichern. Wo ist dabei egal, aber in einer dafür vorgesehenen Variable sehr geschickt und erheblich einfacher ;)

Auch das if funktioniert nur wenn ich was vergleichen kann. Wenn ich nichts weiß, kann ich nichts vergleichen.

Du kommst also nicht daran vorbei ;)

Hmm ja das habe ch verstanden. Meine Frage war nun, wie ich diesen Befehl speichern könnte ? :S

Sir Rufo 1. Dez 2012 11:40

AW: Taschenrechner ein Editfeld
 
Ganz stumpf in einer Integer Variable

Code:
1 bedeutet plus
2 bedeutet minus
usw.
Die Bedeutung legst du für dich selber fest und musst in deinem Programm entsprechend darauf reagieren.

Beat 1. Dez 2012 16:15

AW: Taschenrechner ein Editfeld
 
Zitat:

Zitat von Sir Rufo (Beitrag 1193857)
Ganz stumpf in einer Integer Variable

Code:
1 bedeutet plus
2 bedeutet minus
usw.
Die Bedeutung legst du für dich selber fest und musst in deinem Programm entsprechend darauf reagieren.

Ahh. Nun diese Integr - Variablen haben wir nun leider noch nicht kennengelernt, könntest du mir da ein Beispiel geben wie man diese anwendet? Wenn es zuviel Arbeit ist, kann ich am Donnerstag auch meinen Lehrer fragen ;)

DeddyH 1. Dez 2012 16:28

AW: Taschenrechner ein Editfeld
 
Du wirst doch wissen, was eine Variable und was ein Integer ist.
Delphi-Quellcode:
var
  Operation: integer;
...
case Operation of
  1: Addieren(Zahl1, Zahl2);
  2: Subtrahieren(Zahl1, Zahl2);
  3: Multiplizieren(Zahl1, Zahl2);
  4: Dividieren(Zahl1, Zahl2);
  else
    //ungültige Operation, entsprechend reagieren
end;
Etwas lesbarer wird das mit einem eigenen Aufzählungstypen:
Delphi-Quellcode:
type
  TOperation = (opPlus, opMinus, opMal, opDurch);

var
  Operation: TOperation;
...
case Operation of
  opPlus: Addieren(Zahl1, Zahl2);
//usw. usf.

Sir Rufo 1. Dez 2012 16:31

AW: Taschenrechner ein Editfeld
 
@DeddyH

Ich hatte auch pauschal vorausgesetzt, dass Integer bekannt ist, aber Aufzählungstypen eher nicht.

Allerdings wäre der Aufzählungstyp auch meine präferierte Wahl.

DeddyH 1. Dez 2012 16:33

AW: Taschenrechner ein Editfeld
 
Deshalb habe ich ja vorsichtshalber beide Möglichkeiten kurz skizziert. Es ist ja immerhin möglich, dass Enumerationen bereits behandelt wurden, man mit dem Bezeichner aber nichts anfangen kann (geht mir ja manchmal auch so).

Bjoerk 1. Dez 2012 16:38

AW: Taschenrechner ein Editfeld
 
Delphi-Quellcode:
var
  Operation: TOperation;
:)

DeddyH 1. Dez 2012 16:46

AW: Taschenrechner ein Editfeld
 
Thx, korrigiert :oops:


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:19 Uhr.
Seite 2 von 4     12 34      

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