Hallo miteinander,
habe eine raltiv simple Frage. Folgender Code:
Delphi-Quellcode:
type
TBruch = class
constructor Create(iZaehler, iNenner: Integer); overload;
strict private
iZaehler,
iNenner: Integer;
function ggT(iZahl1, iZahl2: Integer): Integer;
procedure Kuerzen();
public
function getZaehler(): Integer;
function getNenner(): Integer;
procedure setValue(iZaehlerSet, iNennerSet: Integer);
procedure Add(TB_addBruch: TBruch);
procedure Subtract(TB_subtBruch: TBruch);
procedure Multiplicate(TB_multBruch: TBruch);
procedure Divide(TB_divBruch: TBruch);
end;
implementation
constructor TBruch.Create(iZaehler, iNenner: Integer);
begin
inherited Create;
iZaehler:= iZaehler;
iNenner:= iNenner;
end;
Wie das geübte Auge vielleicht sieht, funktioniert die Variablenübergabe im Konstruktor nicht.
Meine Frage ist nun, wie kann ich die iZaehler unterscheiden? Also das übergebene und das, das am Objekt hängt.
Ich wüsste es in Java, da müsste man this.iZaehler:= iZaehler; schreiben.
Wie geht das in Delphi?
Bitte nicht den Tipp "Änder doch einfach die Namen.".
(Habe ich schon in der Procedure setValue, aber die Lösung gefällt mir nicht.)