begin process at 2010 02 10 08:54:13
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Composants

 > TGRAPHICGAUGE C'EST PLUS BEAU

TGRAPHICGAUGE C'EST PLUS BEAU


 Information sur la source

Note :
9,17 / 10 - par 6 personnes
9,17 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Composants Classé sous :tgauge, tcanvas, bitmap, dessin, paint Niveau :Débutant Date de création :06/05/2004 Date de mise à jour :15/03/2005 18:19:28 Vu / téléchargé :4 986 / 794

Auteur : Kenavo

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

 Description

Cliquez pour voir la capture en taille normale
Ceci est ma version du composant TGauge, rebaptisé TGraphicGauge, pour en faire des plus jolies (voir capture).
La Propriété Brush d'un TCanvas a une propriété Bitmap qui permet de dessiner autre chose que des couleurs simples.
Les bitmaps utilisés dans la démo on été créés avec un logiciel de dessin (Corel PhotoPaint) en utilisant les dégradés, ou avec Paint pixel par pixel mais c'est moins beau.
La largeur du GraphicGauge doit être adaptée à celle du bitmap choisi (sauf intention graphique particulière).
Les barres restent toutefois rectangulaires.
Comme c'est pompé sur TGauge, il n'y a pas beaucoup de commentaires, j'ai juste indiqué les modifs que j'y ai apportées.


 Conclusion

Suggestion : Ajouter des types de TGraphicGauge : gkHorizontalCenterBar, gkVerticalCursor ou autres ... quelqu'un a une idée ?

-- Mise à jour -- 10/05/2004 12:00
Ligne litigieuse retirée (voir commentaire ci-dessous)
Commentaires ajoutés au souce et mise à jour des réponses aux évènement souris (ça ne marchait que pour les gkHorizontal)
Nouveaux bitmaps (voir saisie)
-- Mise à jour -- 10/05/2004 12:05
Remis README.TXT dans le zip

 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


 Historique

15 mars 2005 18:19:29 :
Ajout de la propriété Comment. Ce texte est ajouté au pourcentage lorsque la propriété ShowText est vrair.

 Sources du même auteur

RÉELS ET RÉALITÉ
Source avec Zip Source avec une capture WEBCAM À MANIVELLE
Source avec Zip Source avec une capture ACQUISITION VIDEO (WEBCAM, TV CARDS ...)
Source avec Zip Source avec une capture IMAGE EN FOND DE PANEL
Source avec Zip LE RÉSEAU MICROSOFT - LES FONCTIONS WNET

 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 ANAGLYPHEUR OU COMMENT VOIR EN RELIEF LES STÉRÉOSCOPES ANCES... par jfs59
Source avec Zip Source avec une capture THREAD ET BITMAP (DESSIN AU CRAYON) par barbichette
Source avec Zip Source avec une capture PRÉ-COMPOSANT D'AFFICHAGE DE TEXTE PROGRESSIF... par blueperfect
Source avec Zip Source avec une capture PLGBLT ET LA ROTATION DE BITMAPS par Bacterius
Source avec Zip Source avec une capture DESSINER DES ENGRENAGES par ralebol

Commentaires et avis

Commentaire de Delphiprog le 06/05/2004 20:52:57 administrateur CS

Great job !
Un code propre clair et efficace comme on aimerait en voir à chaque fois.
10/10 sans hésitation.

Commentaire de Inekman le 07/05/2004 17:10:04

C'est absolument génial. C'est de l'excellent travail ça Kenavo.
Cependant il y'a une violation d'accès à l'exécution d'un programme qui contient le composant....et comme par hasard, ça ne le fait pas avec le projet "Demo" que tu fournis :p.

Inekman. 10/10

Commentaire de SiZiOUS le 08/05/2004 22:12:31

Magnifique !
Tout simplement.

Un beau 10/10 !

Commentaire de Kenavo le 10/05/2004 08:32:16

Salut,
Merci à tous !
Inekman, je vois pas pour ton erreur. Peux-tu préciser à quel moment ça t'arrive (localise en mode pas à pas si tu peux), il y a certainement une explication.
Kenavo

Commentaire de Kenavo le 10/05/2004 11:58:08

Oups !
En chassant le bug, j'ai trouvé un truc pas clair : l'utilisation dans le Create du composant de l'appel à la fonction AllocateHWnd  
FWindowHandle := AllocateHWnd( WndProc);
De là, deux choses
1 - Ca sert à rien ! (et je ne sais plus pourquoi j'avais mis ça. En fait, ça sert à obtenir un Handle pour un contrôle "non-windowed")
2 - Pas d'appel à DeAllocateHWnd -> Probable source d'une Runtime error 216 à la fermeture de Delphi
En comparant avec de source de TGauge, je me suis aussi aperçu que j'avais rajouté des réponses aux messages WM_LBUTTONDOWN et WM_MOUSEMOVE (pour se servir de la Gauge comme d'un TrackBar) et un évennement OnChange
Je modifie le source et je mets à jour (avec de nouveaux bitmaps)

Kenavo

Commentaire de Kenavo le 10/05/2004 16:43:54

Et re
En fait, ça ne devrait pas marcher, si on en croit l'aide Delphi sur la propriété Bitmap de TBrush. Seul l'image de 8 pixels sur 8 du haut gauche de l'image devrait être prise en compte pour le motif du pinceau , alors qu'en fait ... on peut utiliser n'importe quel format d'image.
Ceci n'est valable qu'avec la fonction FillRect, parce qu'avec la fonction Rectangle (qui dessine le contour en plus) on ne prend effectivement en compte que la région 8 x 8 pixels haut gauche du bitmap du pinceau !!!!
Quelqu'un a une explication ?

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

TCanvas et allocation de handle [ par Fandril ] Je crée pluseirs bitmap contenant des bitmap qui sont en fait des buffers de dessin.Ensuite j'utilise des API (stretchblt, transparentblt et bitblt) p dessin sur un bitmap [ par jlg75 ] J'ai commencé un petit prog de dessin pour mes débuts en DELPHI.Je dessine sur un bitmap (feuille blanche pour l'instant),chargé dans une TImage. J'ut Image dans une TStatusBar !!! [ par MAsterC ] Comment fait-on pour mettre un Tprogresbar et un petit dessin dans l'item TStatusBar ????POUR PLUS DE DÉTAILS ALLER VOIR DANS INTERNET EXPLORER EN BAS Convertir un bitmap en icone [ par sebastienbro ] J'aimerai savoir comment convertir un bitmap, contenu dans une Timage, en icone Convetir une imag en Bitmap [ par sebastienbro ] Je veux convertirune image en ICO, mais il me met une erreur : Image icône incorrectAidez moi !!!!! Ajouter OnKeyPress à un TPaintBox [ par jlg75 ] J'utilise un TPaintBox pour un programme de dessin, je voudrais qu'il réagisse à l'événement OnKeyPress (ou OnKeyDown) pour sortir de la fonction dess CreateParented et rafraichissement ... [ par almi ] Bonjour à tous,Je cherche à créer un ToolBox dans une application de dessin que je n'ai pas conçu.Pour ce faire, j'utilise la méthode CreateParented e Bitmap, tableau de stockage .... [ par dami ] Bonjour a tous. Pour les besoins d'OpenGL, j'ai besoin de transformer mon Jpeg en BMP puis de stocker le BMP sous forme de tableau. J'ai récupéré et a grille de dessin [ par ghassenus ] salut bein je suis débutant en delphi et je souhaite crééer une grille de dessin ( comme papier millimetré )je voudrait que le crayon de dessin ait un Contrôle de saisie d'un Bitmap [ par lugo ] Bonjour à tous,J'utilise ce bout de code pour contrôler si l'opérateur a bien faitune sélection d'une Bitmap et qu'elle est bien présente dans la pres


Nos sponsors


Sondage...

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,858 sec (3)

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