Frage zu Konstanten...

[Kedariodakon]

Nich schlagen für die dumme Frage

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

Wenn ja wo bekomm ich die her?


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
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? )?

[Kedariodakon]

Zitat von sniper_w:

Das klingt nach ein Property (vielleicht ReadOnly? )?

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

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 von Kedariodakon:

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

Bye

Geht IMHO nur in Delphi 2005.