type TMyClassInMState = class(TObject)
![]() |
MyField: Integer; |
![]() |
procedure MyMethod; |
![]() |
property MyProperty: Integer read MyField write MyField; |
![]() |
MyField: Integer; |
![]() |
procedure MyMethod; |
![]() |
property MyProperty: Integer read MyField write MyField; |