begin process at 2010 02 10 03:43:32
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Composants

 > METTEZ DES FEUX TRICOLORES DANS VOS APPLICATIONS

METTEZ DES FEUX TRICOLORES DANS VOS APPLICATIONS


 Information sur la source

Note :
7 / 10 - par 1 personne
7,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Composants Classé sous :feu, tricolore, circulation Niveau :Débutant Date de création :27/06/2004 Date de mise à jour :27/06/2004 22:45:24 Vu / téléchargé :6 141 / 709

Auteur : grandvizir

Ecrire un message privé
Site perso
Commentaire sur cette source (6)
Ajouter un commentaire et/ou une note

 Description

Cliquez pour voir la capture en taille normale
C'est un composant qui affiche un feu tricolore dans ses 4 états: rouge, orange, vert et éteint. Cette gestion se fait par une seule propriété : State. On peut utiliser les procédures Do??? pour activer un feu, et les fonctions Is??? afin de savoir si un état est actif. Si Enabled=false, l'activation d'un feu est impossible.

Pour l'installation du fichier:
   1) Soit on crée un paquet (Fichier >Nouveau >Nouveau Paquet >Enregistrer le .DPK), soit on en ouvre un déjà existant.
   2) Bouton >Ajouter...
   3) Sélectionner mon fichier PAS
   4) >Compiler, et >Installer si nécessaire.
   5) Le composant apparaît par défaut dans l'onglet "Supplément"


 Conclusion

Vous pouvez toujours aller voir http://altert.family.free.fr/

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

RÉCUPÉRER LE KBID DES PATCHS CORRECTIFS INSTALLÉS SUR UNE MA...
Source avec Zip INFORMATIONS POUSSÉES SUR UNE PAGE D'UN TWEBBROWSER
Source avec Zip CORRECTEUR ORTHOGRAPHIQUE EN DIRECT
CODE DE HAMMING (4,8) : TRANSMISSION DE DONNÉES SANS ERREUR ...
MODIFIER L'HORLOGE DU SYSTÈME D'EXPLOITATION

 Sources de la même categorie

Source avec Zip Source avec une capture TQGRID UN STRINGGRID AMÉLIORER. par yanb
Source avec Zip DYNAMIC LIBRARY LOADER CLASS: GAGNEZ DU TEMPS POUR CHARGER L... par f0xi
Source avec Zip Source avec une capture COMPOSANTS NDSOFT par diglas
Source avec Zip Source avec une capture GESTION DES "CRASHS D'APPLICATION" par Bacterius
Source avec Zip COMPOSANT TTHRESCOLLECTION par ThWilliam

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture MESSAGE EN FEU D'ARTIFICE par barbichette
Source avec Zip Source avec une capture EFFET DE FEU par fbalien

Commentaires et avis

Commentaire de carmenca le 19/07/2004 00:35:26

Bonjour

G installé le code, il me met :
[Erreur] TrafficLight.pas(158): Identificateur non déclaré : 'NULL'  à cette ligne :
//RECHARGEMENT DE LA RESSOURCE: on est obligé à cause de l'effet de transparence
      if FBmp.Handle<>NULL then FBmp.ReleaseHandle;

je ne peux allé plus loin

Commentaire de grandvizir le 20/07/2004 20:57:30

Le NULL marchait dans Delphi 3. Admettons qu'on peut remplacer par: if not (FBmp.Handle>0) then ...

Je dis ça car j'ai un doute: Handle=0 ou Handle=-1. Je penserai plutôt à la première solution !

Je regarderai dans les sources ce que donne NULL...

Commentaire de grandvizir le 20/07/2004 21:03:52

J'ai une remarque supplémentaire. Pour avoir un effet de transparence, il faudrait utiliser la fonction BltBtn, que je ne connais et pour cause car je ne l'ai jamais utilisé. Par ailleurs, il faut que le composant accepte d'être transparent. Si je me rappelle bien, il faut qu'il hérite de class(TGraphicControl) et qu'il ait une propriété dans ControlStyle initialisée dans l'évènement OnCreate. Voir l'aide de Delphi...

Je n'ai pas implémenté cette fonction, car pour l'usage que j'ai fait du composant, ce n'était pas nécessaire... voire inutile.

Commentaire de grandvizir le 24/07/2004 22:39:40

J'ai regardé la déclaration de NULL dans le fichier System.pas et on visualise:
> Null: Variant; { Null standard constant }

Par ailleurs, dans ma remarque pré-précédente, il faut supprimer le NOT. C'est une étourderie désormais corrigée. On ne vide pas une image, s'il n'y en a pas. Cependant avec le NULL (qui reste dans le ZIP), tout marche comme il faut.

Et même, je dirais: y'a pas besoin de condition. On vire le "if ... then". Delphi est bien fait...

Commentaire de solda39 le 19/03/2009 09:54:40

salut, svp aide moi je suis un débutant dans l'etude de pic et il y a un projet de feux tricolores avec pic19f84 par langage assembleur avec mblab et merci a l'avance

Commentaire de solda39 le 19/03/2009 09:59:53

pardent  mon pic 16f84

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Principe de circulation d'infos [ par BiSi ] Je souhaite effectuer un "chat vocal" ou presque.Quelqu'un peut-il m'expliquer la meilleure facon de faire circuler les infos sonores entre le serveur pare feu embetant .... [ par cyber37 ] Salut a tous,Ma spetialiter dans la programation c'est les applications client/serveur (que sa soit un chat, un programe pour transferer des fichier,


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,842 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales