Club Builder

[Tugui]

Me gustaría saber el modo de visualizar un tipo de fuente, por ejemplo a partir de un archivo .TTF, sin que ésta esté instalada en el sistema. Es para hacer un visor de fuentes. Gracias.
_________________
¡ADELANTE CON ESTE SUPER FORO!

[Roid]

Esto es un pequeño esquema:

#include <idglobal.hpp>

//Inicio de programa
//Cogemos las fuentes iniciales del sistema
for (int i=0;i<Screen->Fonts->Count; i++){
//TStringList
FuentesPorDefecto->Add(Screen->Fonts->Strings[i]);
}

//---------------------------------------
//Visualizar nueva fuente
CopyFileTo("F:\\Fuente.TTF","C:\\Windows\\Fonts\\Fuente.TTF");
Sleep(90);//Tiempo de instalacion de la nueva letra.
for (int i=0;i<Screen->Fonts->Count; i++){

MisFuentes->Add(Screen->Fonts->Strings[i]);
}
//Buscamos la fuente q ha cambiado de nuestra lista inicial
String FuenteNueva=BuscarFuente(FuentesPorDefecto,MisFuentes);
//Ojo las fuentes al instalarlas algunas cambian de nombre por eso hay q hacer esto
//Y ahora solo queda cambiar la propiedad Font
Text->Font->Name=FuenteNueva;
//---------------------------------------
//En otro evento
//Despues cuando decida visualizar otra letra
//Buscamos la fuente q ha cambiado de nuestra lista inicial
//FuenteNueva=BuscarFuente(FuentesPorDefecto,MisFuentes);
//DeleteFile("C:\\Windows\\Fonts\\"+FuenteNueva+".TTF");

Un saludo,espero q te sirva esto.

[Tugui]

Muchas gracias Roid por tu respuesta, por lo que veo si no me equivoco lo que hace el código antes de visualizarla es instalarla, yo lo que buscaba era una forma de verla sin necesidad de instalarla, pero bueno voy a probar esto y luego te digo que tal ha ido.
Saludos y gracias otra vez .
_________________
¡ADELANTE CON ESTE SUPER FORO!

[Roid]

Otra opcion seria:

ShellExecute(NULL,"open","fontview","ABADDON.ttf","F:\\Fuentes\\",SW_SHOWDEFAULT);


Pero yo haria la primera ya q queda mas profesional.


Un saludo.