Delphi中的Unicode形式为TRectangle TText
我是Delphi&的新手.在DelphiXE4编辑器中,我试图在表格上制作棋盘gui,使用x64 TRectangle作为棋盘(替代颜色).我想添加unicode国际象棋棋子,但是当我添加unicode时,它会在ObjectInspector属性中逐字地显示在表单上.如何将Unicode添加到TText(因此表单将unicode显示为棋子)?
(之后我想将dragndrop添加到TRectangles / unicode国际象棋 – 任何想法?). Rectangle63: TRectangle; Rectangle64: TRectangle; Text1: TText; Text2: TText; 这是截图显示问题: 我非常感谢你的帮助,谢谢 编辑: EDIT2: 解决方法
Unicode Chess Pieces可以在任何德尔福应用程序中显示,只要您喜欢包含0700表示
Unicode的各种
CodePoints(表示
Chess Pieces).
你需要: >输入这些Unicode CodePoints的方法 从Microsoft Windows开始,对于Microsoft Windows,这些字体工作正常: > Segoe UI 为了进入这些,Microsoft Windows有两种方法: >如果在注册表中启用它:在键盘上输入hexadecimal Unicode CodePoint数字到Alt-codes 对于复制/粘贴,我经常使用支持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 end end 编辑 我认为您的表单文件中存在字体大小问题.使用表单文件的文本创建一个新问题.有两种方法可以做到: >打开记事本,并在记事本中打开与您的表单一起的.FMX文件;将文本复制到剪贴板 将代码粘贴到http://pastebin.com/或https://gist.github.com/,然后在新问题中发布该链接.在那之后你做了评论,我会看一看. (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |