summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/corelib/x11/fpg_xft_x11.pas50
1 files changed, 46 insertions, 4 deletions
diff --git a/src/corelib/x11/fpg_xft_x11.pas b/src/corelib/x11/fpg_xft_x11.pas
index cfd255a4..698f808b 100644
--- a/src/corelib/x11/fpg_xft_x11.pas
+++ b/src/corelib/x11/fpg_xft_x11.pas
@@ -30,7 +30,8 @@ uses
;
const
- libXft = 'Xft';
+ libXft = 'libXft.so';
+ fclib = 'libfontconfig.so';
type
@@ -87,9 +88,47 @@ type
PFcFontSet = ^TFcFontSet;
const
- FC_FAMILY : PChar = 'family';
- FC_SIZE : PChar = 'size';
- FC_SCALABLE : PChar = 'scalable';
+// FC_FAMILY : PChar = 'family';
+// FC_SIZE : PChar = 'size';
+// FC_SCALABLE : PChar = 'scalable';
+
+ FC_FAMILY = 'family'; //* String */
+ FC_STYLE = 'style'; //* String */
+ FC_SLANT = 'slant'; //* Int */
+ FC_WEIGHT = 'weight'; //* Int */
+ FC_SIZE = 'size'; //* Double */
+ FC_ASPECT = 'aspect'; //* Double */
+ FC_PIXEL_SIZE = 'pixelsize'; //* Double */
+ FC_SPACING = 'spacing'; //* Int */
+ FC_FOUNDRY = 'foundry'; //* String */
+ FC_ANTIALIAS = 'antialias'; //* Bool (depends) */
+ FC_HINTING = 'hinting'; //* Bool (true) */
+ FC_VERTICAL_LAYOUT = 'verticallayout';//* Bool (false) */
+ FC_AUTOHINT = 'autohint'; //* Bool (false) */
+ FC_GLOBAL_ADVANCE = 'globaladvance'; //* Bool (true) */
+ FC_FILE = 'file'; //* String */
+ FC_INDEX = 'index'; //* Int */
+ FC_FT_FACE = 'ftface'; //* FT_Face */
+ FC_RASTERIZER = 'rasterizer'; //* String */
+ FC_OUTLINE = 'outline'; //* Bool */
+ FC_SCALABLE = 'scalable'; //* Bool */
+ FC_SCALE = 'scale'; //* double */
+ FC_DPI = 'dpi'; //* double */
+ FC_RGBA = 'rgba'; //* Int */
+ FC_MINSPACE = 'minspace'; //* Bool use minimum line spacing */
+ FC_SOURCE = 'source'; //* String (X11, freetype) */
+ FC_CHARSET = 'charset'; //* CharSet */
+ FC_LANG = 'lang'; //* String RFC 3066 langs */
+ FC_FONTVERSION = 'fontversion'; //* Int from 'head' table */
+
+ FC_MATRIX = 'matrix';
+ FC_CHAR_WIDTH = 'charwidth';
+
+ FC_WEIGHT_BOLD = 200;
+ FC_SLANT_ITALIC = 100;
+ FC_PROPORTIONAL = 0;
+ FC_MONO = 100;
+
FcTypeVoid = 0;
FcTypeInteger = 1;
@@ -123,6 +162,9 @@ function XftNameUnparse(pat : PFcPattern; dest : PChar; destlen : integer) : bo
procedure FcFontSetDestroy(fsp : PFcFontSet); cdecl; external libXft;
+//function FcFontList(config: PFcConfig; p:PFcPattern; os:PFcObjectSet): PFcFontSet;cdecl; external fclib name 'FcFontList';
+
+
implementation
end.