Delphi-PRAXiS
Seite 1 von 4  1 23     Letzte »    

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Tilgung (https://www.delphipraxis.net/86465-tilgung.html)

flac 14. Feb 2007 14:35


Tilgung
 
Hey Leute! Ich brauche driiiingend eure HILFE..
Ich muss für Info einen Tilgungsprogramm bei Delphi erstellen,
formal hab ich es schon aber mein Problem liegt beim Programmieren :-D , und
zwar müssen wir mit StringGrid arbeiten; dies enthält das Jahr;die Tilgung;den Zinssatz und
den Kontostand.. + 3 Editierfelder für Kredit, Zinssatz und die monatliche
Tilgungsrate + 1 Button "Rechnen"...
Ich danke jetzt schon allen, die mir hierbei behilflich sein werden...@ flac

Nikolas 14. Feb 2007 15:18

Re: Tilgung
 
Und wo liegt dein Problem? Wie weit kommst du? Kannst du die Werte aus den edits auslesen? Kennst du die Gleichungen um alle gesuchten Werte zu berechnen?

flac 14. Feb 2007 19:49

Re: Tilgung
 
Hallo! Ich weiß gar nicht wie ich vorgehen muss...
auf jeden Fall muss im StringGrid etwas erscheinen was ich in die Edit felder eingebe...
und wenn ich auf rechnen drücke, muss der Kontostand am Ende 0€ betragen....Ich hoffe ich konnte das
jetzt so einigermaßen erklären.. :? :?

DP-Maintenance 14. Feb 2007 21:10

DP-Maintenance
 
Dieses Thema wurde von "Phoenix" von "Programmieren allgemein" nach "Sonstige Fragen zu Delphi" verschoben.
Hier gehts um Delphi

dominikkv 14. Feb 2007 21:16

Re: Tilgung
 
hmm...sollen wir für dich die hausaufgaben machen?
wie wärs wenn du uns mal konkret schilderst was dein problem ist... und vllt mal postest was du schon hast

flac 14. Feb 2007 22:45

Re: Tilgung
 
das sind keine HA... wir machen das zurzeit im Unterricht und ich verstehe es nicht
normalerweise fragt man den Lehrer aber das interessiert ihn gar nicht...
Meinen Problem habe ich ja schon geschildert; was Ich bisher habe ist nur Formales und
nun muss ich das ganze zum laufen bringen.. ABER WIE???

dominikkv 15. Feb 2007 09:55

Re: Tilgung
 
also...ich versteh nicht so ganz dein problem^^
hast du schon dein button und stringgrid und edits auf der Form?
dann kannst du dir überlegen..."wann soll er was machen"?
richtig, wenn ich auf den button klicke...
also erstellst du eine onKlick-procedure für den button.
dort kannst du zuerst prüfen ob der user richtige eingaben gemacht hat (also nur zahlen in den edits stehen), dann kannst du diese in variablen speichern und damit rechnen.
nach jedem jahr einfach den aktuellen stand in das stringgrid schreiben:
StringGrid1.Cells[1,1] := '545,50 €';

flac 15. Feb 2007 17:00

Re: Tilgung
 
Delphi-Quellcode:
unit Tilgung;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Grids, StdCtrls, Buttons;

type
  TForm1 = class(TForm)
    StringGrid: TStringGrid;
    Off_BitBtn1: TBitBtn;
    Kredit_Edit: TEdit;
    Zinssatz_Edit: TEdit;
    Tilgungsrate_Edit: TEdit;
    Kredit_Label1: TLabel;
    Zinssatz_Label1: TLabel;
    Tilgungsrate_Label2: TLabel;
    Rechnen_BitBtn1: TBitBtn;
    procedure FormCreate(Sender: TObject);
    procedure Off_BitBtn1Click(Sender: TObject);
    procedure Rechnen_BitBtn1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;
  Rate, Kredit, Zinsen: Real;

implementation

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
begin
   StringGrid.Cells[0,0]:= 'Jahr';
   StringGrid.Cells[1,0]:= 'Tilgung';
   StringGrid.Cells[2,0]:= 'Zinsen';
   StringGrid.Cells[3,0]:= 'Kontostand';
end;


procedure TForm1.Off_BitBtn1Click(Sender: TObject);
begin
  close
end;


procedure TForm1.Rechnen_BitBtn1Click(Sender: TObject);
begin
  Kredit:= StrToFloat (Kredit_Edit.Text);
  Zinsen:= StrToFloat (Zinssatz_Edit.Text);
  Rate:= StrToFloat (Tilgungsrate_Edit.Text);
  //???

end;

end.
SO SIEHT ES BISHER AUS UND NUN MÜSSEN AN STELLE DER FRAGEZEICHEN DIE ANWEISUNGEN
UM DAS ALLES ZUM LAUFEN ZU BRINGEN... ICH WEIß NICHT WIE ICH DAS NOCH ERKLÄREN SOLL
ICH WÄRE EUCH WIRKLICH SEHR DANKBAR WENN ICH WENIGSTENS EIN SCHRITT WEITER KOMME :wink:

[edit=SirThornberry]Delphi-Tags gesetzt - nächstes mal bitte unnötige Großschreibung weg lassen außer es ist beabsichtigt das wir das als anschreien auffassen sollen - Mfg, SirThornberry[/edit]

Jürgen Thomas 15. Feb 2007 18:03

Re: Tilgung
 
Hallo flac,

das ist doch schon einiges! Jetzt können wir auch erkennen, wo Deine Probleme liegen.

Zunächst einmal: Markiere Deinen Code und drücke oben den Button "Delphi-Code"; dann ist es besser lesbar. Das kannst Du auch noch nachträglich machen!

Dein Problem besteht also offensichtlich in der eigentlichen Rechnung. Dann schlage ich vor, dass Du als nächstes die Formeln als "Pseudo-Code" formulierst. Ganz am Anfang hattest Du geschrieben, dass Du das "formal" schon hättest; also solltest Du das können. Anschließend müssen daraus Pascal-Anweisungen werden. Das Ergebnis dieser Berechnungen wird dann mit Delphi-Referenz durchsuchenFormatFloat in die StringGrid-Zellen geschrieben.

Viel Erfolg! Jürgen

flac 15. Feb 2007 21:37

Re: Tilgung
 
Hallo Jürgen!
Du hast es zwar gut beschrieben, aber ich habe Info seit einem halben Jahr
und Pseudo- Code und Pascal- Anweisungen höre Ich zum ersten Mal :(
Wir sollen mit Zählschleifen arbeiten wie if, while und else usw.
Trotzdem danke für deine Hilfe :coder2:


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:40 Uhr.
Seite 1 von 4  1 23     Letzte »    

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