Détruire un TFrame aprés utilisation.

Bonjours,
Je me suis crée un TFrame dont sur cette Frame j'ai des boutons, cases à cochés
des variables ansi que des Array...Ma question est si je pousse par exemple
un bouton du nom Close, la Frame ainsi que tous les variables et objets mise
sur cette frame sois libérer, des allouer ou détruit pour libérer de la mémoire.
Voici comment je crée ma Frame.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

type TFrameBt2edit = class(TFrame) .. .. var ToFrame2: TFrameBt2edit; ..   implementation     Procedure Init_Panel2; begin ToFrame2 := TFrameBt2edit.Create(ToFrame2); ..

---

Est-ce suffisant de faire ceci...(qui fonctionne à moitié)
En faisant un test après d'avoir poussé le bouton close je constate que le contenu du array existe encore! (ou dois-je les dés allouer séparément)

Code:

---

1 2 3 4 5 6

procedure TFrameBt2edit.CloseClick(Sender: TObject); begin RemoveControl(ToFrame2); ToFrame2.Free ; end;

---

Merci pour vôtre aide, salutations

Pas très clair...
Si tu crées 'en code' des composants tu dois les détruire 'en code'.
Si tu crées un composant qui en contient d'autres tu dois détruire ces autres avant de détruire ton composant 'container'.

tu dois ajouter un destructor

Code:

---

1 2 3 4 5

type TFrameBt2edit = class(TFrame) public destructor destroy(); override; ...

---

Normalement, un array est libéré si il est alloué dans l'objet (il effectue un finalize sur ses membres ... public ou privé ou publié chacun se comporte différement, les uns sont à la charge du dev, les autres au gestionnaire de flux ...,

bon ensuite comme le pointeur de ton tableau n'est pas nulle, la mémoire, elle n'est pas effacée tout simplement ... donc delphi peu lire, mais ton programme lui ne peut pas ... c'est spécial le deboggage, il s'accorde des droits sur l'exe lancé ... (voir API IsDebuggerPresent ...)

ensuite ceci me choque

Code:

---

1 2 3 4

Procedure Init_Panel2; begin ToFrame2 := TFrameBt2edit.Create(ToFrame2); ..

---

Comment ToFrame2 qui n'est pas instancié peut-être son propre Owner ???

Code:

---

1 2 3 4

Procedure Init_Panel2; begin ToFrame2 := TFrameBt2edit.Create(nil); // ou application à la limite ..

---

idem

Code:

---

1 2 3 4 5

procedure TFrameBt2edit.CloseClick(Sender: TObject); begin RemoveControl(ToFrame2); ToFrame2.Free ; end;

---

Pourquoi ToFrame2 devrait se supprimer des ses controls (ce n'est pas la gestion mémoire, contrairement à RemoveComponents) ...

Code:

---

1 2 3 4

procedure TFrameBt2edit.CloseClick(Sender: TObject); begin Self.Release(); end;

---

...

Tu as raison, ce n'est pas correct je viens de corriger pour faire cela.

Code:

---

1 2 3 4 5

Procedure Init_Panel2; begin ToFrame2 := TFrameBt2edit.Create(Form1); ..

---

L'idée était de détruire tout les composants et les codes.. en une seul fois qui étaient placer sur la Frame ' ToFrame2 ' en cliquant sur le bouton 'close'

Le bouton close biensure je la mets sur une autre form.

Ainsi, si j'ai bien compris je ne peux pas détruire tout les composants placé
sur un frame en une seule fois, 'en détruisant seulement le frame'.
(Je dis ceci car j'avais cru que en détruisant un frame avec tout dessus,
les composants étaient détruits automatiquement aussi)?

Donc je dois les détruires un par un à partir de la dernière création à la
première création!

Merci pour l'info et salutations.

Les composants posés via IDE Delphi, seront libérés, via le mécanisme de Owner ...

les objets/pointeurs que tu créé toi même via des create, des new, ... tu as la charge de libération si tu n'as pas précisé le Owner pour le Components