如何在csImageFile中添加字体

Question

有人有使用 ChestySoft 的 csImageFile 的经验吗？我继续使用它，因为它是我接管的网站的一部分。

我正在尝试使用“AddFont”命令添加临时字体，但目前还没有进展。手册中只是含糊地提到了这一点。

任何帮助表示赞赏。

Answer 1

将 TextFont 属性设置为您刚刚使用 AddFont 方法添加的字体名称。

Set Image = Server.CreateObject("csImage...")
    Image.NewImage 500, 500, "#ffffff"
    If Image.AddFont(Server.MapPath("myfont.ttf")) Then 'addfont returns true if success
        ' Adding font successful
    Else ' Could not be added font file
        Err.Raise 8, "csImageFile.AddFont", "File not exists or it's not a valid font file"
    End If
    Image.TextSize = 20
    Image.TextFont = "My Font Name"
    Image.Text 5, 5, "Hey!" 'x=5, y=5
    Response.ContentType = "image/jpeg"
    Response.BinaryWrite Image.JPGData ' write image directly

如果您不确定字体名称，FontNames 属性可以为您提供快速概览。它返回服务器上安装（或由您添加）的所有字体的集合。

For Each fontName In Image.FontNames
    Response.Write fontName & "<br />"
Next