Einzelnen Beitrag anzeigen

Benutzerbild von Die Muhkuh
Die Muhkuh

Registriert seit: 21. Aug 2003
7.332 Beiträge
 
Delphi 2009 Professional
 
#9

Re: Variable global in einer Pas Datei

  Alt 3. Jul 2007, 10:25
Hi Tanja,

versuch mal dies hier:

Delphi-Quellcode:
unit GlobalUnit;

interface

uses
SysUtils, ...

TGlobal = class(TComponent)
procedure Funktion1(Macro: string);
public
Variable1: String;
end;

var
Global: TGlobal;
X,Y: Integer;

Implementation

Procedure TGlobal.Funktion1(Macro: string);
begin
....
end;

// Das kommt ganz nach unten, vor end.

initialization
Global := TGlobal.Create(nil);

finalization
Global.Free

end.
  Mit Zitat antworten Zitat