Composant : tdbppolicelog

Description

Hello :) ceci est mon neuvieme composant réalisé sous delphi 7

PoliceLog est mon plus utile composant et sera mis a jour encore. Il permet de
effectuer telle ou telle autre action sur 2 events :
OnLeDroit et OnPasLeDroit.
Prenons l'exemple de l'action "Close;" (fermer l'application).
Nous choisissons des horaires, des jours et meme deux dates. Le compo. va vérifier
si nous sommes bien pendant les jours autorisés, entre les deux dates (si remplies)
et si nous sommes dans un des créneaux horaire autorisés. Dans le cas de FALSE,
l'event OnPasLedroit réagi, ds cet event nous pouvons mettre "Close;" et
l'application se fermera car elle n'est pas autorisée a démarrer. On peut donc
facilement faire eteindre le PC si on a pas dans les horaires :)
Le tout peut etre loggé ds un fichier, un memo, une listbox, un richedit avec
ou sans TimeStamp avec numérotation de lignes ou pas. On peut donc aussi s'en
servir de simple logger de démarrage, extinction du PC en autorisant 100% du temps
de lancement mais en loggant tt de meme :) le timestamp nous renseignera.
Le seul soucis a ma connaissance est si la personne change la date et heure du PC avant
de devenir du OnPasLeDroit... bah ça marche :/ dois je ajouter une option qui
empecherai la modif de l'heure meme si admin ??? merci de commenter la source ds ce cas.
Mais bon ... imaginez vous modifier l'heure et date du pc juste pour lancer une appli ??

Source / Exemple :


procedure TDelphifr.Create(Sender TObject);
begin
  ShowMessage('in ze zip');
end;

Conclusion :


ameliorations ? bugs ? commentez la source

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.