Private Faddress: string[35]; //2 - ші өрісінің аты
Constructor Create; // құрастырушы
Public
Procedure Show; // Show - әдісі
End;
Объектілер қалай құрылады және жойылады?
Объект конструктор деп аталатын арнайы тәсілдің негізінде пайда болады да, басқа бір тәсіл- деструктордың көмегімен жойылады:
AMyObject := TMyObject.Create;
{ құрылған объектіге қолданылатын амалдар }
...
AMyObject.Destroy;
Класстың бірнеше конструкторы болуы мүмкін. Конструктордың жалпы аты create. Деструктордың типтік аталуы — Destroy.
type
TMyObject = class(TObject)
MyField: Integer;
Constructor Create;
Destructor Destroy;
Function MyMethod: Integer;
end;
Өрістер, қасиеттер және тәсілдер
Класстың өрістері - класстың ішінде сипатталған айнымалылар. Олар класстың объектісінің жұмысы барысында деректерді сақтауға арналған.
Класстың сипаттамасында өрістер тәсілдер мен қасиеттерден бұрын келуі керек.
Әдетте өрістер класстың ішіндегі операциялардың орындалуын қамтамасыз ету үшін қолданылады.
Деректер алмасу үшін класста қасиеттер қолданылады. Қасиеттерді сипаттау үшін класста property сөзі қолданылады.
Мысалы, қосымша терезесіндегі қарапайым батырманың түс, өлшем, алатын орны сияқты қасиеттері болады.
Қасиеттер сыртқы ортамен дерек алмасуды қамтамасыз етеді.
Сондықтан оның мәнін пайдалану үшін класстың арнайы тәсілдері пайдаланылады.
Әдетте қасиет үш элемент арқылы анықталады: өріс және оқу/жазуды жүзеге асыратын екі тәсіл:
type
TAnObject = class(TObject)
function GetColor: TSomeType;
procedure SetColor(ANewValue:
TSomeType);
property AColor:
TSomeType read GetColor write
SetColor;
end;
Егер қасиет тек оқылатын немесе жазылатын болса, онда оның сипаттамасында сәйкес тәсіл жазыла алады:
type
TAnObject = class(TObject)
property AProperty: TSomeType
read GetValue;
end;
Объектінің берілгендеріне орын бөлу - құрастырушы Create әдісін қолданудың нәтижесін меншіктеу арқылы орындалады, мысалы:
Proff:=TPerson.Create;
// proff объектінің берілгендеріне қажетті орын бөлу
Сонымен қатар, Consructor көмегімен объектінің берілгендеріне бастапқы мәндерін меншіктеуге, яғни объектіні инициялизациялау әрекетін орындауға болады:
Достарыңызбен бөлісу: |