« 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 |
||
| 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> | ||
Version du 11 juillet 2011 à 12:30
procedure DeleteSendMessages(iSince:TDatetime);
Cette procédure supprime les messages envoyés par cette antérieurs depuis 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