Cette fonction permet de créer une police de caractères gérée sous forme d'interface COM.
En pratique, cette fonction permet de fournir à un contrôle d'une fenêtre Visual Adélia issu de l'intégration d'un ActiveX un pointeur d'interface IDispatch gérant la police voulue.
Domaine d'application
Client Windows
Paramètres
ALPHA(n) |
Entrée |
NomPolice |
Nom de la police voulue. |
NUM_E (8,2) |
Entrée |
Taille |
Taille de la police. |
BOOL |
Entrée |
Gras |
Style gras ou non. |
BOOL |
Entrée |
Italique |
Style italique ou non. |
BOOL |
Entrée |
Souligne |
Style souligné ou non. |
BOOL |
Entrée |
Barre |
Style barré ou non. |
NUM_BIN_2 |
Entrée |
Script |
Script de la police. |
POINTEUR *IDispatch |
Sortie |
pDispPolice |
Pointeur d'interface IDispatch sur la police créée, ou *NULL en cas d'échec. |
NUM_BIN_4 |
Sortie |
CodeRetour |
Code retour de l'opération : 0 L'opération s'est déroulée correctement. Autre valeur : Erreur système inattendue. |
Par exemple
Création d'une police Times New Roman de taille 10 avec les styles gras et souligné.
ALPHA(50) NomPolice
NUM_E(8,2) Taille
POINTEUR pDispPolice *IDispatch
NomPolice = 'Times New Roman'
Taille = 10
pDispPolice = *NULL
APPELER_DLL 'VaToolBx.Dll' 'VaToolBxCreateFont' NomPolice Taille *VRAI *FAUX *VRAI *FAUX 0 pDispPolice CodeRetour
Remarque :
La taille, le style et le script doivent être compatibles avec la police choisie. La boîte de dialogue système Windows de choix de police, accessible par les pages de propriétés d'un objet graphique d'une fenêtre Visual Adélia, peut guider dans le choix de valeurs cohérentes.
