Einzelnen Beitrag anzeigen

Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.624 Beiträge
 
Delphi 12 Athens
 
#29

Re: mit 1. Form auf 2. Form zugreifen

  Alt 19. Dez 2008, 16:48
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.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat