DEFINIR SAUVEGARDER ET RESTAURER LES PARAMETRES D'UNE FONTE DE CARACTERE

cs_MAURICIO Messages postés 2106 Date d'inscription mardi 10 décembre 2002 Statut Modérateur Dernière intervention 15 décembre 2014 - 31 mai 2004 à 17:31
cs_MAURICIO Messages postés 2106 Date d'inscription mardi 10 décembre 2002 Statut Modérateur Dernière intervention 15 décembre 2014 - 31 mai 2004 à 17:31
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/23220-definir-sauvegarder-et-restaurer-les-parametres-d-une-fonte-de-caractere

cs_MAURICIO Messages postés 2106 Date d'inscription mardi 10 décembre 2002 Statut Modérateur Dernière intervention 15 décembre 2014 5
31 mai 2004 à 17:31
J' ai fait la même chose que toi à la difference que je garde chaque fonte dans une string (pour pouvoir la garder dans un champ d' une table), les parametres etant separés par un point virgule (;).

Donc j' ai 2 fonctions dans le genre :
LoadFont(StrFont: String; toFont: TFont);
et
maFonte := SaveFont(aFont: TFont): String;
ou
Table1CHAMP1.Value := SaveFont(aFont: TFont): String;

Sinon c bien !
A au fait, moi je ne garde pas CharSet ...