« RefObject (TdbfMessage) » : différence entre les versions
Aucun résumé des modifications |
Aucun résumé des modifications |
||
| Ligne 11 : | Ligne 11 : | ||
begin | begin | ||
msg := box.CreateMessage('Some subject in a queue','Some content', nil); | msg := box.CreateMessage('Some subject in a queue','Some content', nil); | ||
msg.refObject | msg.refObject := self; | ||
msg.queueTopic := 'topic1'; | msg.queueTopic := 'topic1'; | ||
// | // | ||
Dernière version du 12 juillet 2011 à 15:10
<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 être utilisé pour rattacher le message à un objet métier de l'application.
Exemple : <source lang='delphi'> 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; </source>
{{#if:TdbfMessage (class)|
{{#if:TdbfMessage (class)|— TdbfMessage (class) |}} — Développement DSM —
|
{{#if:|— [[{{{1}}}]] |}} — Développement DSM —
}}