RefObject (TdbfMessage)

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;

— TdbfMessage (class) — Développement DSM —