TFLoad = class
    Folder, Name: string;
    Content: TMemoryStream;
    Load: integer;
  end;

var
  FLoad: TFLoad;

Как сделать чтобы при создании классы FLoad := TFLoad.Create автоматически создавался вложенный класс TFLoad.Content.Create ? И при разрушении FLoad.Free автоматически разрушался TFLoad.Content.Free ?

Про конструкторы и деструкторы что-нибудь слышали?

Слышал, но я не знаю как правильно его использовать ! Как ни пытался - неполучается !

Поможете примером ?

constructor + F1
destructor + F1
там и информация и примеры есть, и как раз то, что надо.

Я не настолько разбираюсь в английском чтобы понять !
Я нашёл через наследование ! Но что делать если таких (Content: TMemoryStream;) переменных несколько ?
Обычно я пользуюсть поисковиками, но этого примера найти не смог !

А кому сейчас хорошо?
Не совсем понял что значит "через наследование". А то что касается - "переменных несколько" - то а как вы хотели, чтоб они создавались по "щучьему велению"? нет никакой полтергейст вам не поможет, если объект надо создать. значит его надо создать.

Млин... ну неужели так сложно код написать ?
Если бы я знал как это сделать или мог сам разобраться, то меня бы здесь небыло !
В книге есть описание конструкторов и деструкторов, но изложенной там информации мне не хватает для решения проблемы !

Млин ... ну неужели так трудно нажать на F1? там сразу пример есть как всю эту кухню сделать.

type
TShape = class(TGraphicControl)
private
    FPen: TPen;
    ...
public
    constructor Create(Owner: TComponent); override;
    destructor Destroy; override;
    ...
end;

constructor TShape.Create(Owner: TComponent);
begin
  inherited Create(Owner);  // Initialize inherited parts

    ...
  FPen := TPen.Create;  // Initialize new fields
    ...
end;

destructor TShape.Destroy;
begin
    ...
  FPen.Free;
  inherited Destroy;
end;

Это из хелпа пример, что тут непонятно?

Этот код я видел, но я не могу понять его!

Я пытался делать, но всегда куча ошибок и вот одна из них:

  TFLoad = class
    Path: string;
    Load: integer;
    Data: TMemoryStream;
  public
    constructor Create; override;
    destructor Destroy; override;
  end;



[Error] Loading.pas(19): E2170 Cannot override a non-virtual method

А понятно, вам надо сначало подучиться. Т.к. это всеголишь азы ООП. а раз вы их не понимаете то сами понимаете ... работать с объектами пока рано.

Собственно это я и пытаюсь сделать !
Я наверное просто не правильно понимаю написанное в книге, вот поэтому и прошу написать пример !

А ктож его знает? может правильно а может и нет. Вот чего вы неправильно понимаете так это то, что тут помогают разобраться с проблемами, а не обучают языку. Т.к. это довольно долгое и весьма не дешевое занятие.
Вам же надо изначально изучить основы ООП, что такое тип, класс, объект, наследование, полиморфизм, инкапсуляция, абстрактные и виртуальные методы и т.д и т.п. Это все не сложно, но без этого ни куда, это фундамент, а без фундамента. как понимаете, ничего не будет.


А толку? пример будет в точ в точ как уже тут я приводил, ... а с чего им отличаться ? но вы его не понимаете и следовательно, с чего вдруг другой поймете?

А ссылочку на учебник\статью дадите ?

]]>http://ru.wikipedia.org/wiki/Объектно-орие...рограммирование]]>
]]>http://books.dore.ru/bs/f6sid278.html]]>