SetReplyFlag (TdbfMessage)

Syfre (discuter | contributions)
(Page créée avec « <source lang='delphi'>function SetReplyFlag(const iBox:string; value:boolean):Boolean;</source> Cette fonction marque un message répondu pour une boîte donnée. {|class="… »)

---

Version actuelle en date du 13 décembre 2011 à 14:25

function SetReplyFlag(const iBox:string; value:boolean):Boolean;

Cette fonction marque un message répondu pour une boîte donnée.

Result	True si le message est associé à cette boîte.
iBox	Boîte ayant reçu le message.
Value	Valeur du nouveau marqueur.

Note : Cette méthode gère la transaction courante.

Note : Cet indicateur est automatiquement positionné : lorsque l'utilisateur répond au message Par la fonction CreateAnswer

Exemple :

function ReplyMessage(const iBox:string):boolean;
var box:TdbfMessageBox; msg:TdbfMessage;
begin
  // Set reply flag on the first message of a box.
  Result := False;
  box := TdbfMessageBox.FindBox(iBox);
  if Assigned(box) then
   begin
     if box.dbfMessages.Count<>0 then
      begin
        msg := box.dbfMessages[0];
        Result := msg.SetReplyFlag(iBox,True);
      end;
   end;
end;

• SetReadFlag

— TdbfMessage (class) — Développement DSM —