Discussion :

[Invité]

Bonjour

Comment fait-on dans un constructeur pour rien construire
et renvoyer nil (bien qu'un constructeur ne renvoie rien) ?

Merci

Jean-Philippe

[sjrd]

Tu ne peux pas, c'est impossible.
Si tu veux indiquer qu'un constructeur a échoué, déclenche une exception au sein du constructeur, que tu traites là où tu l'appelles.

[Clorish]

Tu ne peux pas, c'est impossible.
Si tu veux indiquer qu'un constructeur a échoué, déclenche une exception au sein du constructeur, que tu traites là où tu l'appelles.

Si tu lance une exception dans le constructeur ... alors le constructeur echoue donc d'une certaine maniere renvoie NIL, du moins si les choses sont faite proprement. Je vois mal un constructeur renvoyer une adresse invalide ....

[Paul TOTH]

Bonjour

Comment fait-on dans un constructeur pour rien construire
et renvoyer nil (bien qu'un constructeur ne renvoie rien) ?

Merci

Jean-Philippe

je ne sais pas si ça répond à ton besoin, mais une fonction peu peut-être t'aider...ou une fonction de classe si tu préfères

Code :

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

1
2
3
4
5
 
function CreateMonObject:TMonObject;
begin
 if (Condition=TRUE) then Result:=TMonObject.Create else Result:=nil;
end;

[Clorish]

D'ailleur quel est le but de cette operation ?
Pourquoi souhaite tu renvoyer Nil ?

Peut etre que nous pourrions trouver d'autres solutions plus propre a ton probleme

[ShaiLeTroll]

Lorsque tu as une exception dans un constructeur, cela appele normalement un Destroy (il doit géré les libérations partiellement via Assigned et nil)

je pensais qu'il manque un inherited dans ton constructeur

sinon dans l'idée de Paul TOTH, j'ai fait ceci, une méthode de classe qui sert d'encapsulation à un constructeur (c'est pas comme ça que je voulais faire au début mais bon)

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
{* -----------------------------------------------------------------------------
La Fonction Load renvoie une Instance de Persistant selon un ID, la Classe Receveuse de la Méthode détermine l'ancêtre Minimum à récupérer
@param ID AutoInc Primary Key identifiant l'Objet dans sa Table
@return Renvoie un Persistant ou nil si pas Trouvé
------------------------------------------------------------------------------ }
class function TEpcPersistant.Load(const ID: TepcPersistantIDType): TEpcPersistant;
begin
  Result := Self.Create(nil);
  if TEpcPersistantDBProvider.Provider.Load(Result, ID) and Assigned(Result) and Result.InheritsFrom(Self) then
    Result.InternalLoad(ID)
  else
    if Assigned(Result) then
    begin
      Result.Free();
      Result := nil;
    end;
end;

"TEpcPersistantDBProvider.Provider.Load" peut ré-instancier l'objet (ou libérer et affecter à nil car erreur), la classe permet d'identifier la table, mais celle-ci peut contenir plusieurs classes héritées ...