摘要: 在方法中,出现数组类型的参数: procedure TForm1.Button2Click(Sender: TObject); type TOneArray = array of Integer; procedure AddArrayItem(var Arr: TOneArray; x: Integ 阅读全文
posted @ 2021-09-10 11:52 枭二熊 阅读(57) 评论(0) 推荐(0) 编辑
摘要: 先自定义枚举类型,然后用该枚举类型的个数定义一个字符串数组,再定义一个该枚举类型的变量,用于for循环时: procedure TForm1.Button3Click(Sender: TObject); type Tweeks=(mon,Tue,wed,thu,fri,sat,sun); var a 阅读全文
posted @ 2021-09-10 11:30 枭二熊 阅读(88) 评论(0) 推荐(0) 编辑
摘要: 多维数组: procedure TForm1.Button1Click(Sender: TObject); const arr1:array[0..1,0..2,0..3]of Integer =(((1,2,3,4),(1,2,3,4),(1,2,3,4)),((1,2,3,4),(1,2,3,4 阅读全文
posted @ 2021-09-10 11:25 枭二熊 阅读(50) 评论(0) 推荐(0) 编辑