Call procedure

[baumina]

Create a form like
TTest := TForm1.Create(Application); or TTest := TForm1.Create(Nil);

and dont forget to free the Form after using
TTest.Free;

[DeddyH]

There is no need to free a TComponent if you specified an owner on its creation.

[question]

I have one class

Type
TCar = class(Tobject)

i would like to add another class TMen inside TCar class, how can i add another class inside a Class?

[DeddyH]

Delphi-Quellcode:

type
  TMyOtherClass = class
    (* Fields, Methods, Properties *)
  end;

  TMyClass = class
  private
    FMyOtherClass: TMyOtherClass;
    (* More Fields, Methods, Properties *)
  end;

Depending on your intention you have to create the "FMyOtherClass"-instance somewhere (e.g. within the constructor of TMyClass) and free it within the destructor to avoid memoryleaks.