« DeleteSendMessages (TdbfMessageBox) » : différence 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… ») |
Aucun résumé des modifications |
||
| (Une version intermédiaire par le même utilisateur non affiché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]] | ||
Dernière version du 24 novembre 2011 à 07:46
<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 —
}}