InQueueMessage (TdbfMessageBox)
De Wiki1000
Version du 13 juillet 2011 à 09:09 par Syfre (discuter | contributions)
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 |
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 :