IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Langage Delphi Discussion :

Modifier la police d'une "hint"


Sujet :

Langage Delphi

  1. #1
    Candidat au Club
    Profil pro
    Inscrit en
    Juillet 2002
    Messages
    2
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2002
    Messages : 2
    Points : 2
    Points
    2
    Par défaut Modifier la police d'une "hint"
    Bonjour,
    existe-t-il une astuce permettant de modifier sous Delphi 5 la police d'une infobulle ?

  2. #2
    Expert éminent sénior

    Avatar de Nono40
    Homme Profil pro
    Ingénieur développement logiciels
    Inscrit en
    Mai 2002
    Messages
    8 640
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 57
    Localisation : France, Loir et Cher (Centre)

    Informations professionnelles :
    Activité : Ingénieur développement logiciels
    Secteur : Industrie

    Informations forums :
    Inscription : Mai 2002
    Messages : 8 640
    Points : 19 104
    Points
    19 104
    Par défaut
    Directement, non.

    Mais tu peux gérer toi-même le dessin des bulles d'aide 'hint' :
    http://nono40.developpez.com/sources/source0028.html

  3. #3
    Membre émérite
    Avatar de Merlin
    Homme Profil pro
    Conseil - Consultant en systèmes d'information
    Inscrit en
    Mars 2002
    Messages
    524
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Conseil - Consultant en systèmes d'information

    Informations forums :
    Inscription : Mars 2002
    Messages : 524
    Points : 2 883
    Points
    2 883
    Par défaut
    La méthode de nono est la bonne, par contre tu peux faire beaucoup plus court que l'exemple qu'il donne qui est lui complet. Si tu n'a besoin que de changer la fonte tu peux faire juste ça :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    Type
      TMyHintWindow = Class (THintWindow)
        Constructor Create (AOwner: TComponent); override;
      end;
     
    Constructor TMyHintWindow.Create (AOwner: TComponent); 
    begin
      Inherited Create (AOwner);
      Canvas.Font.Name := 'Courier New'; // FONTE
      Canvas.Font.Size := 72;
    end;
     
    // dans l'appli, fiche principale :
    procedure TForm1.FormCreate(Sender: TObject);
    begin
      Application.ShowHint := false;
      HintWindowClass := TMyHintWindow;
      Application.ShowHint := True;
    end;
    c'est la même chose mais en ne gardant que ce qui t'intéresse.

  4. #4
    Candidat au Club
    Profil pro
    Inscrit en
    Juillet 2002
    Messages
    2
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2002
    Messages : 2
    Points : 2
    Points
    2
    Par défaut
    Merci à vous, ça marche.
    J'ai mis en œuvre avec succès la méthode de Merlin.

    Pour info, il s'agit de modifier les logiciels de géo présents sur cette page http://perso.wanadoo.fr/pedagologic/pages/logiciels.htm afin qu'ils soient utilisables par des élèves malvoyants.
    Bonne journée

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Comment modifier la police d'une chaine de caractère dans un tableau excel ?
    Par cle.mentito dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 07/03/2015, 23h11
  2. [Lazarus] Dans un DBGrid, modifier la police d'une ligne en fonction d'un champ
    Par Jon Shannow dans le forum Lazarus
    Réponses: 5
    Dernier message: 20/11/2014, 14h28
  3. Réponses: 5
    Dernier message: 15/04/2005, 14h22

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo