« TdbfAttachementDescriptor (class) » : différence entre les versions

De Wiki1000
Aucun résumé des modifications
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 à 08:11

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

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

{{#if:Boites à messages (api)|

{{#if:Boites à messages (api)|— Boites à messages (api) |}} — Développement DSM

|

{{#if:|— [[{{{1}}}]] |}} — Développement DSM

}}