Wenn ich solche "globalen" Variablen brauche, mache ich es ungefähr so:
Delphi-Quellcode:
unit MyGlobals;
interface
type
...
const
...
var
...;
MyGlobVar:
String;
implementation
end.
Delphi-Quellcode:
unit Unit1;
interface
uses
Windows, ..., MyGlobals;
type
...
implementation
procedure TForm1.FormCreate (...);
begin
MyGlobVar := '
Foo';
end;
...
end.
Delphi-Quellcode:
unit Unit2;
interface
uses
Windows, ..., MyGlobals;
type
...
implementation
procedure TForm2.FormCreate (...);
begin
ShowMessage (MyGlobVar);
end;
...
end.
Also eine
Unit anlegen, in der solche Sachen gesammelt werden (Types, Consts, Vars) und diese
Unit dann in den jeweiligen Units einbinden, wo du die Variablen / Typen / ... brauchst.