DeleteSendMessages (TdbfMessageBox)

De Wiki1000

<source lang='delphi'>procedure DeleteSendMessages(iSince:TDatetime);</source>

Cette procédure supprime les messages envoyés par cette boîte antérieurs à une certaine date.

iSince La date d'antériorité des messages à supprimer.

Exemple <source lang='delphi'> var box:TdbfMessageBox; begin

 box := TdbfMessageBox.Find('Name=%1',,True,['mybox']);
 if Assigned(box) then
  begin
    box.DeleteSendMessages(Now);
  end;

end; </source>

Voir aussi :

{{#if:TdbfMessageBox (bam)|

{{#if:TdbfMessageBox (bam)|— TdbfMessageBox (bam) |}} — Développement DSM

|

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

}}