begin process at 2010 02 10 05:01:52
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Composants

 > TEXTE GRAPHIQUE AVEC CONTOUR, OMBRE ET TEXTURE EN API VERSION COMPOSANT

TEXTE GRAPHIQUE AVEC CONTOUR, OMBRE ET TEXTURE EN API VERSION COMPOSANT


 Information sur la source

Note :
10 / 10 - par 3 personnes
10,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Composants Classé sous :DrawState, texture, ombre, fxLabel Niveau :Débutant Date de création :19/06/2008 Date de mise à jour :22/06/2008 18:54:00 Vu / téléchargé :2 966 / 243

Auteur : cirec

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

 Description

Cliquez pour voir la capture en taille normale
Comme demandé ... voici la version composant

On prend les mêmes et on recommence ... avec quelques petits changements Mais je vous laisse découvrir


je vous la livre brute (je peaufinerai un peut plus tard ... promis)

pour ceux qui voudraient tester le problème décrit sur le forum
il faut activer la ligne :
{.$Define UseGraphUtil}
en début d'unité fxLabels.pas, en retirant le point, avant de compiler et d'installer (Merci à Caribensila pour la procédure GetShadowColor (pour l'idée et pour celle de remplacement))

pour ceux qui voudraient compiler sans installer copier l'unité fxLabels.pas dans le répertoire de la démo et compilez le en ligne de commande "dcc32.exe fxDemo.dpr"

Sinon il y a l'exe pour les autres ^^


 Conclusion

Si vous avez des idées pour améliorer le composant ... il est tout jeune

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !
  •   Compo
    • fxLabelD7pkg.dpkTélécharger ce fichier [Réservé aux membres club]624 octets
    • fxLabelD7pkg.resTélécharger ce fichier [Réservé aux membres club]1 644 octets
    • fxLabels.dcrTélécharger ce fichier [Réservé aux membres club]2 168 octets
    • fxLabels.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier9 609 octets
    • ImgEffects.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier5 535 octets
  • fxDemo.dprTélécharger ce fichier [Réservé aux membres club]Voir ce fichier192 octets
  • fxDemo.ex_Télécharger ce fichier [Réservé aux membres club]483 840 octets
  • fxDemo.resTélécharger ce fichier [Réservé aux membres club]876 octets
  • UMain.dfmTélécharger ce fichier [Réservé aux membres club]243 436 octets
  • UMain.pasTélécharger ce fichier [Réservé aux membres club]Voir ce fichier1 081 octets

Télécharger le zip


 Historique

22 juin 2008 18:54:00 :
Ajout d'un AntiAliasing

 Sources du même auteur

Source avec Zip Source avec une capture BITMAP 32BITS INTÉGRÉ À LA VCL (TIMAGE, TPICTURE, TBITMAP, T...
Source avec Zip Source avec une capture [ASTUCE] COMMENT VOIR UN ITEM, D'UNE LISTBOX, TRONQUÉ DANS U...
Source avec Zip Source avec une capture TEXTE GRAPHIQUE AVEC CONTOUR, OMBRE ET TEXTURE EN API
Source avec Zip Source avec une capture ROTATION (RAPIDE) DE BITMAP (À 360°) EN PUR GDI
Source avec Zip Source avec une capture EFFETS ZOOM & MIROIR SUR BITMAP

 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 TEXTURE PACKER - OU COMMENT GÉRER UNE BANQUE DE TEXTURES FAC... par Bacterius
Source avec Zip Source avec une capture TEXTE GRAPHIQUE AVEC CONTOUR, OMBRE ET TEXTURE EN API par cirec
Source avec Zip GENERATEUR DE TEXTURE par aymenk

Commentaires et avis

Commentaire de Caribensila le 19/06/2008 21:03:24

('faut rendre à César...)   :)

Je tiens à préciser que la fonction de remplacement "GetShadowColor" n'est pas de moi!
Je l'ai trouvée qq part sur le Net et j'ignore qui l'a codée le premier, mais on lui dit merci.



Commentaire de cirec le 19/06/2008 21:22:53 administrateur CS

c'est vrai ... si il passe par ici ... Merci.

en attendant j'ai un peut modifié cette fonction pour
1° coller au plus près avec la fonction original
    surtout avec un fond noir.
2° pour l'accélérer un peut ^^

function GetShadowColor(BaseColor: TColor): TColor;
var rgbtResult: TRGBQuad ABSOLUTE Result;
begin
  Result := ColorToRGB(BaseColor);
  if Result = clBlack then
  begin
    Result := clWhite;
    Exit;
  end;
  Dec(rgbtResult.rgbRed, 64);
  Dec(rgbtResult.rgbGreen, 64);
  Dec(rgbtResult.rgbBlue, 64);
end;

sinon ça fonctionne ?

Commentaire de Caribensila le 19/06/2008 21:49:48

J'ai pas encore testé à cause du foot (y'a Mauricio qui joue!!!).
Mais si César passe par ici, il ne va pas reconnaître sa fonction, c'est sûr!  lol

Commentaire de cirec le 19/06/2008 22:45:26 administrateur CS

ben ça ma permis de trouver un bug donc voici la correction

function GetShadowColor(BaseColor: TColor): TColor;
var rgbtResult: TRGBQuad ABSOLUTE Result;
begin
  Result := ColorToRGB(BaseColor);
  with rgbtResult do
  begin
    if (rgbRed <= $34) and (rgbGreen <= $34) and (rgbBlue <= $34) then
    begin
      Result := clWhite;
      Exit;
    end;
    if  rgbRed > 63 then
      rgbRed := rgbRed - 64 //Dec(rgbRed, 64)
    else
      rgbRed := 0;

    if  rgbGreen > 63 then
      rgbGreen := rgbGreen - 64 //Dec(rgbGreen, 64)
    else
      rgbGreen := 0;

    if  rgbBlue > 63 then
      rgbBlue := rgbBlue - 64 //Dec(rgbBlue, 64)
    else
      rgbBlue := 0;
  end;
end;

celle-ci colle au maximum a l'originale (en apparence ^^)

Commentaire de jackalunion le 22/06/2008 01:51:37 10/10

10/10 Cirec

Commentaire de MAURICIO le 30/06/2008 17:23:40

Salut à tous,

en même temps, GetShadowColor() n' a rien de spécial et Forman ne me contredira pas je pense.

Alors, toujours pas de commentaire qui expliquerait comment ça marche et ça, je trouve dommage...


Je mets 10/10 pour l' effort d' en avoir fait un compo!

@cari: On a bien joué mais on s' est fait jeté: 246 occasions pour le Portugal contre 3 pour l' Allemagne, résultat final 3-2 !

A+

Commentaire de Jean-Pierre le 26/12/2008 19:52:44 10/10

Salut à tous,

Cirec, merci de ce beau cadeau, chapeau bas !

Il est vrai que la possibilité d'ajout d'une texture sublime cette création.  

Je note : 12/10  na  ;-)

@+

(D7 sous Vista Pr)

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Créer une ombre sous une forme [ par BXDS ] Bonjour ou bonsoirJe désire pouvoir créer une ombre sous une 'Form'.Comment faire sous delphi 5.0 pro sous win Me ou W2000 ?Merci à tousCordialement v application de texture dans un ttabsheet [ par teuzmanie ] bonjour Comment faire pour appliquer une texture en jpg a une ttabsheet, merci par avance Télécharger dans l'ombre... [ par Encore1ben ] Ch'sais le titre de ce sujet, pourrais être celui d'une série B de M6 Plus sérieusement, après plusieurs recherches, je n'ai pas réussi à trouver mon Debutant en openGL (texture d'un cube) [ par Lennemi ] J'ai réussis a mettre une texture a mon cube et elle apparait mais lorsque je compile le programme, le .exe affiche le cube sans texture, quel est la opengl et MIPMAP [ par Vin-s ] Bonjour à tous,J'utilise OpenGL depuis peu..... et un problème très con s'offre à moi: Cette ligne de "paramètrage" d'une texture est connue:glTexPara Comment mettre une ombre sous une form? [ par game50 ] Comment on fait pour mettre une ombre&nbsp;(style winXP)&nbsp;sous une form ?Je poss&#232;de delphi 6 personal. Textures avec GLScene [ par leobaillard ] Bnojour tout le monde ! J'ai commenc&#233; avec un pote la cr&#233;ation d'un jeui en 3D avec Photoshop, 3ds max 7 et 8, et Delphi. Mais eulement je m Glscene retrecir [ par Nicolas___ ] Salut , bon y a t-il moyen de diminuer ce code pu*** tremplin2.Material.Texture.Image.LoadFromFile('tremplin.bmp');tremplin3.Material.Texture.Image.Lo probleme texture [ par damienlann ] Salut,Je debute sous openGl et sous delphi, mais je pense avoir compris le principe general des deux.J'ai d&#233;ja fait des pg pour d&#233;buter qui


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,608 sec (4)

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