|
Registriert seit: 26. Aug 2004
Ort: Nebel auf Amrum
3.154 Beiträge
Delphi 7 Enterprise
|
AW: Globale Variable - Definition
14. Mai 2011, 22:33
gdBK sollte aber initialisiert werden!
Delphi-Quellcode:
function dBK: TdBK;
begin
if not Assigned(gdBK) then
gdBK := TdBK.Create;
Result := gdBK;
end;
initialization
gdBK:=nil;
finalization
gdBK.Free;
end.
|