[Delphi] erreur Constructor - Inherited.

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [Delphi] erreur Constructor - Inherited.

mcfly587

Bonsoir

Je commence avec delphi et je suis bloqué au niveau du CONSTRUCTOR j'ai une erreur de violation d'accès :

Pourriez-vous un peu m'éclairer sur ce que j'ai commencé ci dessous ? Merci :jap:

Code :

unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm4 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
Fcontenance:double;
Fcontenu:double;
public
CONSTRUCTOR Creation(value:double);
procedure Remplir(value:double);
procedure Vider(value:double);
property contenance:double read Fcontenance;
property contenu:double read Fcontenu;
end;
var
Form4: TForm4;
Tsac:TForm4;
implementation
{$R *.dfm}
// CREER L'OBJET
CONSTRUCTOR TForm4.Creation(value:double);
begin
inherited;
end;
// REMPLIR
procedure TForm4.Remplir(value:double);
begin
IF ((contenance+value)<=(FContenance)) THEN
begin
Fcontenu:=Fcontenu+value;
end
ELSE
begin
end;
end;
// VIDER
procedure TForm4.Vider(value:double);
begin
end;
procedure TForm4.Button1Click(Sender: TObject);
begin
Tsac.Creation(15);
end;
end.

Publicité

mcfly587

Le problème vient de Tsac.Creation(15);

Je n'ai pas encore tout bien cerné mais si j'utilise TForm4.Creation(15); çà fonctionne. Je vais poursuivre un peu je reviendrai la dessus plus tard si quelqu'un peut m'expliquer pourquoi çà m'avancerait

Zozol

L'instruction

Tsac.Creation(15);

appele la méthode "creation" appartenant à l'objet "Tsac"...qui n'est pas encore créé. :non:

Pour créer un objet on utilise donc (généralement) l'ordre suivant:
Tsac := TForm4.Creation(15);

Ceci n'appele pas la méthode liée à un objet(qui à ce stade n'est qu'un pointeur nul), mais la méthode liée à la classe TForm4 (la classe, elle, existe dès le depart).

Tu peut toujours consulter l'aide au chapitre "Méthodes de classe", mais à part pour les constructeur, ça ne sert pas souvent

mcfly587

Merci beaucoup zozol c'est plus clair pour moi

:hello:

FORUM HardWare.fr

Programmation

Delphi/Pascal

[Delphi] erreur Constructor - Inherited.

Sujets relatifs
Erreur Javascript - Webmail neuf telecom	(noob)Site en include et erreur 404...
Avec AutoIt V3 comment récupérer le code d'erreur d' exécution	Erreur Persits.Mail
Link checker me detecte des liens vers des pages en erreur 404	Implicit super constructor Batch() is undefined. Must explicitly invok
IOResult : valeur des codes d'erreur ?	Erreur de forum PHP
erreur dans mon script sql	Erreur Struts
Plus de sujets relatifs à : [Delphi] erreur Constructor - Inherited.

Page générée en 0.050 secondes