"Class TForm1 not found" 启动 Delphi Android 应用程序。应用程序运行良好
"Class TForm1 not found" upon launching Delphi Android app. App works fine
我在 Delphi 中制作了一个简单的 Android 应用程序,它创建了一个登录表单。我遇到的问题是,当我在 Android phone 上 运行 时,应用程序启动正常,但弹出一条消息 "Class TFormLogin not found" (大约 100 毫秒后 FormLogin 已经示)。尽管已创建 FormLogin 并按预期工作。当我点击确定时,消息消失,应用程序继续正常工作。
消息 "Class TFormLogin not found" 是什么意思,如何让它消失?
P.S。因为我已经找到原因了。错误的罪魁祸首是在项目中使用了样书。
应要求,这是 MCVE。该错误出现在新的空白多平台项目中,没有在 PAS 或 DPR 中添加任何代码。这个FMX表单设置就足够了:
object Form1: TForm1
StyleName = 'bg'
Left = 0
Top = 0
Caption = 'Form1'
ClientHeight = 480
ClientWidth = 640
StyleBook = StyleBook1
StyleLookup = 'bg'
FormFactor.Width = 320
FormFactor.Height = 480
FormFactor.Devices = [Desktop]
DesignerMasterStyle = 0
object StyleBook1: TStyleBook
Styles = <
item
end>
Left = 304
Top = 224
end
end
这是样本错误消息(措辞应该更具描述性,对吧)。
错误是由于 TFormLogin 在 FMX 中指定了样本和 StyleLookup
和 StyleName
引用,而样本中没有相应的样式 StyleName
。
P.S。让我感到困惑的是,当 StyleLookup 或 StyleName 明确时,代码工作正常。当两者都填满时 - 出现错误消息。
我在 Delphi 中制作了一个简单的 Android 应用程序,它创建了一个登录表单。我遇到的问题是,当我在 Android phone 上 运行 时,应用程序启动正常,但弹出一条消息 "Class TFormLogin not found" (大约 100 毫秒后 FormLogin 已经示)。尽管已创建 FormLogin 并按预期工作。当我点击确定时,消息消失,应用程序继续正常工作。
消息 "Class TFormLogin not found" 是什么意思,如何让它消失?
P.S。因为我已经找到原因了。错误的罪魁祸首是在项目中使用了样书。
应要求,这是 MCVE。该错误出现在新的空白多平台项目中,没有在 PAS 或 DPR 中添加任何代码。这个FMX表单设置就足够了:
object Form1: TForm1
StyleName = 'bg'
Left = 0
Top = 0
Caption = 'Form1'
ClientHeight = 480
ClientWidth = 640
StyleBook = StyleBook1
StyleLookup = 'bg'
FormFactor.Width = 320
FormFactor.Height = 480
FormFactor.Devices = [Desktop]
DesignerMasterStyle = 0
object StyleBook1: TStyleBook
Styles = <
item
end>
Left = 304
Top = 224
end
end
这是样本错误消息(措辞应该更具描述性,对吧)。
错误是由于 TFormLogin 在 FMX 中指定了样本和 StyleLookup
和 StyleName
引用,而样本中没有相应的样式 StyleName
。
P.S。让我感到困惑的是,当 StyleLookup 或 StyleName 明确时,代码工作正常。当两者都填满时 - 出现错误消息。