Hogyan juthat el a címet, az osztály (privát) területén rendszeres
Hogyan lehet eljutni a területen, hogy foglalkozzon az osztály (magán) a rendszeres.
Az eljárás az adott modulban, mint az osztály.
Tárgy.
Ha az eljárás ugyanabban az egységben, mint az osztály leírása, a probléma csak az azonos, nem kell. Obyuraschatsya a szokásos módon.
Egy kis eltűnt a mezők irányába az osztály módszereket.
típus
TMyClass = osztály
# XA0; # XA0, köz-
# XA0; # XA0; # XA0; # XA0; myfunc függvény (A: integer): integer;
végén;
Ugyanabban a modulban van a szokásos eljárásban:
működnek AnotherFunc (A: integer): integer;
kezdődik
TMyClass.MyFunc (A); // ezért szeretnék tenni rólam
végén;
Van egy hiba: Ez az eljárás csak hívásra engedélyezett osztály módszerek
Mit kell tenni?
> Az eljárás legyen tagja egy osztály, és nem csak
> Lie ugyanabban a modulban.
Nem kellene.
TMyClass = osztály
..
# XA0; nyilvános
# XA0; # XA0; # XA0; osztályú myfunc függvény (A: integer): integer;
..
Oak működik, de megint van egy probléma:
típus
TMyClass = osztály
# XA0; # XA0; magán-
# XA0; # XA0; # XA0; FB: integer;
# XA0; # XA0; védett
# XA0; # XA0; # XA0; ingatlan B: integer olvasni FB FB write;
# XA0; # XA0; # XA0; osztályú myfunc függvény (A: integer): integer;
végén;
Mivel most már van:
osztályú myfunc függvény (A: integer): integer;
kezdődik
# XA0; eredmény: = A + B // Ez hogyan kell csinálni?
végén;
Ie hozzáférni egy védett-woo a kategóriájában. Így a fordító azt írja, hogy a tulajdon „CurrProc” megközelíthetetlen itt
PS. Peret míg nyomógombok javasoljuk, hogy tanulmányozza az elmélet és megérteni, mit végül kíván tenni.
Azt próbálja meg, próbálja meg.