Hallo zusammen. Ich hoffe, ich poste das hier thematisch richtig.
Es geht um folgendes: Ich habe eine Klasse freactor erstellt. In dieser werden einzelne Größen berechnet usw. Unter anderem beinhaltet diese Klasse Variablen, die als private deklariert sind. Das ganze sieht in etwa so aus:
Delphi-Quellcode:
type TFReactor = class(TObject)
private
temperature: extended;
pressure: extended;
bstoff: integer;
firing: boolean;
public
procedure Create;
function Energyproduction(temp, pres: extended; bs: integer): extended;
function DeterminePressure(temp: extended; bs: integer): extended;
function DetermineTemperature(bs: integer; triggerenergy: extended): extended;
function Lawson(temp, pres: extended): extended;
end;
Nun möchte ich diese Klasse aus dem Hauptprogramm aufrufen, wo die Klasse über
Reactor: TFReactor;
eingebunden wird. Dies klappt dann auch soweit ganz gut...
label193.caption:=FloatToStr(Reactor.energyproduction(temp,pres,deuterium));
Das Problem ist nur, dass wenn ich INNERHALB der Klassen-
Unit eine private-Variable ändern will (z.B. firing:=true
dann gibt es ne Fehlermeldung. Also eine Zugriffsverletzung. Compilieren tut er jedoch einwandfrei...
Ist das erste mal, dass ich wirklich eine eigene Klasse erstelle. Hoffe mir kann da jemand helfen...