public static LOGFONT GetLOGFONT(string fontName, bool bold, bool italic)
{
if (string.IsNullOrEmpty(fontName))
{
fontName = "Arial";
}
LOGFONT lf = new LOGFONT();
lf.lfCharSet = 1;
lf.lfFaceName = fontName;
if (italic)
{
lf.lfItalic = 255;
}
if (bold)
{
lf.lfWeight = 700;
}
else
{
lf.lfWeight = 400;
}
IntPtr plogFont = Marshal.AllocHGlobal(Marshal.SizeOf(lf));
Marshal.StructureToPtr(lf, plogFont, true);
LOGFONTFinder finder = new LOGFONTFinder();
try
{
IntPtr HDC = Win32.GetDC(IntPtr.Zero);
EnumFontExDelegate del = new EnumFontExDelegate(finder.EnumFontFamExProc);
int ret = 0;
ret = EnumFontFamiliesEx(HDC, plogFont, del, IntPtr.Zero, 0);
//System.Diagnostics.Trace.WriteLine("EnumFontFamiliesEx = " + ret.ToString());
Win32.ReleaseDC(IntPtr.Zero, HDC);
}
catch (System.Exception ex)
{
System.Diagnostics.Trace.WriteLine(ex.Message);
}
finally
{
Marshal.DestroyStructure(plogFont, typeof(LOGFONT));
}
bool find;
LOGFONT result = finder.Find(lf, out find);
if (find)
{
return(result);
}
else
{
if (fontName.Equals("Arial"))
{
throw new PDFException("System fonts are not available.");
}
}
return(GetLOGFONT("Arial", bold, italic));
}
public static bool ScriptGetFontProperties(System.Drawing.Font font, out Uniscribe.SCRIPT_FONTPROPERTIES sfp)
{
sfp = new Uniscribe.SCRIPT_FONTPROPERTIES();
if (font == null)
{
return(false);
}
// HFONT hfont = initialize your font;
IntPtr hfont = font.ToHfont();
IntPtr psc = IntPtr.Zero; // Initialize to NULL, will be filled lazily.
IntPtr hdcSrc = IntPtr.Zero;
IntPtr HDC = IntPtr.Zero; // Don't give it a DC unless we have to.
// HFONT old_font = NULL;
IntPtr old_font = IntPtr.Zero;
uint res = 0;
sfp = new Uniscribe.SCRIPT_FONTPROPERTIES();
sfp.cBytes = Marshal.SizeOf(typeof(Uniscribe.SCRIPT_FONTPROPERTIES));
for (int i = 0; i < 2; i++)
{
try
{
res = 0;
res = Uniscribe.ScriptGetFontProperties(HDC, ref psc, ref sfp);
if (res != 0)
{
if (res == Win32.E_PENDING)
{
throw new ArgumentException();
}
else
{
throw new Exception(); // Some kind of error.
}
}
break;
}
catch (ArgumentException)
{
// ... select font into hdc ...
hdcSrc = Win32.GetDC(IntPtr.Zero);
HDC = Win32.CreateCompatibleDC(hdcSrc);
old_font = Win32.SelectObject(HDC, hfont);
// Loop again...
continue;
}
catch (Exception ex)
{
Console.WriteLine(ex.Message);
break;
}
}
if (old_font != IntPtr.Zero)
{
Win32.SelectObject(HDC, old_font); // Put back the previous font.
}
Win32.ReleaseDC(IntPtr.Zero, HDC);
Win32.ReleaseDC(IntPtr.Zero, hdcSrc);
// Need to tell Uniscribe to delete the cache we were using. If you are going
// to keep the HFONT around, you should probably also keep the cache.
// ScriptFreeCache(psc);
Win32.DeleteObject(hfont);
return(res == 0);
}
// Called with the array output by callScriptItemize, this will
private static bool callScriptShapeForItem(string input, int input_length, // IN: characters
ref IntPtr hfont, ref IntPtr psc, // IN: font info
Uniscribe.SCRIPT_ANALYSIS sa, // IN: from ScriptItemize
out ushort[] pwOutGlyphs, // OUT: one per glyph
out ushort[] pwLogClust, // OUT: one per character
out Uniscribe.SCRIPT_VISATTR[] psva) // OUT: one per glyph
{
// Initial size guess for the number of glyphs recommended by Uniscribe
int cMaxGlyphs = input_length * 3 / 2 + 16;
pwOutGlyphs = new ushort[cMaxGlyphs];
psva = new Uniscribe.SCRIPT_VISATTR[cMaxGlyphs];
// The logs array is the same size as the input.
pwLogClust = new ushort[input_length];
IntPtr hdcSrc = IntPtr.Zero;
IntPtr HDC = IntPtr.Zero; // Don't give it a DC unless we have to.
// HFONT old_font = NULL;
IntPtr old_font = IntPtr.Zero;
uint res = 0;
//while (true)
for (int max = 1000; max > 0; --max)
{
try
{
int pcGlyphs = 0;
res = 0;
res = Uniscribe.ScriptShape(HDC, ref psc, input, input_length, cMaxGlyphs, ref sa,
pwOutGlyphs, pwLogClust, psva, ref pcGlyphs);
if (res != 0)
{
// Different types of failure...
if (res == Win32.E_PENDING)
{
// Need to select the font for the call. Don't do this if we don't have to
// since it may be slow.
throw new ArgumentException();
}
else if (res == Win32.E_OUTOFMEMORY)
{
// The glyph buffer needs to be larger. Just double it every time.
throw new OutOfMemoryException();
}
else if (res == Win32.USP_E_SCRIPT_NOT_IN_FONT)
{
// The font you selected doesn't have enough information to display
// what you want. You'll have to pick another one somehow...
// For our cases, we'll just return failure.
//throw new Exception(); // Some other failure.
sa.eScript = 0;
// Loop again...
continue;
}
else
{
throw new Exception(); // Some other failure.
}
}
// It worked, resize the output list to the exact number it returned.
ushort[] glyphs = new ushort[pcGlyphs];
Array.Copy(pwOutGlyphs, glyphs, pcGlyphs);
pwOutGlyphs = glyphs;
ushort[] logs = new ushort[pcGlyphs];
Array.Copy(pwLogClust, logs, pcGlyphs);
pwLogClust = logs;
Uniscribe.SCRIPT_VISATTR[] visattr = new Uniscribe.SCRIPT_VISATTR[pcGlyphs];
Array.Copy(psva, visattr, pcGlyphs);
psva = visattr;
break;
}
catch (ArgumentException)
{
// ... select font into hdc ...
hdcSrc = Win32.GetDC(IntPtr.Zero);
HDC = Win32.CreateCompatibleDC(hdcSrc);
old_font = Win32.SelectObject(HDC, hfont);
// Loop again...
continue;
}
catch (OutOfMemoryException)
{
cMaxGlyphs = pwOutGlyphs.Length * 2;
pwOutGlyphs = new ushort[cMaxGlyphs];
psva = new Uniscribe.SCRIPT_VISATTR[cMaxGlyphs];
// Loop again...
continue;
}
catch (Exception ex)
{
Console.WriteLine(ex.Message);
break;
}
}
if (old_font != IntPtr.Zero)
{
Win32.SelectObject(HDC, old_font); // Put back the previous font.
}
Win32.ReleaseDC(IntPtr.Zero, HDC);
Win32.ReleaseDC(IntPtr.Zero, hdcSrc);
return(res == 0);
}
private static bool callScriptPlaceForItem(ref IntPtr hfont, ref IntPtr psc,
ushort[] pwGlyphs, int cGlyphs, Uniscribe.SCRIPT_VISATTR[] psva,
ref Uniscribe.SCRIPT_ANALYSIS psa,
out int[] piAdvance, out Uniscribe.GOFFSET[] pGoffset, out Uniscribe.ABC pABC)
{
// All arrays are in visual order unless the fLogicalOrder member is set
// in the SCRIPT_ANALYSIS structure indicated by the psa parameter.
psa.fLogicalOrder = true;
piAdvance = new int[cGlyphs];
pGoffset = new Uniscribe.GOFFSET[cGlyphs];
pABC = new Uniscribe.ABC();
IntPtr hdcSrc = IntPtr.Zero;
IntPtr HDC = IntPtr.Zero; // Don't give it a DC unless we have to.
// HFONT old_font = NULL;
IntPtr old_font = IntPtr.Zero;
uint res = 0;
//while (true)
for (int max = 1000; max > 0; --max)
{
try
{
res = 0;
res = Uniscribe.ScriptPlace(HDC, ref psc, pwGlyphs, cGlyphs, psva, ref psa, piAdvance, pGoffset, ref pABC);
if (res != 0)
{
// Different types of failure...
if (res == Win32.E_PENDING)
{
// Need to select the font for the call. Don't do this if we don't have to
// since it may be slow.
throw new ArgumentException();
}
else
{
throw new Exception(); // Some other failure.
}
}
break;
}
catch (ArgumentException)
{
// ... select font into hdc ...
hdcSrc = Win32.GetDC(IntPtr.Zero);
HDC = Win32.CreateCompatibleDC(hdcSrc);
old_font = Win32.SelectObject(HDC, hfont);
// Loop again...
continue;
}
catch (Exception ex)
{
Console.WriteLine(ex.Message);
break;
}
}
if (old_font != IntPtr.Zero)
{
Win32.SelectObject(HDC, old_font); // Put back the previous font.
}
Win32.ReleaseDC(IntPtr.Zero, HDC);
Win32.ReleaseDC(IntPtr.Zero, hdcSrc);
return(res == 0);
}
public static bool ScriptGetCMap(string str, System.Drawing.Font font, Uniscribe.SCRIPT_FONTPROPERTIES sfp)
{
if (font == null)
{
return(false);
}
uint res = 0;
// HFONT hfont = initialize your font;
IntPtr hfont = font.ToHfont();
IntPtr psc = IntPtr.Zero; // Initialize to NULL, will be filled lazily.
IntPtr hdcSrc = IntPtr.Zero;
IntPtr HDC = IntPtr.Zero; // Don't give it a DC unless we have to.
// HFONT old_font = NULL;
IntPtr old_font = IntPtr.Zero;
ushort[] pwOutGlyphs = new ushort[str.Length];
for (int max = 1000; max > 0; --max)
{
try
{
res = 0;
res = Uniscribe.ScriptGetCMap(HDC, ref psc, str, str.Length, 0, pwOutGlyphs);
if (res != 0)
{
// Different types of failure...
if (res == Win32.E_PENDING)
{
// Need to select the font for the call. Don't do this if we don't have to
// since it may be slow.
throw new ArgumentException();
}
if (res == Win32.E_HANDLE)
{
// The font or the operating system does not support glyph indexes.
throw new Exception();
}
else if (res == Win32.S_FALSE)
{
// Some of the Unicode code points were mapped to the default glyph.
throw new Exception();
}
}
// call ScriptGetFontProperties
int defaultGlyph = sfp.wgDefault;
for (int i = 0; i < str.Length; i++)
{
if (pwOutGlyphs[i] == defaultGlyph)
{
// character with that index is not available in selected font
}
}
break;
}
catch (ArgumentException)
{
// ... select font into hdc ...
hdcSrc = Win32.GetDC(IntPtr.Zero);
HDC = Win32.CreateCompatibleDC(hdcSrc);
old_font = Win32.SelectObject(HDC, hfont);
// Loop again...
continue;
}
catch (Exception ex)
{
Console.WriteLine(ex.Message);
break;
}
}
if (old_font != IntPtr.Zero)
{
Win32.SelectObject(HDC, old_font); // Put back the previous font.
}
Win32.ReleaseDC(IntPtr.Zero, HDC);
Win32.ReleaseDC(IntPtr.Zero, hdcSrc);
// Need to tell Uniscribe to delete the cache we were using. If you are going
// to keep the HFONT around, you should probably also keep the cache.
// ScriptFreeCache(psc);
Win32.DeleteObject(hfont);
return(res == 0);
}
