Inverser du texte dans un bitmap - Archives / Graphique, Delphi

CodeS-SourceS est hébergé par Frontier.fr

Ce site au démarrage

AccueilCodesTutorielsForumsEmploiLivresConnexion

begin process at 2009 01 09 12:26:49

ESSAYEZ WINDOWS 7 GRATUITEMENT DèS DEMAIN par fabien

LUCENE - IGNORER LES ACCENTS LORS DE L'INDEXATION ET LA RECHERCHE | IGNORE DIACRITICS par cyril

MESH OBJECTS BROWSER - MOB 1.0 SUR CODEPLEX par redo

MICROSOFT TAG par khamlon

[LINQTOSQL] REQUêTES ASYNCHRONES SIMULTANéES par NeuroCypher

RE : QUI C'EST QUI A 50 ANS ??? par Delphiprog

SéLECTION DANS LA LISTE D'UN CXDBLOOKUPCOMBO par jeje2

DELPHI & TELEPHONE par nassim_2005

RE : CHANGEMENT DE DATE par hainlesgens

RE : RéCUPéRER LA IES COMPOSANTS INTERBASE DANS LA VCL SOUS DELPHI 3 par Technix59

+ de logiciels à télécharger

1 330 759 membres
212 nouveaux aujourd'hui
14 644 membres club

Trouver une ressource

Trouvez une ressource parmi 39 264 codes, 1 223 393 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Poser une question

Sujet : Inverser du texte dans un bitmap [ Archives / Graphique ] (apophys)

Informations & options pour cette discussion

Vous êtes ici : Thèmes / Archive Delphi / Archives / Graphique / Inverser du texte dans un bitmap
Ce sujet vous interesse ? Cliquez ici pour être averti quand il y a une nouvelle réponse

samedi 1 avril 2006 à 14:21:47 | Inverser du texte dans un bitmap

apophys	Bonjour, J'ai un texte dans une image ecris a l'aide de canvas.TexTOut , je souhaire lorsque que l'on pas la souris de faire comme un rectangle de selection. par exemple que le texte s'inverse lorsque que la souris est dessus. Comment puis-je inverser le texte ? ou comment mettre un rectangle de selection avec une couleur sans que le texte soit effacer ? Merci de votre aide.
	Rép. MP 1 msg

samedi 1 avril 2006 à 19:32:21 | Re : Inverser du texte dans un bitmap

f0xi

uses Types;

var
TxtRect   : TRect = (left : 10; top : 10; right : 70; bottom : 16);
    nTxtColor : TColor = $000000; {clBlack}
    iTxtColor : TColor = $0000FF; {clRed}
    TxtR      : boolean = false;
    OldR      : boolean = false;
    TxtText   : string = 'Hello!';

procedure TForm1.Image1MouseMove(Sender : TObject; X,Y : integer ...);
var TCol, GCol : TColor;
begin
// on test si le curseur est dans la zone du texte
TxtR := Types.PtInRect(TxtRect,Point(X,Y));

// si oui on selectionne la couleur "over"
// sinon on selectionne la couleur normale
if TxtR then begin
     TCol := iTxtColor;
end else begin
     TCol := nTxtColor;
end;

// si l'etat a changé
if TxtR <> OldR then begin
   with image1.picture.bitmap.canvas do begin
      // on efface la zone de texte
          FillRect(TxtRect);
          // on applique la couleur
          Pen.Color   := TCol;
          font.color := TCol;
          // on dessine le texte dans sa zone
          TextRect(TxtRect, 0, 0, TxtText);
     end;
end;

// on sauvegarde l'ancien etat pour le prochain passage
OldR := TxtR;
end;

Cette discussion est classé dans : aide, texte, souris, bitmap, inverser

Répondre à ce message

Sujets en rapport avec ce message

Aide pour un éditeur de Texte ! dans un richedit. [ par nirousse ] Je désire ouvrir des fichiers texte avec mon logiciel.Mais, je ne sais pas comment je dois faire pour ouvrir l'un après l'autre les fichiers.Une boucl BESOIN D'AIDE !!!!!!!!!!!!!!!!! [ par mentral ] Bonjour, c'est encore moi. Voilà. J'aimerais savoir s'il est possible de "fusionner" un fichier texte type notepad au sein d'un fichier .exe, afin d'é copier coller. A l'aide j'en ai marre. [ par ludopika ] J'ai un gros soucis ca fait plus d'une semaine que je travaille dessus et que je tourne en rond.J'ai un richtext ou un webbrowser (je peux avoir les d soulignemet de texte sur une bitmap [ par ahmed12 ] Je voudrais savoir comment je peux dessiner une ligne qui fait souligner et suit la lecture de texte contenant dans une image bitmap dans une appli inverse video [ par freakstreet ] J'essaie de dessiner un barGraph avec à l'intérieur un texte écrit. Je trace mon bord et ma barre de progression dans un canvas, j'écris le texte da Changer la couleur d'un texte au passage de la souris [ par mathieu49 ] Bonjours à tous, j'aimerais savoir comment modifier l'aspect d'un texte au passage de la souris mais sans avoir à cliquer dessus. Merci besoin d'aide INTERNET [ par ssd ] Je voudrais savoir si il est possible de :1 - Remplir un champ texte d'une page internet qui n'est pas sur mon serveur mais dont je connais le nom, g Aide pour recherche dans PDF [ par bremer ] Bonjour,J'ai besoin d'un gros coup de main sur un projet PDF.But du projet : Récupération du texte dans un PDF à partir d'une zone rectangulaire (Méth Aide sur les Ressources [ par moldov ] Bonjour a tous, Je vous expose le probleme, j'ai une appli qui va cherche des informations dans un fichier texte, jusqu'a la pas de probleme, mais besoin d'aide pour windev [ par talama ] bonjour,voilà je dois développer une application en windev pour gérer la gestion des congés des employés, je dois pour cela récupérer un fichier texte