AddConstraint (selector)
De Wiki1000
(Différences entre les versions)
Ligne 54 : | Ligne 54 : | ||
<source lang="delphi"> | <source lang="delphi"> | ||
function doSelector(const iCodeA:string; const iCodeB:string):Integer; | function doSelector(const iCodeA:string; const iCodeB:string):Integer; | ||
− | var selA:TSelector; obj: | + | var selA:TSelector; obj:TSelectorConstraint; |
begin | begin | ||
selA := ClassA.CreateSelector('unCodeA=%1','unCodeA',True,[iCodeA]); | selA := ClassA.CreateSelector('unCodeA=%1','unCodeA',True,[iCodeA]); | ||
− | obj := selA.AddConstraint(nil, 'ClassB','oid','refB','unCodeB=%1',[iCodeB]); | + | obj := selA.AddConstraint(nil, 'ClassB','oid','refB','unCodeB=%1',[iCodeB]); // obj.Name='S1' |
Result := selA.Count; | Result := selA.Count; | ||
end; | end; |
Version du 12 novembre 2016 à 09:43
function AddConstaint(iParent:TSelectorConstraint; const iClassName:string; const iRightName:string; const iLeftName:string; const iWhere:string; const iArgs:Array of variant):TSelectorConstraint;
Cette méthode définit une contrainte matérialisé par une jointure.
Paramètre | Usage |
---|---|
Result | Un objet de type TSelectorConstraint matérialisant la contrainte |
iParent | Containte parente |
iClassName | Classe liée |
iLeftName | Attribut gauche |
iRightName | Attribut droit |
iWhere | Clause Where de la jointure |
iArgs | Paramètres de la clause Where |
- iParent
- Une contrainte parente matérialisant la classe de droite
- nil pour faire porter la contrainte sur la classe du sélecteur
- iClassName
- Une classe sur laquelle porte la contrainte
- iLeftName
- Un attribut de la classe de la contrainte (iClassName) portant la contrainte
- iRightName
- Un attribut de la classe de droite, du parent ou du sélecteur, portant la contrainte
- iWhere
- Clause where de la contrainte, la clause where est exprimée par rapport à la classe de la contrainte (iClassName). Les rôles NE sont pas évalués, il faut passer impérativement par AliasOf au besoin.
- iArgs
- Arguments de la contrainte
Exemple :
function doSelector(const iCodeA:string; const iCodeB:string):Integer; var selA:TSelector; obj:TSelectorConstraint; begin selA := ClassA.CreateSelector('unCodeA=%1','unCodeA',True,[iCodeA]); obj := selA.AddConstraint(nil, 'ClassB','oid','refB','unCodeB=%1',[iCodeB]); // obj.Name='S1' Result := selA.Count; end;
Cette contrainte va générer le code SQL suivant :
select * from CLASSA t0 join CLASSB t1 on (t1.oid=t0.refB) and (unCodeB='iCodeB')
Voir aussi :