Begin
FFilm.Destroy; // - win FFilm.Free;
FTitle:="; //
Inherited Destroy; // TObject.Destroy
End;
:
Destructor, :
< >.< >.
, , .
, . , . .
, , Destroy, , , ,
.
. , - , .
, .
.
) .
, . , .. , .
, , -. Create, TObject.
, . , , .
:
Var < >: < >; // -
Begin
...
< >:=< >.< >[(<>)];
...
End;
Var TmpFrm: TForm;
Begin
TmpFrm:=TForm.Create(Self); // -
End;
:
, ( ), , .
.
)
|
|
, - . :
< >.< >[(<>)];
:
, - . Nil , .
. Free, TObject.Free, Nil , Destroy.
) Delphi. , , , ( TFonn). , . - Application. - *.Dpr :