DeleteSendMessages (TdbfMessageBox)
De Wiki1000
(Différences entre les versions)
(Page créée avec « <source lang='delphi'>procedure DeleteSendMessages(iSince:TDatetime);</source> Cette procédure supprime les messages envoyés par cette antérieurs depuis une certaine date… ») |
|||
| (Une révision intermédiaire par un utilisateur est masquée) | |||
| Ligne 1 : | Ligne 1 : | ||
<source lang='delphi'>procedure DeleteSendMessages(iSince:TDatetime);</source> | <source lang='delphi'>procedure DeleteSendMessages(iSince:TDatetime);</source> | ||
| − | Cette procédure supprime les messages envoyés par cette antérieurs | + | Cette procédure supprime les messages envoyés par cette boîte antérieurs à une certaine date. |
{|class="wikitable" | {|class="wikitable" | ||
| Ligne 11 : | Ligne 11 : | ||
Exemple | Exemple | ||
<source lang='delphi'> | <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> | </source> | ||
| − | Voir aussi | + | Voir aussi : |
| + | |||
| + | * [[DeleteMessages (TdbfMessageBox)|DeleteMessages]] | ||
{{Footer|TdbfMessageBox (bam)}} | {{Footer|TdbfMessageBox (bam)}} | ||
[[category:TdbfMessageBox]] | [[category:TdbfMessageBox]] | ||
Version actuelle en date du 24 novembre 2011 à 09:46
procedure DeleteSendMessages(iSince:TDatetime);
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
var box:TdbfMessageBox; begin box := TdbfMessageBox.Find('Name=%1','',True,['mybox']); if Assigned(box) then begin box.DeleteSendMessages(Now); end; end;
Voir aussi :
| Whos here now: Members 0 Guests 1 Bots & Crawlers 0 |
