Delphi-Quellcode:
type
TMyClass = class
private
FMyVar: integer; //privates Feld
public
constructor Create;override;
property MyVar: integer read FMyVar write FMyVar; //Property zum Zugriff auf FMyVar
end;
var EineVar: integer = 0; //globale Variable
implementation
constructor TMyClass.Create;
begin
inherited Create;
FMyVar := 99; //Setzen des Initialwertes für FMyVar
inc(EineVar); //Erhöhen der globalen Variablen
end;
Wenn Du nun 2 Instanzen von TMyClass erzeugst und der ersten den Wert 10 für MyVar zuweist, ist MyVar der zweiten immer noch 99, MyVar hängt also an der Instanz. EineVar dürfte dann aber den Wert 2 haben, da beide Instanzen hier auf dieselbe Variable zugreifen.