Głupi problem z odwołaniem ...

0

Mam komponent, którego właściwości po rozwinięciu w Inspektorze Obiektów wyglądają tak :

Komponent1: TSK

  • Settings | (TSettings) <- Klasa TPresistent
    Type | xyz
    Length| 999
  • Auto | (TAuto) <- Klasa TPresistent
    .....

Potrzebuję w klasie TAuto dać metodę odwołującą się do wartości właściwości "Settings.Type" ... No i wywala mi błąd "Method identifier expected"...

Próbowałem już na różne sposoby i wciąż nie wiem jak mam się do tego odwołać ..... Może macie jakiś pomysł ....

0

Chyba powinieneś dokładnie podać jakie są deklaracje tych pól (dokładniej Type). Z opisu błędu wynika, że prawdopodobnie odwołujesz się do właściwości, a powinieneś raczej do odpowiednich metod, które za nimi stoją (właściwości to tylko aliasy do metodu odczytujących i ustawiających wartości pól).

0
TLCD_Type=(tltSingle_Line,tltDual_HalfLine,tltDual_Line);
...
TAutoDisplay = Class(TPersistent)
  private
    Procedure Set2ndLineToDisp(Value: String);

...

TSettings = Class(TPersistent)
...
  Procedure SetDisplayType(Value: TLCD_Type);
Published
  Property Display_Type: TLCD_Type read FTypWyswietlacza write SetDisplayType;
...

Procedure TAutoDisplay.Set2ndLineToDisp(Value: String);
Begin
  If  

(!!!!!! TU WŁAŚNIE CHCIAŁBYM SIĘ ODWOŁaĆ DO Display_Type )

Then
    FLine2ToDisplay:=Value
  Else FLine2ToDisplay:='';
End;
0

No to w czym problem?

if Display_Type = tltSingle_Line then

1 użytkowników online, w tym zalogowanych: 0, gości: 1