OnChangeEventId (class)
De Wiki1000
(Différences entre les versions)
| Ligne 2 : | Ligne 2 : | ||
<source lang='delphi'>class function OnChangeEventID(const iProperty:string; const iOldValue:variant; const iNewValue:variant):string;</source> | <source lang='delphi'>class function OnChangeEventID(const iProperty:string; const iOldValue:variant; const iNewValue:variant):string;</source> | ||
| − | + | Retourne l'identifiant de l'évènement de modification d'un attribut d'un objet de cette classe. | |
{|class="wikitable" | {|class="wikitable" | ||
Version actuelle en date du 9 janvier 2026 à 14:41
(Version 11)
class function OnChangeEventID(const iProperty:string; const iOldValue:variant; const iNewValue:variant):string;
Retourne l'identifiant de l'évènement de modification d'un attribut d'un objet de cette classe.
| iProperty | Nom de l'attribut |
| oldValue | Ancienne valeur de l'attribut |
| newValue | Nouvelle valeur de l'attribut |
| Return | L'identifiant de l'évènement |
|
Tip : La valeur NULL peut être utilisée pour indiquer "toute valeur" |
Exemple :
//function TTestTask.doExecute(obj:TitObject):boolean; begin if obj is WFClasseA then begin //.... do something Result := True; end else Result := False; end; //function TTestTask.Execute:boolean; var aMsg:TdbmQueueMessage; begin Result := False; aMsg := ReceivedMsg as TdbmQueueMessage; if Assigned(aMsg) then begin if Assigned(SourceObject) then begin Result := doExecute(SourceObject); end; end; end; //Procedure TestRegisterTasks; begin WFClasseA.RegisterOnChangeEvent('unEtat'); TTestTask.Subscribe(WFClasseA.OnChangeEventId('unEtat',NULL {NULL means any value} ,WFCAState_Etat2),['unCode','unEntier'],['X',2]); end;
Voir aussi :
| Whos here now: Members 0 Guests 0 Bots & Crawlers 1 |
