关于网友提出的“ 求 delphi font 和 string 相互转换的程序,或者给个思路。”问题疑问,本网通过在网上对“ 求 delphi font 和 string 相互转换的程序,或者给个思路。”有关的相关答案进行了整理,供用户进行参考,详细问题解答如下:
问题: 求 delphi font 和 string 相互转换的程序,或者给个思路。
描述:delphistringfont
求 delphi font 和 string 相互转换的程序,或者给个思路。
解决方案1: 嗯,虽然回答你的答案看来像是“转成啥结果”,
但是依着这个原理,其实就是回答了你“如何转换”。
比如:
function FontToStr(Font: TFont);
begin
.......
result:=;
end;
procedure SetFontByStr(Font: TFont; Str: String);
var
xml: TXML;
begin
xml:=parsexml(str);
font.name:=xml.name;
font.size:=xml.size;
......
end;
有了以上二个函数/程序,只要
就可以用
str:=FontToStr(Font);
和
SetFontByStr(Font, Str);
来转换了。
相比于你举的C#是要多写几行代码,但确实是朝“如何转换”回答。
解决方案2: 这压根不是什么难不难的问题吧
以上介绍了“ 求 delphi font 和 string 相互转换的程序,或者给个思路。”的问题解答,希望对有需要的网友有所帮助。
本文网址链接:http://www.codes51.com/itwd/2193423.html