CreateMessage (TdbfMessageBox) - Historique des versions

Syfre le 12 juillet 2011 à 11:44

2011-07-12T11:44:25Z

Syfre le 12 juillet 2011 à 09:18

2011-07-12T09:18:57Z

Syfre : Page créée avec « function CreateMessage(const iSubject,iBody:string; lsa:TdbfAttachementDescriptorList):TdbfMessage; Cette procédure crée un message. {|clas… »

2011-07-12T09:18:28Z

Page créée avec « <source lang='delphi'>function CreateMessage(const iSubject,iBody:string; lsa:TdbfAttachementDescriptorList):TdbfMessage;</source> Cette procédure crée un message. {|clas… »

Nouvelle page

<source lang='delphi'>function CreateMessage(const iSubject,iBody:string; lsa:TdbfAttachementDescriptorList):TdbfMessage;</source>

Cette procédure crée un message.

{|class="wikitable"
|-
|Result
|Un objet TdbfMessage
|-
|iSubject
|Sujet du message
|-
|iBody
|Contenu du message
|-
|lsa
|Liste des attachements
|}

Exemple
<source lang='delphi'>
//Procedure CreateMessage;
var msg:TdbfMessage; box1,box:TdbfMessageBox;
begin
box := TdbfMessageBox.FindBox('mybox');
if Assigned(box) then
begin
withP transaction do
begin
// From
msg := box.CreateMessage('Some subject in a queue','Some content', nil);
msg.queueTopic := 'topic1';
// To
box1 := TdbfMessageBox.FindBox('box1');
if Assigned(box1) then box1.AttachMessage(msg);
end;
end;
end;</source>

Voir aussi :

* [[AttachMessage_(TdbfMessageBox)|Rattachement d'un message]]
* [[SendMessageTo_(TdbfMessageBox)|Envoi d'un message]]

{{Footer|TdbfMessageBox (bam)}}
[[category:TdbfMessageBox]]

@@ Ligne 18 : / Ligne 18 : @@
 |}
-Exemple
+Exemple : Envoi d'un message
 <source lang='delphi'>
 //Procedure CreateMessage;
@@ Ligne 36 : / Ligne 36 : @@
        end;
     end;
-end;</source>
+end;
 Voir aussi :

@@ Ligne 1 : / Ligne 1 : @@
 <source lang='delphi'>function CreateMessage(const iSubject,iBody:string; lsa:TdbfAttachementDescriptorList):TdbfMessage;</source>
-Cette procédure crée un message.
+Cette procédure crée un message dont l'expéditeur est la boîte.
 {|class="wikitable"