RefObject (TdbfMessage)
De Wiki1000
(Différences entre les versions)
(Page créée avec « <source lang='delphi'>property RefObject:TRefObject;</source> Propriété en '''lecture / écriture'''. Cette propriété contient une référence vers un objet, elle peut … ») |
|||
(Une révision intermédiaire par un utilisateur est masquée) | |||
Ligne 8 : | Ligne 8 : | ||
<source lang='delphi'> | <source lang='delphi'> | ||
begin | begin | ||
+ | withP transaction do | ||
+ | begin | ||
+ | msg := box.CreateMessage('Some subject in a queue','Some content', nil); | ||
+ | msg.refObject := self; | ||
+ | msg.queueTopic := 'topic1'; | ||
+ | // | ||
+ | box1 := TdbfMessageBox.FindBox('box1'); | ||
+ | if Assigned(box1) then box1.AttachMessage(msg); | ||
+ | end; | ||
end; | end; | ||
</source> | </source> |
Version actuelle en date du 12 juillet 2011 à 17:10
property RefObject:TRefObject;
Propriété en lecture / écriture.
Cette propriété contient une référence vers un objet, elle peut être utilisé pour rattacher le message à un objet métier de l'application.
Exemple :
begin withP transaction do begin msg := box.CreateMessage('Some subject in a queue','Some content', nil); msg.refObject := self; msg.queueTopic := 'topic1'; // box1 := TdbfMessageBox.FindBox('box1'); if Assigned(box1) then box1.AttachMessage(msg); end; end;