vor

Lineare Algorithmen

weiter

Berechnung geometrischer Körper

Es ist ein anwenderfreundliches Delphiprogramm zu erstellen, welches für ausgewählte geometrische Körper (Quader, Pyramiden, Kegel, Zylinder) die jeweiligen Seitenlängen einliest und auf Knopfdruck die Werte für Oberfläche und Volumen und gegebenenfalls weitere Werte berechnet und ausgibt.

Es soll möglich sein, auf einem einzigen Formular über Registerseiten die jeweils zu berechnenden Körper auszuwählen.

Zur Verbesserung der Übersichtlichkeit ist der betreffende geometrische Körper als Abbildung zu zeigen und seine Abmessungen zu beschriften.
Komponente Eigenschaft Wert Bemerkungen
Form1 Caption ‘Geometrische Körper’ Überschrift in der Kopfleiste des Programmfensters
TabbedNotebook1
(Karteikasten)
Align ‘alClient’ Komponente füllt das ganze Formular aus
und wird mit diesem vergrößert bzw. verkleinert
Pages ‘Quader’
‘Pyramide’
‘Kegel’
‘Zylinder’
Die Benennung der einzelnen
Registerseiten wird hier festgelegt (TStrings).
Jede zu TStrings hinzugefügte Benennung eröffnet
automatisch eine neue Seite im Register.
TabsPerRow 4 Name der gerade zu programmierenden Seite
(Auswahl aus Pages).
Diese Seite wird beim späteren
Programmstart zur aktuellen Seite.
Image1 Picture quader.bmp Einfügen einer Grafik in ein Formular
Button1 Caption 'Berechnen' Aufschrift auf dem Schalter
OnClick 'Button1Click' Prozedur, die beim Klicken ausgeführt werden soll:
einlesen der Zahlen, umwandeln in Dezimalzahlen, rechnen, umwandeln in Strings und Ausgeben der Ergebnisse
Edit1 Text '0' Anfangswert für a
Edit2 Text '0' Anfangswert für b
Edit3 Text '0' Anfangswert für c
Edit4 Text '0' Wert für V
Edit5 Text '0' Wert für Ao
Edit6 Text '0' Wert für e
Label1 Caption 'Seite a' Bezeichnung für a
Label2 Caption 'Seite b' Bezeichnung für b
Label3 Caption 'Seite c' Bezeichnung für c
Label4 Caption 'Volumen' Bezeichnung für V
Label5 Caption 'Oberfläche' Bezeichnung für Ao
Label6 Caption 'Raumdiagonale' Bezeichnung für e
Label7 Caption 'Eingaben' Bezeichnung links
Label8 Caption 'Skizze' Bezeichnung mitte
Label9 Caption 'Ergebnisse' Bezeichnung rechts
Lösung
vor

Inhaltsverzeichnis

weiter