Zugriff auf nicht existente Klassenvariable ?

[moelski]

Moin Gemeinde!

Ich stehe da mal wieder vor einem Problem. Vermutlich nix wildes, aber ich hab keine Lösung

Also, ich habe 2 Units ...
In Unit 1 wird eine Klasse erzeugt:

Delphi-Quellcode:

type
  TLVFeigaoPowerAnalyzer = class(TLVDeviceRoot)
    public
      constructor Create(Owner: TObject);

      function DatenGueltig(const Data: String): boolean;                          
    private
      FeigaoPowerAnalyzer_MeasureSpeed:              Integer;
  end;

So dort gibbet nu die Variable FeigaoPowerAnalyzer_MeasureSpeed. Soweit sogut ...

Nun sind wir in Unit2. Dort möchte ich einen Vergleich durchführen in etwa so:
if IrgendEinWert <> FeigaoPowerAnalyzer_MeasureSpeed then ... Nu sagt er mir aber

Zitat:

[Fehler] FeigaoPowerAnalyzer_Toolbox.pas(42): Undefinierter Bezeichner: 'FeigaoPowerAnalyzer_MeasureSpeed'

Is ja auch richtig. Denn von der Klasse wurde noch kein Objekt abgeleitet. Frage is nu aber wie kriege ich das hin das ich dennoch die Abfrage machen kann?

Also so gehts jedenfalls auch nicht:
(PresentObject as TLVFeigaoPowerAnalyzer).FeigaoPowerAnalyzer_MeasureSpeed Any Hint?

[Oxmyx]

Die Variable als public deklarieren.

[moelski]

ARGH ...

Ihr dürft mich schlagen ... Aue Aue ...

Man sollte das natürlich in Public definieren ... Aue Aue Aue ...

Delphi-Quellcode:

type
  TLVFeigaoPowerAnalyzer = class(TLVDeviceRoot)
    public
      FeigaoPowerAnalyzer_MeasureSpeed:              Integer;

Hat sich erledigt ...

In dem Moment wo ich es nochmal gelesen habe im Fred kam die Erleutung ... Na denne ... Nix für Ungut ...

[Dax]

Zitat von Oxmyx:

Die Variable als public deklarieren.

Da wären Properties aber besserer Stil.

[Thorben77]

FeigaoPowerAnalyzer_MeasureSpeed Kannst Du diesen schrecklich langen Namen nicht kürzen *schüttel*. Die klass hat das "FeigaoPowerAnalyzer" doch schon im Name, da musst Du es doch nicht bei jeder Eigenschaft wiederholen.