41.1定义(2) procedure TForm1. FormCreate(sender: TObject) begin edit1.Text:=";∥初始化文本框,使其为空 end procedure TForm1. Button1Click(Sender: Tobject var s: string; begin s: =edit Text edt1.Text:=| oWercase(S);∥转换成小写 end 数组类型标识符可以是任何合法的标识符。 object Pascal允许下标的 类型为整数类型、字符类型、布尔类型、子界类型、枚举类型等。而元素类 型可以为任意的数据类型,但在同一数组中,所有元素的数据类型必须相同 对于用户定义的数据类型作为下标类型,在使用之前必须声明。例如可以进 行如下定义: Inprise Dephi4.1.1 定义(2) 数组类型标识符可以是任何合法的标识符。Object Pascal 允许下标的 类型为整数类型、字符类型、布尔类型、子界类型、枚举类型等。而元素类 型可以为任意的数据类型，但在同一数组中，所有元素的数据类型必须相同。 对于用户定义的数据类型作为下标类型，在使用之前必须声明。例如可以进 行如下定义： procedure TForm1.FormCreate(Sender: TObject); begin edit1.Text:=''; //初始化文本框，使其为空 end; procedure TForm1.Button1Click(Sender: TObject); var s:string; begin s:=edit1.Text; edit1.Text:=lowercase(s); // 转换成小写 end;