Einzelnen Beitrag anzeigen

EdAdvokat

Registriert seit: 1. Mai 2016
Ort: Berlin
419 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#41

AW: liege ich richtig mit dem OOP-Versuch

  Alt 2. Jan 2017, 09:20
Hallo, eine Frage zum Umgang mit Attributen(Fields). Ich kann zwar wie nachfolgend zu sehen ist, eine
einfache Berechnung der Zinsen vornehmen, jedoch wenn ich den Zinseszins berechnen möchte unter Einsatz
von power geht das nicht, da die Fields nicht mit Methoden umgehen können(hoffentlich habe ich das so
richtig verstanden).
Was kann ich also machen, um beispielsweise mit Power zu rechnen oder etwa sqr usw. einzusetzen?
Kann ich eine Zuweisung der Fields vornehmen, um dann damit zu rechnen?

Delphi-Quellcode:
 type
  TKredit = class
  strict private
    FKredit :double;
    FZinssatz:double;
    //FZinsen: double;
    FJahre : integer;
    procedure setKredit(Kredit: double);
    procedure setZinssatz(Zinssatz: double);
    procedure setJahre(J: integer);
    function GetZinsen: double;
  public
    constructor create;
    destructor Destroy; override;
    procedure init;
   // procedure berechneZinsen;
    property Kredit: double read FKredit write setKredit;
    property Zinssatz: double read FZinssatz write setZinssatz;
    property Zinsen: double read GetZinsen;
    property Jahre: integer read FJahre write setJahre;
  end;

function TKredit.GetZinsen;
begin
  result:=FKredit * FZinssatz/100*FJahre;
end;
{procedure TKredit.berechneZinsen;
begin
  FZinsen:= FKredit *Power((1+ FZinssatz/100),Jahre);
end;}
Norbert
  Mit Zitat antworten Zitat