Globale Variablen!

[tmode00]

Also,

Im Interface Teil:

Delphi-Quellcode:

Type
TSpieler = class(TObject) //Spielerklasse

private
Geld:Integer;  //Feld von Spieler was das gesamte Geld des Spielers beinhalten soll

end;

Im Implementationsteil (in irgeneiner Routine):

Delphi-Quellcode:

var Spieler: TSpieler
begin
Spieler := TSpieler.create;
Spieler.Geld := 1000;
Spieler.free;
end;

So nun hat der Spieler innerhalb der Routine 1000 Geld. Aber von überall soll man Geld verwenden können z.B.:

Button1.Click:

Delphi-Quellcode:

var Wasgeldkostet: TSpieler;
begin
Wasgeldkostet := TSpieler.Create;

Label1.caption := InToSTR(Wasgeldkostet.Geld) //würde nichts ergeben!
end;

Nun möchte ich aber das wasgeldkostet auf das Spielergeld zugreift! Ich weis nicht wie ichs genauer erklären soll was ich meine....