"Unsterbliche" Klassen

[Dax]

Die Praxis? Read-Only-Property einer Klasse. Anders gehts _nicht_.

[Neutral General]

Das heißt ich muss es schaffen den Pointer meiner Klasse readonly zu machen ?
Na super.. Die Klassen haben ja nichtmal ne Eigenschaft Pointer...
Wie soll man sowas denn Readonly machen ?^^

NEIN ich glaube ich muss die komplette Klasse Readonly machen ^^

[Dax]

Erm, du verstehst das falsch.

Delphi-Quellcode:

type TForm1 = class(TForm)
  ..
  private
    fKlasse: TMeineUnsterblicheKlasse;
  public
   property UnsterblicheKlasse: TMeineUnsterblicheKlasse read fKlasse;
  end;

Oder so in der Art. Jedenfalls so, das der Zugriff auf den Pointer nie schreibend sein darf.

[MaBuSE]

Zitat von Neutral General:

Delphi-Quellcode:

Klasse.Free;
Klasse.Destroy;
Klasse.FreeInstance;
FreeAndNil(Klasse);
TAndereKlasse(Klasse).Free

Teste mal TObject(Klasse).FreeInstance;

[NicoDE]

Zitat von Neutral General:

Ich muss ja verhindern das

Klasse := nil; seine Wirkung verliert, bzw das die Klasse schnell wieder ihren Zeiger wiederbekommt oder ihn erst gar nicht verliert..

Ähm, 'Klasse' scheint eine Referenz auf ein Objekt (Instanz einer Klasse) zu sein... das hat nichts mit deiner Klasse zu tun.

[tigerman33]

@Dax:
Das geht nicht. Er will ja, dass niemand eine Instanz seiner Klasse zerstören kann, also auch ohne "selbstauferlegte" Beschränkungen. Ist also quasi eine Art vollkommen sinnloser API. (Das ist aber nicht negativ gemeint)

@malo:
Nein, das geht nicht. Default-Eigenschaften kann man nur für Array-Eigenschaften angeben--siehe oben.

[Neutral General]

Zitat von MaBuSE:

Zitat von Neutral General:

Delphi-Quellcode:

Klasse.Free;
Klasse.Destroy;
Klasse.FreeInstance;
FreeAndNil(Klasse);
TAndereKlasse(Klasse).Free

Teste mal TObject(Klasse).FreeInstance;

Eh was willst du mir damit sagen ?
Also meine Klasse ist immun gegen TObject(Klasse).FreeInstance...
Und das von Natur aus

Aber immernoch nicht gegen Klasse := nil; -.-^^

@Tigerman(@Dax): Genau. Also die Klasse soll keine Property sein. Bzw sie muss keine sein aber trotzdem "unverwundbar"

[MaBuSE]

Zitat von Neutral General:

Eh was willst du mir damit sagen ?
Also meine Klasse ist immun gegen TObject(Klasse).FreeInstance...
Und das von Natur aus

Kannst Du mal den Quellcode Deiner Klasse posten, ich würde das gerne mal sehen.

Dann kann ich selbst ausprobieren, ob TObject(Klasse).Free; funktioniert.

[ichbins]

Wie wärs wenn du den Inhalt deines Zeigers und einen Zeiger auf den Zeiger als protected-Variablen in deiner Klasse speicherst? Dann machst du eine Endlosschleife in die Klasse rein, in der du überprüfst, ob sich der Wert im Zeiger verändert hat.

Und: :=nil ist WIRKLICH kein Zerstören: Es bedeutet ja nur dass das Prog nicht mehr weiss wo im RAM die Klasse eigentlich ist. Dann könntest du die Klasse auch in einer lokalen Variable öffnen, die ist dann auch "verloren" wie bei :=nil.

[MaBuSE]

Zitat von Neutral General:

Ich hab ne Idee: Ich erstelle eine "Unverwundbare" Klasse. Ich geb euch den Quellcode von nem Programm mit ner Unverwundbaren Klasse. Ihr dürft verändert was ihr wollt, aber ihr dürft keine Functionen,Proceduren oder Variabel oder so von der Klasse verändern oder hinzufügen. Wer es zuerst schafft die Klasse zu zerstören hat gewonnen

(Das war ernst gemeint )

Also was ist?