![]() |
Projektaufgabe
Delphi Version: XE7
Hi Leute, ich bin derzeitig Schüler und habe eine Projektaufgabe bekommmen, in der ich Zinsrechnung und all sowas zusammenbringen muss.Wir haben diese Delphi-Version erst seit kurzem und ich weiß noch nicht wie ich richtig damit umgehen soll und brauch eure hilfe. Ein weiteres Problem meinerseits ist, dass wir Zinsrechnung irgendwann vor 3 jahren hatten und ich keine ahnung mehr habe wie das ging^^ Meine Projektaufgabe lautet wie folgt: 1.Entwickeln Sie eine Tabelle für die Entwicklung einer festgeldanlage nach folgendem Muster (in form einer tabelle...egal ob stringdrid oder memo etc) Jahr | Guthaben | Zinsen Anfangsjahr Anfangsguthaben(in zahlenwerten) ... ... ... Enjahr Endguthaben ... Die Laufzeit und der Zinssatz sollen variabel eingebbar sein. Erstellen Sie zusätzlich zwei Diagramme, die die zeitliche Entwicklung des Guthabens und der zinsen darstellen! 2.Aufgabe ergänze ich dann, da diese in einer anderen unit ausgefüht wird. |
AW: Projektaufgabe
Zitat:
|
AW: Projektaufgabe
Zitat:
Zitat:
![]() Wenn du eine konkrete Frage zur Delphiprogrammierung hast, wird man die hier gerne beantworten. Deine Anfrage ist viel zu allgemein, die könnte man nur beantworten, wenn man dir das gesamte Projekt schreibt, und dazu wird sich wohl kaum einer bereiterklären :stupid: |
AW: Projektaufgabe
tut mir leid^^ hab ganz vergessen mein Problem darzulegen... :oops:
ich kann leider gerade keine quelltexte angeben da ich zu hause bin und vergessen habe diese mit nach hause zu nehmen.:x und zwar: ich gebe die Werte Anlage,Zinsen und die gegebene Laufzeit,wie lange das Geld verzinst werden soll über die Edit felder ein. Dann nutze ich die Allgemeine Zinsrechnungsformel usw. so und nun möchte ich die Ergebnisse in dem memos(als tabellenspalte) geordnet wiedergeben sprich z.B: Anlage:2000€ Zins:2% Laufzeit:9 jahre also wie bekomme ich das dann in diese Form, wenn ich Memos benutze.oder wäre es günstiger Stringgrid zu benutzen? Jahr/Guthaben/Zinsen 1 /2040 /40 2 /2080,8 /40,8 3 /2122,41 /41,61 4 /2164,85 /42,45 usw ich weiß auch nicht, ich steh einfach gerade voll auf der leitung, bei einer so simplen sache ^^ |
AW: Projektaufgabe
Hast Du denn schon die Berechnung? Vorher würde ich mir über die Oberfläche keinen Kopf machen.
|
AW: Projektaufgabe
Auch wenn ein TMemo wirklich keine gute Tabelle ist kann man das sicher darstellen.
Mit
Delphi-Quellcode:
fügst Du Zeilen hinzu.
meineMemo.Lines.add(WertSpalte1 | WertSpalte2 | WertSpalte3);
|
AW: Projektaufgabe
Zitat:
Also, mach eine saubere Eingabe, dann die Berechnung der Monatswerte über die jeweilige Laufzeit. Dann speicherst du die Daten in einer Datei und dann kannst du die Daten in einer Form deiner Wahl anzeigen/ausgeben. Als Tabelle, als Grafik, oder was auch immer. |
AW: Projektaufgabe
Zitat:
Am besten wäre, wenn du erstmal den Code, den du bis jetzt erstellt hast, zeigst. Dann kann man dir auch sagen, was du eventuell besser machen könntest. Delphi-Basiskenntnisse solltst du allerdings schon mitbringen, weil es ihm Rahmen dieses Forums nicht wirklich möglich ist, dir einen Grundlagen-Kurs zu vermitteln. Solltest du der Ansicht sein, nicht über ausreichende Basis-Kenntnisse zu verfügen, sei dir der ![]() |
AW: Projektaufgabe
Also was alle hier meinen ist, dass du das ungefähr so aufbauen solltest:
Delphi-Quellcode:
type
TJahreswert = record Jahr : Integer; Guthaben : Currency; Zinsen : Currency; end; TJahreswerte = array of TJahreswert; function BerechneJahreswerte( Anlage : Currency; Zins : Double; Laufzeit : Integer ) : TJahreswerte; var LIdx: Integer; begin SetLength( Result, Laufzeit ); for LIdx := Low( Result ) to High( Result ) do begin // hier muss jetzt die Berechnung für die einzelnen Jahre erfolgen ... end; end; procedure TForm1.BerechnenButtonClick( Sender : TObject ); var LAnlage : Currency; LZins : Double; LLaufzeit : Integer; LJahreswerte : TJahreswerte; LIdx : Integer; begin // Eingabe LAnlage := StrToFloat( AnlageEdit.Text ); LZins := StrToFloat( ZinsEdit.Text ); LLaufzeit := StrToInt( Laufzeit.Edit.Text ); // Verarbeitung LJahreswerte := BerechneJahreswerte( LAnlage, LZins, LLaufzeit ); // Ausgabe for LIdx := Low( LJahreswerte ) to High( LJahreswert ) do begin // Ja, wohin auch immer hinschreiben // LJahreswerte[LIdx].Jahr end; end; |
AW: Projektaufgabe
@Sir Rufo
Du hast EVA nicht vergessen:thumb: Gruß K-H |
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:46 Uhr. |
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 by Thomas Breitkreuz