ShareSociety (CM)
De Wiki1000
(Différences entre les versions)
(Page créée avec « <source lang='delphi'>property ShareSociety:TOID;</source> Propriété en '''lecture écriture'''. Retourne l'OID du périmètre de partage de la société courante. '''Ex… ») |
|||
| Ligne 3 : | Ligne 3 : | ||
Propriété en '''lecture écriture'''. | Propriété en '''lecture écriture'''. | ||
| − | Retourne l'OID du périmètre de partage de la société courante. | + | * En lecture : |
| + | :Retourne l'OID du périmètre de partage de la société courante. | ||
| + | |||
| + | * En écriture : | ||
| + | :Positionne le contexte de partage de sorte que ce périmètre soit le périmètre courant de travail. | ||
| + | |||
| + | {{info|L'utilisateur doit avoir les droits d'accès sur le périmètre.}} | ||
'''Exemple :''' | '''Exemple :''' | ||
<source lang='delphi'> | <source lang='delphi'> | ||
| + | {Procedure _processThisPerimeter(aPerimeter:TOID);} | ||
| + | var | ||
begin | begin | ||
| + | if not ClassManager.ShareEnable then Exit; | ||
| + | // | ||
| + | ClassManager.PushShareContext; | ||
| + | try | ||
| + | ClassManager.ShareRestitutionMode := False; | ||
| + | ClassManager.ShareSociety := aPerimeter; | ||
| + | .... | ||
| + | finally | ||
| + | ClassManager.PopShareContext; | ||
| + | end; | ||
end; | end; | ||
</source> | </source> | ||
| + | |||
| + | Voir aussi : | ||
| + | |||
| + | *[[PushShareContext (CM)|PushShareContext]] | ||
{{Footer|Gestion du contexte de partage (CM)}} | {{Footer|Gestion du contexte de partage (CM)}} | ||
Version actuelle en date du 20 janvier 2010 à 14:22
property ShareSociety:TOID;
Propriété en lecture écriture.
- En lecture :
- Retourne l'OID du périmètre de partage de la société courante.
- En écriture :
- Positionne le contexte de partage de sorte que ce périmètre soit le périmètre courant de travail.
Exemple :
{Procedure _processThisPerimeter(aPerimeter:TOID);} var begin if not ClassManager.ShareEnable then Exit; // ClassManager.PushShareContext; try ClassManager.ShareRestitutionMode := False; ClassManager.ShareSociety := aPerimeter; .... finally ClassManager.PopShareContext; end; end;
Voir aussi :
| Whos here now: Members 0 Guests 0 Bots & Crawlers 1 |