InQueueMessage (TdbfMessageBox)

De Wiki1000
Version du 13 juillet 2011 à 09:09 par Syfre (discuter | contributions)
(diff) ← Version précédente | Voir la version courante (diff) | Version suivante → (diff)
procedure CreateMessage(const iTopic,iSubject,iBody:string; iRefObject:TitObject);

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
Info-20px.png Note : cette procédure gère la transaction

Exemple :

//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;

Voir aussi :

TdbfMessageBox (bam)Développement DSM

Outils personnels