Ich hab gerade ein Problem!!
Also ich berechne in einer Function den Gewinn!
Nun möchte ich diesen Gewinn in einer anderen
Unit(Hauptunit) nutzen!
Die Hauptunit hat Zugriff auf alle anderen Units, jedoch hat die
Unit in der die Funktion ist, die den Gewinn beinhaltet keinen Zugriff auf andere Units!!!
Wie bekomme ich jetzt den Wert des Gewinns in die Hauptunit???
INFO:::
Die Function die den Gewinn beinhaltet liefert keinen integer zurrück, also muss ich mir ja höchst wahrscheinlich eine HilfsFunktion schreiben, aber das Funktioniert dann nicht wirklich!!!
BEISPIEL::::
HIER WIRD DER GEWINN BERECHNET
Code:
FUNCTION BLAHBLAHBLAH : boolean;
{GewinnÜberprüfung}
Gewinn := 0;
{Paar1}
if ((Karten[0] in OwnDeck) or (Karten[1] in OwnDeck)) then
Gewinn := (Gewinn+(CWinFactors[0] * (Maechtigkeit * UConst.cCardCost)));
{Paar2}
if ((Karten[2] in OwnDeck) or (Karten[3] in OwnDeck)) then
Gewinn := (Gewinn+(CWinFactors[1] * (Maechtigkeit * UConst.cCardCost)));
{Paar3}
if ((Karten[4] in OwnDeck) or (Karten[5] in OwnDeck)) then
Gewinn := (Gewinn+(CWinFactors[2] * (Maechtigkeit * UConst.cCardCost)));
{Paar4}
if ((Karten[6] in OwnDeck) or (Karten[7] in OwnDeck)) then
Gewinn := (Gewinn+(CWinFactors[3] * (Maechtigkeit * UConst.cCardCost)));
{GroßesLos}
if (Karten[8] in OwnDeck) then
Gewinn := (Gewinn+(CWinFactors[4] * (Maechtigkeit * UConst.cCardCost)));
Wie bekomme ich jetzt diesen Gewinn in die Hauptunit???