Frage zu Konstanten...

[Kedariodakon]

Nich schlagen für die dumme Frage :stupid:

Gibt es Klasenkonstanten? :gruebel:
Sprich Konstanten die sich verhalten wie Methoden, wenn man sie vererbt...

Wenn ja wo bekomm ich die her? :coder:


Bye

[Dax]

Ähm... Konstante, die sich verhalten wie Methoden? Meinst du sowas?

Delphi-Quellcode:

type
  TMyClass = class(TObject)
  public
    class procedure Foo;
  end;

const
  MyConst: TMyClass;

class procedure TMyClass.Foo;
begin
  ShowMessage('Klassenkonstsnte?');
end;

[Kedariodakon]

Naja was das class genau bedeutet, weiß ich nicht, hab ich noch net gebraucht :wink:
Oder war mir nicht bewust...


Ich meine eine Konstante, die halt immer fleißig weiterverrerbt wird, bis man sie ändert/überschreibt verdeckt, oder was auch immer...


Bye

[Dax]

Also sowas?

Delphi-Quellcode:

class 
  TMyClass = class(TObject)
  public
    const Alpha: Extended = 0.0;
  end;

Ja, gibt es ;-)

[sniper_w]

Zitat:

Ich meine eine Konstante, die halt immer fleißig weiterverrerbt wird, bis man sie ändert/überschreibt verdeckt, oder was auch immer...

Das klingt nach ein Property (vielleicht ReadOnly? )? :gruebel:

[Kedariodakon]

Zitat:

Zitat von sniper_w

Das klingt nach ein Property (vielleicht ReadOnly? )? :gruebel:

So hab ichs ATM auch gemacht, aber vielleicht gibts ja die besagte Klassenkonstante, dann würden viele Codezeilen verschwinden :roll:

Bye

[sniper_w]

Zitat:

dann würden viele Codezeilen verschwinden

Ich kann das nicht nachvollziehen.

[Dax]

Kedario.. deklarier mal eine Klasse wie ich sie oben geschrieben habe, das funktioniert ;-) Ist wie eine ReadOnly-Property mit implizierter Initialisierung.

[Kedariodakon]

Dann bekomm ich: [Fehler] xxx.pas(xx): 'END' erwartet, aber 'CONST' gefunden

Bye

[Die Muhkuh]

Zitat:

Zitat von Kedariodakon

Dann bekomm ich: [Fehler] xxx.pas(xx): 'END' erwartet, aber 'CONST' gefunden

Bye

Geht IMHO nur in Delphi 2005.