Bruchrechner für zwei Brüche

[guitar1]

Hi,

dies ist das erste Programm, dass ich bisher geschrieben habe.
Mit dem Bruchrechner kann man:

- Brüche mit den Grundrechenarten berechnen
- als Extras kann man:
- Brüche quadrieren
- Brüche kürzen
- die Oberfläche des Rechners zwischen Deutsch, Englisch und Spanisch umstellen.

Ebenso bietet der Rechner die Funktion stay on top, so kann man einstellen das der Rechner ständig im Vordergrund ist.
Für alle, die auch Zufallszahlen oder Zufallszahlen in einem bestimmten Zahlengebiet benötigen, beherrbergt der Rechner ein kleines Tool mit dem man diese erstellen kann (Rechtsklick auf den jeweiligen Nenner oder Zähler).

:coder2: Wenn noch jemand Bugs findet oder Anregungen zur Verbesserung hat - nur her mit den Ideen.

schonmal danke im Voraus,
A. Horn

PS: ich habe auch mal die .pas-Dateien dazu gemacht, da lässt sich sicherlich noch einiges verbessern^^.

[Luckie]

Warum läßt du das Eingeben von Buchstaben zu, wenn es zu einem Fehler führt? Was ist kann schlimmes passieren, wenn man dein Programm beendet, dass eine Abfrage kommt, wenn man es schließt? Warum muss ich die Zusätzlichen Funktionene erst aktivieren? Warum ist die Aboutbox nicht modal? Warum erscheint das Programmfenster nicht beim Straten in der Mitte?

[guitar1]

@ Luckie

1.Frage : ich würde es ja ganz gern nicht zulassen nur leider wird dann auch das "-"-Zeichen nicht mehr anerkannt.
2.Frage : man könnte zB. ein ergebnis haben, das man nicht verlieren will??
3.Frage : daran könnte man etwas ändern, allerdings könnte es dann zu verwirrung führen, da das quadrieren ja nur mit dem ersten Bruch geht.
4.Frage : was ist modal???^^
5.Frage : hab ich schon korrigiert (hab ich vergessen :oops: ), danke für die erinnerung!

mfg A. Horn

[Luckie]

Zitat:

Zitat von guitar1

1.Frage : ich würde es ja ganz gern nicht zulassen nur leider wird dann auch das "-"-Zeichen nicht mehr anerkannt.

Das geht definitiv.

Zitat:

2.Frage : man könnte zB. ein ergebnis haben, das man nicht verlieren will??

Was hindert nich daran die Aufgabe noch mal einzugeben?

Zitat:

3.Frage : daran könnte man etwas ändern, allerdings könnte es dann zu verwirrung führen, da das quadrieren ja nur mit dem ersten Bruch geht.

Aktivier die Edist für die zweite zahl, dann sieht man es.

[juergen]

Hallo guitar1,
zu 1.)
im OnKeyPress Event könntest du folgendes hinterlegen:

Delphi-Quellcode:

//nur Backspace, Enter, (-) , (,)  und alle Zahlen zulassen
    if not (key in [#8, #13, #44, #45, #48..#57]) then
      key := #0;

// das Minus darf nur am Anfang benutzt werden
    if (Edit1.selstart <> 0) and( key=#45) then 
      key:=#0;

zu 4.)
Auszug aus der Hilfe. :wink:

Zitat:

Formulare können modal und nichtmodal sein. Modale Formulare müssen geschlossen werden, bevor die Arbeit in anderen Fenstern fortgesetzt werden kann. Ein Beispiel für ein modales Formular wäre ein Dialogfeld, in dem bestimmte Eingaben vorgenommen werden müssen. Nichtmodale Formulare bleiben auf dem Bildschirm, bis sie geschlossen, minimiert oder von anderen Fenstern verdeckt werden. Der Benutzer kann jederzeit in ein anderes Fenster wechseln.

[semo]

@luckie: du nimmst den regelrecht in der luft auseinander :)
nimm mal bitte ein wenig rücksicht auf seine erst 6 beiträge
--> ergo noch ein wenig unerfahren bzw. gib ihm wenn dann genauere angaben wie was zu lösen wäre

[Cöster]

Zitat:

Zitat von juergen

Hallo guitar1,
zu 1.)
im OnKey.....

...neee, lass das, sonst wird copy and paste nämlich nicht verhindert. Außerdem hättest du dann nicht die schöne Abfrage, ob 2mal '-' vorkommt usw. Ich nehme an, du machst es über's OnChange.

Was du dann tust:
Du bringst eine Fehlermeldung und löscht das letzte Zeichen des Strings.

Was ich besser fände:
Du bringst keine Fehlermeldung. Außerdem löschst du nicht das letzte Zeichen, sondern das, was zuletzt eingegeben wurde. Wenn man Copy and Paste benutzt können das auch mehrere Zeichen sein. Du solltest den aktuellen String, der im Edit steht als Flag speichern. Im OnChange steht dann sowas wie:

Delphi-Quellcode:

if EingabeIstKorrekt then
  Flag := Edit.Text
else
  Edit.Text := Flag;

Sonst gefällt mir dein Programm recht gut. Auch äußerlich ist es recht übersichtlich und durch die vielen Shortcuts leicht zu bedienen :thumb:

Das mit "wirklich schließen" könntest du aber wirklich weglassen, stört einfach nur.

[freak007]

moiiin hat jemand das komplette Programm??? Würd gerne noch paar Funktionen ergänzen :angel: :cheers: :firejump:

[rawsoul]

Woah, wo hastn du den rausgekramt? :O

Es ist doch das komplette Programm, oder irre ich mich? Ich glaube kaum, dass für einen Bruchrechner eine Shareware geschrieben wird...

[Zipp]

Zitat:

Zitat von freak007

moiiin hat jemand das komplette Programm??? Würd gerne noch paar Funktionen ergänzen :angel: :cheers: :firejump:

Wenn ich das richtig sehe, sind doch die Units da.
Was fehlt(en könnte) ist die Oberfäche oder??