« InQueueMessage (TdbfMessageBox) » : différence entre les versions
(Page créée avec « <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 que… ») |
Aucun résumé des modifications |
||
| Ligne 1 : | Ligne 1 : | ||
<source lang='delphi'>procedure | <source lang='delphi'>procedure InQueueMessage(const iTopic,iSubject,iBody:string; iRefObject:TitObject; lsa:TdbfAttachementDescriptorList);</source> | ||
Cette procédure crée un message et l'insère dans une queue. | Cette procédure crée un message et l'insère dans une queue. | ||
| Ligne 16 : | Ligne 16 : | ||
|iRefObject | |iRefObject | ||
|Objet référence | |Objet référence | ||
|- | |||
|lsa | |||
|Liste de pièces jointes | |||
|} | |} | ||
| Ligne 29 : | Ligne 32 : | ||
if Assigned(box) then | if Assigned(box) then | ||
begin | begin | ||
box.InqueueMessage('queueName','subject','some body text',self); | box.InqueueMessage('queueName','subject','some body text',self,nil); | ||
end; | end; | ||
end; | end; | ||
Dernière version du 12 décembre 2011 à 10:53
<source lang='delphi'>procedure InQueueMessage(const iTopic,iSubject,iBody:string; iRefObject:TitObject; lsa:TdbfAttachementDescriptorList);</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 |
| lsa | Liste de pièces jointes |
|
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,nil);
end;
end; </source>
Voir aussi :
{{#if:TdbfMessageBox (bam)|
{{#if:TdbfMessageBox (bam)|— TdbfMessageBox (bam) |}} — Développement DSM —
|
{{#if:|— [[{{{1}}}]] |}} — Développement DSM —
}}