TdbfAttachementDescriptor (class)

De Wiki1000
(Différences entre les versions)
(Méthodes)
Ligne 45 : Ligne 45 :
  
 
Voir aussi :
 
Voir aussi :
 +
 +
Exemple : Envoi d'un message avec pièces jointes
 +
 +
<source lang="delphi">
 +
//Procedure SendMessageWithattachements;
 +
var box:TdbfMessageBox; desc:TdbfAttachementDescriptor; lsa:TdbfAttachementDescriptorList;
 +
begin
 +
  box := TdbfMessageBox.FindBox('mybox');
 +
  if Assigned(box) then
 +
  begin
 +
    lsa := TdbfAttachementDescriptor.CreateList;
 +
    //
 +
    desc := TdbfAttachementDescriptor.Create;
 +
    desc.Document := 'd:\Mes documents\Mes images\gourbeyre.jpg';
 +
    lsa.AddRef(desc);
 +
    //
 +
    desc := TdbfAttachementDescriptor.Create;
 +
    desc.Caption := 'avatar';
 +
    desc.Content.LoadFromFile('d:\Mes documents\Mes images\sage-avatar.jpg');
 +
    desc.SetDocumentTypeByExtension('.jpg');
 +
    lsa.AddRef(desc);
 +
    //
 +
    box.SendMessageTo('box1;box2','Some subject','Some content', lsa);
 +
  end;
 +
end;
 +
</source>
  
 
{{Footer|Boites à messages (api)}}
 
{{Footer|Boites à messages (api)}}
 
[[category:Classes frameworks]]
 
[[category:Classes frameworks]]
 
[[category:Boîtes à messages]]
 
[[category:Boîtes à messages]]

Version du 12 juillet 2011 à 09:11

Sommaire

Introduction

La classe TdbfAttachementDescriptor est une classe non persistante utilisée pour décrire un document rattaché à un message (BAM).

Attributs

DocumentType Référence vers le type du document.
Attachement Référence vers la pièce jointe
Document Document à rattacher
Content Contenu du document à rattacher
DocumentPath Chemin du document si celui-ci est un fichier
DocumentFileName Nom du document si celui-ci est un fichier
isFile le document est un fichier
isURL le document est une URL

Méthodes

SetDocumentTypeByExtension Positionne le type du document

Méthodes de classe

Voir aussi :

Exemple : Envoi d'un message avec pièces jointes

//Procedure SendMessageWithattachements;
var box:TdbfMessageBox; desc:TdbfAttachementDescriptor; lsa:TdbfAttachementDescriptorList;
begin
  box := TdbfMessageBox.FindBox('mybox');
  if Assigned(box) then
   begin
     lsa := TdbfAttachementDescriptor.CreateList;
     //
     desc := TdbfAttachementDescriptor.Create;
     desc.Document := 'd:\Mes documents\Mes images\gourbeyre.jpg';
     lsa.AddRef(desc);
     //
     desc := TdbfAttachementDescriptor.Create;
     desc.Caption := 'avatar';
     desc.Content.LoadFromFile('d:\Mes documents\Mes images\sage-avatar.jpg');
     desc.SetDocumentTypeByExtension('.jpg');
     lsa.AddRef(desc);
     //
     box.SendMessageTo('box1;box2','Some subject','Some content', lsa);
   end;
end;

Boites à messages (api)Développement DSM

Outils personnels