probleme destructeur

**cilies38** · 14/03/2006, 16h36

Bonjour,

Question de débutant je n'arrvive pas à utiliser de destructeur pour un panel dans ma fiche.Le constructeur a l'air de marcher mais pas le destructeur et c'est quoi la différence exactement entre overload et override je sais que c'est pour la surcharge...

Voila une partie du code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
 
type
  JvBevel=class (TJvBevel)
  public
    Constructor Create(AOwner: TComponent);override;
    Destructor destroy;override;
   end;
 
....
 
Constructor JvBevel.Create(AOwner: TComponent) ;
 
begin
//ici Aowner le composant est Form
inherited Create(Aowner);
parent:=Form4;
Height:=Form4.ClientHeight *2 div 3;
Width:= Form4.ClientWidth *2 div 3;
end;
 
destructor JvBevel.destroy;
begin
  inherited destroy;
end;
 
utilisation : ............
 
if cpt mod 8=0 then
         begin
            //détruire l'ancien panel en créer un nouveau;
            JvBevel.destroy;
            JvBevel.create(Form4);
         end

Merci d'avance

**Laurent Dardenne** · 14/03/2006, 16h47

Salut,

Envoyé par cilies38

Bonjour,
c'est quoi la différence exactement entre overload et override

overload est liéé à la surchage de function/procédure,
override est lié au mécanisme d'heritage de la POO.
Mais là

est de rigueur.

Concernant ton code il est vivement recommandé d'utiliser Free au lieu d'un appel direct à Destroy, mieux utilise FreeAndNil(Instance).

Quant à ton probléme tu peux préciser ?
[edit]
Si ton destructuer ne fait rien d'autre qu'un appel à la classe héritée, ne le déclare pas, l'héritage est implicite dans ce cas.

**cilies38** · 14/03/2006, 16h55

l'erreur c'est :
pas assez de parametres originaux

j'ai essaye free mais je n'arrive pas à l'utiliser:
JvBevel.free

**Laurent Dardenne** · 14/03/2006, 17h03

Dans ton cas tu utilises le nom de la classe au lieu d'un nom d'instance et surtout faire MonInstance:=NomDeClasse.constructeur.
Utilise la convention de nommage de Borland préfixe tes noms de classe avec 'T' TJvBevel.