草庐IT

android - TEdit 的 MaxLength 不适用于使用 DELPHI XE7 的 Android(更新 1)

有谁知道为什么TEdit的MaxLength在Android上与DELPHIXE7(更新1)不兼容?有什么办法可以解决这个问题吗? 最佳答案 DELPHIXE7更新1中存在一些问题(请参阅我的报告QC129171)你可以用这段小代码克服它(例如MaxLength=5):procedureTForm1.Edit1Typing(Sender:TObject);beginifLength(Edit1.Text)>5thenEdit1.Text:=Edit1.Text.Substring(0,5);end;

windows - Delphi:如何知道 TEdit 何时更改大小?

我需要在编辑框改变大小时更新它周围的项目。TEdit没有OnResize事件。编辑框可以在不同时间调整大小,例如:在代码中更改宽度/高度表单缩放以进行DPI缩放字体已更改我确定还有其他我不知道的。我需要一个事件来知道编辑框何时改变了它的大小。有没有我可以将编辑框子类化并抓取的Windows消息? 最佳答案 OnResize声明为TControl的protected属性。您可以使用所谓的“cracker”类公开它。不过,这有点像hack。typeTControlCracker=class(TControl);...procedureT

windows - TEdit 可以显示彩色表情符号吗?

我希望使用VCL和Delphi10+在TEdit或TMemo控件中看到彩色表情符号。可以吗?输入的文字:??‍???‍??‍??‍??我看到的:我想看到的: 最佳答案 你的问题让我很好奇,所以尝试了一下,结果如下:一般绘制彩色字体显然,FMX在以后的版本中开箱即用地支持这一点,但在我碰巧拥有的西雅图不支持。我不知道VCL在你的版本中是否也支持它,如果不支持,你可以使用Direct2D来实现。诀窍是使用D2D1_DRAW_TEXT_OPTIONS_ENABLE_COLOR_FONT选项绘制文本。在Seattle(10)中,此常量未定义