(之后我想将dragndrop添加到TRectangles / unicode国际象棋 – 任何想法?).
Rectangle63: TRectangle;Rectangle64: TRectangle;Text1: TText;Text2: TText;
这是截图显示问题:
我非常感谢你的帮助,谢谢
编辑:
Jeroen的答案为我解决了这个问题(我将实际的unicode棋子图像复制/粘贴到TText文本属性中).到目前为止我添加了exe的截图.接下来我要为这些作品添加DRAGNDROP …..
EDIT2:
(Jeroen字体大小问题已修复)
固定unicode黑色王显示 – 见截图:
Actually,it does not matter what platform or development environment
you use,as long as they support Unicode and you have the right Font.
你需要:
>输入这些Unicode CodePoints的方法
>在目标平台上将这些Unicode CodePoints表示为字形的字体
从Microsoft Windows开始,对于Microsoft Windows,这些字体工作正常:
> @L_404_6@
> Tahoma
> Arial Unicode MS
为了进入这些,Microsoft Windows有两种方法:
>如果在注册表中启用它:在键盘上输入hexadecimal Unicode CodePoint数字到Alt-codes
> copy/paste他们来自提供文本的应用程序(即Unicode Input: Selection from Screen)
对于复制/粘贴,我经常使用支持Unicode的Web Browser转到具有正确字符的网页,或使用Character Map应用程序搜索它们.
要使复制/粘贴更容易:
>这些是白色的:♔♕♖♗♘♙
>这些是黑色的部分:♚♛♜♝♞♟
示例FireMonkey表单,其中包含一个TTRectangle中的1 TText中的所有部分:
object Form1: TForm1 left = 0 top = 0 Caption = 'Form1' ClIEntHeight = 480 ClIEntWIDth = 640 FormFactor.WIDth = 320 FormFactor.Height = 480 FormFactor.Devices = [dkDesktop,dkiPhone,dkiPad] DesignerMobile = False DesignerWIDth = 0 DesignerHeight = 0 DesignerDevicename = '' DesignerOrIEntation = 0 object Rectangle1: TRectangle Height = 50.000000000000000000 WIDth = 80.000000000000000000 object Text1: TText color = claBlack Height = 50.000000000000000000 Text = #9812#9813#9814#9815#9816#9817#9818#9819#9820#9821#9822#9823 WIDth = 80.000000000000000000 end endend
编辑
我认为您的表单文件中存在字体大小问题.使用表单文件的文本创建一个新问题.有两种方法可以做到:
>打开记事本,并在记事本中打开与您的表单一起的.FMX文件;将文本复制到剪贴板
>在Delphi中,右键单击表单,然后选择“以文本形式查看”,选择所有文本并将其复制到剪贴板,右键单击表单文本,然后选择“以表单形式查看”.
将代码粘贴到http://pastebin.com/或https://gist.github.com/,然后在新问题中发布该链接.在那之后你做了评论,我会看一看.
总结以上是内存溢出为你收集整理的Delphi中的Unicode形式为TRectangle TText全部内容,希望文章能够帮你解决Delphi中的Unicode形式为TRectangle TText所遇到的程序开发问题。
如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)