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

API, COM et SDKs Delphi Discussion :

Inclure un type de police spécial dans un projet


Sujet :

API, COM et SDKs Delphi

  1. #1
    Futur Membre du Club
    Homme Profil pro
    Inscrit en
    Avril 2003
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Avril 2003
    Messages : 8
    Points : 7
    Points
    7
    Par défaut Inclure un type de police spécial dans un projet
    Salut,

    Petite question à la con:

    Je développe une application utilisant un type de police non inclu par défaut dans windows.

    Comment faire pour inclure directement la police en question dans mon projet pour pouvoir le transporter.

    A+

  2. #2
    Membre habitué

    Profil pro
    Inscrit en
    Avril 2002
    Messages
    99
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2002
    Messages : 99
    Points : 126
    Points
    126
    Par défaut
    Slt,

    le plus simple est de la coller dans Windows(Winnt)/fonts lors de l'installation...
    A+---------------> Nat <-------------------

  3. #3
    Futur Membre du Club
    Homme Profil pro
    Inscrit en
    Avril 2003
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Avril 2003
    Messages : 8
    Points : 7
    Points
    7
    Par défaut
    Il n'y donc aucun moyen avec Delphi pour que cela se fasse automatiquement ?

  4. #4
    Nouveau membre du Club
    Profil pro
    Directeur
    Inscrit en
    Avril 2003
    Messages
    34
    Détails du profil
    Informations personnelles :
    Localisation : France, Essonne (Île de France)

    Informations professionnelles :
    Activité : Directeur

    Informations forums :
    Inscription : Avril 2003
    Messages : 34
    Points : 32
    Points
    32
    Par défaut
    Je crois avoir lu quelque part mais c'est à vérifier que tue peux mettre directement une police de caractère dans le même répertoire que ton exe, et seuls les exe de ce répretoire y ont acces. ( je ne l'ai jamais essayé). Si ça marche mer ci de me le dire

  5. #5
    Expert éminent
    Avatar de Lung
    Profil pro
    Analyste-programmeur
    Inscrit en
    Mai 2002
    Messages
    2 664
    Détails du profil
    Informations personnelles :
    Âge : 43
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Analyste-programmeur
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Mai 2002
    Messages : 2 664
    Points : 6 967
    Points
    6 967
    Par défaut
    Mets ta police en ressource !
    J'ai trouvé ca :
    Tu mets tes fichiers polices avec ton application et dans OnCreate tu mets :
    Code:

    procedure TForm1.FormCreate(Sender: TObject);
    var haFont : HFONT;
    WinTempDir : PChar;
    begin
    GetMem(WinTempDir,255);
    GetTempPath(255,WinTempDir);
    GetTempFileName(WinTempDir,'Xdf',3,FileNameTemp);
    CreateScalableFontResource(0,FileNameTemp,'lhandw.ttf',nil);
    AddFontResource(FileNameTemp);//Lucida Handwriting
    haFont:=CreateFont (18,7,0,0,FW_NORMAL,0,0,0,ANSI_CHARSET,OUT_DEFAULT_PRECIS,
    CLIP_DEFAULT_PRECIS,DEFAULT_QUALITY,DEFAULT_PITCH or FF_ROMAN,
    'Lucida Handwriting');
    Label1.Font.Handle:=haFont;
    Label4.Font.Handle:=haFont;
    Label5.Font.Handle:=haFont;
    haFont:=CreateFont (46,20,0,0,FW_NORMAL,0,0,0,ANSI_CHARSET,OUT_DEFAULT_PRECIS,
    CLIP_DEFAULT_PRECIS,DEFAULT_QUALITY,DEFAULT_PITCH or FF_ROMAN,
    'Lucida Handwriting');
    RxLabel1.Font.Handle:=haFont;
    RxLabel2.Font.Handle:=haFont;
    end;


    Puis dans le OnClose
    Code:
    RemoveFontResource(FileNameTemp);
    DeleteFile(FileNameTemp);
    SendMessage(HWND_BROADCAST,WM_FONTCHANGE,0,0);


    Avec
    Code:
    FileNameTemp : Array[0..1024] of Char;

    Comme variale global.

    Ici j'utilise du Lucida Handwriting du fichier 'lhandw.ttf' dans des TRxLabel (idem TLabel).
    Mais, sauf si c'est pour un programme qui est par exemple sur un CD, il est préférable d'installer les polices avec ton application.
    L'urgent est fait, l'impossible est en cours, pour les miracles prévoir un délai. ___ Écrivez dans un français correct !!

    C++Builder 5 - Delphi 6#2 Entreprise - Delphi 2007 Entreprise - Delphi 2010 Architecte - Delphi XE Entreprise - Delphi XE7 Entreprise - Delphi 10 Entreprise - Delphi 10.3.2 Entreprise - Delphi 10.4.2 Entreprise - Delphi 11.1 Entreprise
    OpenGL 2.1 - Oracle 10g - Paradox - Interbase (XE) - PostgreSQL (15.4)

  6. #6
    Membre chevronné
    Avatar de Clorish
    Profil pro
    Inscrit en
    Juin 2003
    Messages
    2 474
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 2 474
    Points : 2 158
    Points
    2 158
    Par défaut
    Le moyen le plus facile c'est d'installer la police ....
    Ou bien si c que pour des labels de creer des images avzec ton texte et non pas des labels ... (enfin c bourrin mais dans certains cas ca marche).

    Une autre solution vers laquelle je me tournerais si gt a ta place : Creation de dlls de ressources ....
    Je sais qu'on peux ainsi inclure dans une dll des images, icones, etc .... alors pkoi pas une police ?

    JE dis ca comme je dis rien .... disons que je chercherais aussi de ce coté.

    @+
    ERic.
    On passe du temps a vous repondre, alors soyez sympas, passez du temps ..... a vous relire !
    --
    Pourquoi tant de haine pour cette pauvre aide Delphi ????
    Aiiimezzz laaaaa .... Si-Non-Cham-Pi-Gnon !!!
    --
    Pour plus de Renseignements : Venez me rejoindre sur Msn .... Promis je mords pas

  7. #7
    Futur Membre du Club
    Homme Profil pro
    Inscrit en
    Avril 2003
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Avril 2003
    Messages : 8
    Points : 7
    Points
    7
    Par défaut
    Merci beaucoup pour vos réponses

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

Discussions similaires

  1. Utiliser une police spéciale dans mon programme
    Par Coussati dans le forum Débuter
    Réponses: 10
    Dernier message: 25/11/2011, 19h54
  2. Comment inclure et installer Coding4Fun.Phone.Toolkit dans mon projet
    Par yassineonline dans le forum Windows Phone
    Réponses: 1
    Dernier message: 13/05/2011, 19h14
  3. Réponses: 1
    Dernier message: 16/01/2009, 10h14
  4. [FLASH 8] Inclure une police dans mon projet
    Par nounetmasque dans le forum Flash
    Réponses: 1
    Dernier message: 29/01/2007, 09h41
  5. Différent type de police dans un MessageDLG()..
    Par tazthedev dans le forum Delphi
    Réponses: 2
    Dernier message: 09/10/2006, 11h41

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