Delphi-FireMonkey-Undeclared Identifier'TEdit'; Undeclared Identifier'TLabel';

时间:2014-03-05 01:36:59

标签: delphi

我正在使用Firemonkey-RAD Studio XE3-Delphi中的练习应用程序。 实现代码时,我收到以下错误:

未声明的标识符'TEdit' 未申报的标识符'TLabel' 'TLabel'在第35行不包含名为'caption'的成员

我将项目的代码包含在以下正文中。

感谢任何帮助。对我很轻松......我是德尔福的新手。

 unit strcode1u1;

    interface

    uses
      Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
      Vcl.Controls, Vcl.Forms, Vcl.Dialogs;

    type
      Tstrcode1f1 = class(TForm)
        ePlainText: TEdit;
        laEncrypted: TLabel;
        procedure ePlainTextChange(Sender: TObject);
        procedure FormCreate(Sender: TObject);
      private
        { Private declarations }
      public
        { Public declarations }
      end;

    var
      strcode1f1: Tstrcode1f1;

    implementation

    {$R *.dfm}

    procedure Tstrcode1f1.ePlainTextChange(Sender: TObject);
    begin

    end;

    procedure Tstrcode1f1.FormCreate(Sender: TObject);
    begin
    laEncrypted.caption:=
        chr(72)+chr(101)+chr(108)+
        chr(108)+chr(111)+chr(32)+
        chr(87)+chr(111)+chr(114)+
        chr(108)+chr(100);
    end;
    end.

2 个答案:

答案 0 :(得分:4)

您说您正在创建FireMonkey应用,但您的uses子句包含对VCL单位的引用:

Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs

而不是FireMonkey单位:

FMX.Controls, FMX.Forms, FMX.Dialogs

答案 1 :(得分:3)

除了@Remy的答案之外,还有一个问题。 FireMonkey中的TLabel没有标题,您可以在Object Inspector中看到。

FMX TLabel no Caption Object Inspector

它(以及所有其他FMX控件)改为使用Text

enter image description here

首先创建一个新的FireMonkey应用程序(File-> New-> FireMonkey桌面应用程序 - 来自IDE主菜单的Delphi)。出现下一个对话框时,选择是否需要FireMonkey HD或3D应用程序(文档可以解释两者之间的差异)。

然后,您可以在表单上删除TLabel和TEdit,在Object Inspector中正确命名,然后将代码更改为:

aEncrypted.Text:= chr(72)+chr(101)+chr(108)+
                  chr(108)+chr(111)+chr(32)+
                  chr(87)+chr(111)+chr(114)+
                  chr(108)+chr(100);