delphi - tipo - identificar fuente de una imagen

Obtener tipo de letra y nombre de fuente de Windows que no está instalado

Question

¿Puede alguien decirme cómo puedo obtener el tipo de letra de una fuente? ¿Y cómo puedo tomar el nombre de Windows de la fuente que tiene el nombre de tipo de letra?

Como "arialblackno1.ttf" que tiene el tipo de letra "arialblack".

pero estoy buscando obtener el tipo de letra de una fuente que no está instalada, solo está en una carpeta.

Answer 1

En realidad, tengo una pequeña idea acerca de qué es exactamente lo que estás preguntando (¡términos!)

procedure TForm14.FormCreate(Sender: TObject);
var
DC: HDC;
Font: HFONT;
LogFont: TLogFont;
begin
DC := GetDC(HWND_DESKTOP);
Win32Check(DC <> 0);
Font := GetCurrentObject(DC, OBJ_FONT);
Win32Check(Font <> 0);
Win32Check(GetObject(Font, SizeOf(LogFont), @LogFont) > 0);
ShowMessage(LogFont.lfFaceName);
Win32Check(ReleaseDC(HWND_DESKTOP, DC) = 1);
end;

Answer 2

Usted dice en un comentario que necesita el nombre de una fuente que no está instalada en Windows.

Hay dos formas de hacer esto que puedo pensar:

• Use FreeType

• O bien, use GDI + y PrivateFontCollection.AddFontFile ()

De cualquier manera, tendrá que encontrar envolturas Delphi para estas bibliotecas. Google debería ayudar.

Parece que hay un enlace FreeType como parte de AggPas . Aunque no es algo que haya intentado.