Thema: Delphi static Hilfe

Einzelnen Beitrag anzeigen

omata

Registriert seit: 26. Aug 2004
Ort: Nebel auf Amrum
3.154 Beiträge
 
Delphi 7 Enterprise
 
#6

Re: static Hilfe

  Alt 13. Mär 2007, 21:04
Zitat von nitschchedu:
...Ich brauche das so das wenn ich zwei Klassen erzeuge in zwei verschiedenen Programmen das da das selbe in der Variabel steht.
In zwei verschiedenen Programmen? Wie soll das gehen? Meinst du vielliecht zwei unterschiedliche Instanzen einer Klasse?

Delphi-Quellcode:
type
  TMyClass = class
  private
    function GetStatic: String;
    procedure SetStatic(value: String);
  public
    property StaticString: String read GetStatic write SetStatic;
  end;

implementation

const
  FStatic: String = 'Test-Static';

function TMyClass.GetStatic: String;
begin
  Result := FStatic;
end;

procedure TMyClass.SetStatic(value: String);
begin
  FStatic := Value;
end;
Gruss
Thorsten
  Mit Zitat antworten Zitat