InQueueMessage (TdbfMessageBox)
<source lang='delphi'>procedure CreateMessage(const iTopic,iSubject,iBody:string; iRefObject:TitObject);</source>
Cette procédure crée un message et l'insère dans une queue.
| iTopic | Nom de file d'attente |
| iSubject | Sujet du message |
| iBody | Contenu du message |
| iRefObject | Objet référence |
|
Note : cette procédure gère la transaction |
Exemple :
<source lang='delphi'> //Procedure inQueueMessage; var msg:TdbfMessage; box1,box:TdbfMessageBox; begin
box := TdbfMessageBox.FindBox('mybox');
if Assigned(box) then
begin
box.InqueueMessage('queueName','subject','some body text',self);
end;
end; </source>
Voir aussi :
{{#if:TdbfMessageBox (bam)|
{{#if:TdbfMessageBox (bam)|— TdbfMessageBox (bam) |}} — Développement DSM —
|
{{#if:|— [[{{{1}}}]] |}} — Développement DSM —
}}