Record zu Class umschreiben (Getter/Setter)

[Glados]

Dann bleibe ich denke ich bei der Klasse. Denn Records wurden ja per-se nicht dafür erfunden properties reinzuschmeißen.

[himitsu]

Zitat:

Zitat von Glados (Beitrag 1376582)

Denn Records wurden ja per-se nicht dafür erfunden properties reinzuschmeißen.

Interfaces sind auch nicht erfunden, um Property rein zu werfen.
Property sind dort einfach nur "Views" auf je ein Paar Getter und Setter.

[Glados]

Ist es möglich eine Klasseninstanz meiner Klasse innerhalb des Initialization-Teils einer Unit zu erstellen? Bisher bin ich irgendwie zu blöd dafür.

[himitsu]

Ja .......

[Glados]

Darf ich fragen wie die Syntax aussieht? :P

[Zacherl]

Zitat:

Zitat von Glados (Beitrag 1376588)

Darf ich fragen wie die Syntax aussieht? :P

Delphi-Quellcode:

Inst := TMyClass.Create

?

Warum soll es an dieser Stelle anders aussehen, als überall sonst?

[Glados]

Also das hier funktioniert jedenfalls nicht...

Delphi-Quellcode:

unit MyClass;

interface
 uses ...;

type
 TTest_ = class
...
end;

implementation

... constructor destructor setter getter

initialization

Inst := TTest_;

finalization

end.

[himitsu]

Wenn du das wo anders machst, was ist da denn das "Inst" bei dir? :stupid:

Außerdem wurde dir gerade ein Beispiel gegeben.
Das sieht sogar so aus, wie in der OH nd in allen Tutorials.
Was also fehlt da nich, nach dem Klassennamen?

[EWeiss]

Zitat:

Zitat von himitsu (Beitrag 1376591)

Wenn du das wo anders machst, was ist da denn das "Inst" bei dir? :stupid:

Delphi-Quellcode:

var
Inst : TTest_;

Inst := TTest_.Create;

Auch wenn du es schon selber weist.

gruss

[Glados]

Zitat:

Wenn du das wo anders machst, was ist da denn das "Inst" bei dir?

Ich verstehe die Frage leider nicht.

Nach dem Klassennamen fehlte noch das Create das ist mir beim kopieren wohl verloren gegangen.

=>

Zitat:

Zitat von EWeiss (Beitrag 1376592)

Zitat:

Zitat von himitsu (Beitrag 1376591)

Wenn du das wo anders machst, was ist da denn das "Inst" bei dir? :stupid:

Delphi-Quellcode:

var
Inst : TTest_;

Inst := TTest_.Create;

Auch wenn du es schon selber weist.

gruss

Den Beitrag hatte ich vorher nicht gesehen sorry.