« ShareSocietyName (CM) » : différence entre les versions
(Page créée avec « {{latest}} <source lang='delphi'>property ShareSocietyName:string;</source> Propriété en '''lecture / écriture'''. * En lecture : :Retourne le nom du du périmètre ... ») |
Aucun résumé des modifications |
||
| Ligne 1 : | Ligne 1 : | ||
{{Version700}} | |||
{{ | |||
<source lang='delphi'>property ShareSocietyName:string;</source> | <source lang='delphi'>property ShareSocietyName:string;</source> | ||
Version du 13 janvier 2015 à 09:47
property ShareSocietyName:string;
Propriété en lecture / écriture.
- En lecture :
- Retourne le nom du 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);}
va aName:string;
var
begin
if not ClassManager.ShareEnable then Exit;
//
aName := GetSocietyNameFromSomewhere();
//
ClassManager.PushShareContext;
try
ClassManager.ShareRestitutionMode := False;
ClassManager.ShareSocietyName := aName;
shwoMessage(Format('Current society, Name:%s OID:%s',[ClassManager.ShareSocietyName,ClassManager.ShareSociety]));
....
finally
ClassManager.PopShareContext;
end;
end;
Voir aussi :