Zugriff auf unitübergreifende Variablen

[himitsu]

Dann unterscheide nicht nur Global und Lokal.
Es ist halt so seine Sache und sollte weiter differenziert werden.

Application-Global > Interface und Public-Var/Public-Class-Var
Unit-Global > Implementation und Private/Protected, sowie Public-Var/Public-Class-Var von Klassen-Definitionen in der Implementation.
Klassen-Global > Private Strict-Private und Protected Protected-Private
Prozedur-Global > in Prozedur (inkl. Parametern), aber vor Nested-Prozeduren
Lokal > in Prozedur, direkt vor dem ersten BEGIN


Alles Öffentliche von Klassen sollte immer als Property rausgegeben werden, auch wenn erstmal diret auf die Variable, also ohne Getter und Setter.

[Sir Rufo]

Wenn du wirklich etwas Globales benötigst, dann verwende eine statische Klasse mit Eigenschaften.

statt

Delphi-Quellcode:

unit uGlobal;

interface

var
  foo : Integer;

inmplementation

end.

das hier

Delphi-Quellcode:

unit uGlobal;

interface

type
  Globals = class abstract
  private
    class var _Foo: Integer;
    class function GetFoo; static;
    class procedure SetFoo( const Value: Integer ); static;
  public
    class property Foo : Integer read GetFoo write Setfoo;
  end;

implementation

class function Globals.GetFoo: Integer;
begin
  Result := _Foo;
end;

class procedure SetFoo( const Value: Integer );
begin
  _Foo := Value;
end;

end.

[DeddyH]

Das dürfte unter Delphi 5 aber schwierig werden

[Delphi-Laie]

Leute, besten Dank, das muß ich erstmal wieder sacken lassen....