数组竟然可以这样定义

//这是常规思路:
constarr: array[0..1] of Char = ('A','B');
beginShowMessage(arr);                   {AB}ShowMessage(IntToStr(Length(arr))); {2}
end;//没想到可以这样:
constarr: array[Boolean] of Char = ('A','B');
beginShowMessage(arr);                   {AB}ShowMessage(IntToStr(Length(arr))); {2}{访问元素}ShowMessage(arr[False]);            {A}ShowMessage(arr[True]);             {B}{也可以这样访问}ShowMessage(arr[Low(arr)]);         {A}ShowMessage(arr[High(arr)]);        {B}{但不能这样访问}
//  ShowMessage(arr[0]);
//  ShowMessage(arr[1]);{但可以变通一下}ShowMessage(arr[Boolean(0)]);       {A}ShowMessage(arr[Boolean(1)]);       {B}
end;//同理, 这样也可以:
constarr: array[Byte] of Integer = (1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79,80,81,82,83,84,85,86,87,88,89,90,91,92,93,94,95,96,97,98,99,100,101,102,103,104,105,106,107,108,109,110,111,112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127,128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159,160,161,162,163,164,165,166,167,168,169,170,171,172,173,174,175,176,177,178,179,180,181,182,183,184,185,186,187,188,189,190,191,192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207,208,209,210,211,212,213,214,215,216,217,218,219,220,221,222,223,224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239,240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255,256);
beginShowMessage(IntToStr(arr[Low(arr)]));  {1}ShowMessage(IntToStr(arr[High(arr)])); {256}ShowMessage(IntToStr(Length(arr)));    {256}
end;//给这种用法来一个必要性的实例:
constBoolStr: array[Boolean] of string = ('False', 'True');
varb: Boolean;
beginb := True;ShowMessage(BoolStr[b]); {True}b := not b;ShowMessage(BoolStr[b]); {False}
end;

转载于:https://www.cnblogs.com/del/archive/2008/04/17/1158098.html

本文来自互联网用户投稿,该文观点仅代表作者本人,不代表本站立场。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如若转载,请注明出处:http://www.mzph.cn/news/496860.shtml

如若内容造成侵权/违法违规/事实不符,请联系多彩编程网进行投诉反馈email:809451989@qq.com,一经查实,立即删除!

相关文章

C++学习之路 | PTA乙级—— 1055 集体照 (25 分)(精简)

1055 集体照 (25 分) 拍集体照时队形很重要,这里对给定的 N 个人 K 排的队形设计排队规则如下: 每排人数为 N/K(向下取整),多出来的人全部站在最后一排; 后排所有人的个子都不比前排任何人矮; 每…

AI可以在游戏里称霸,但是解决现实问题太难了

来源:36氪据《大西洋月刊》报道,直到最近,那些能在各类游戏中击败人类冠军的机器,解决现实问题太难了。1997年,为了在国际象棋中击败象棋大师加里卡斯帕罗夫(Garry Kasparov),IBM的工…

C++常用字符串分割方法

From:http://www.jb51.net/article/55954.htm 1. 用strtok函数进行字符串分割 原型: char *strtok(char *str, const char *delim); 功能: 分解字符串为一组字符串。 参数说明:str为要分解的字符串,delim为…

C# 根据中文得到全拼

C#源码下载转载于:https://www.cnblogs.com/goldnet/archive/2008/04/25/1170420.html

软件系统架构~软件架构概念

1、系统的架构定义了它的静态结构、动态结构、外部可见行为、质量属性以及应该引导其设计和发展的原则; 2、系统的候选架构是有可能展现出系统所需要的外部可见行为和质量属性的架构。选择最佳方案则是架构师的职责所在; 3、架构元素时系统的组成部分&…

C++学习之路 | PTA乙级—— 1056 组合数的和 (15 分)(精简)

1056 组合数的和 (15 分) 给定 N 个非 0 的个位数字,用其中任意 2 个数字都可以组合成 1 个 2 位的数字。要求所有可能组合出来的 2 位数字的和。例如给定 2、5、8,则可以组合出:25、28、52、58、82、85,它们的和为330。 输入格式…

大话设计模式-策略模式与简单工厂模式

来源:http://blog.csdn.net/wulingmin21/article/details/6712684 策略模式定义了一系列的算法,并将每一个算法封装起来,而且使它们还可以相互替换。策略模式让算法独立于使用它的客户而独立变化。 例如: CashNormal、CashRebate…

任务太多?学着突破重围

任务太多?学着突破重围 周银辉不知算是我的一个缺点,还是大都这样:如果有10个任务一次性地推给我,我完成任务的效率会明显低于一个一个地指派任务。这里的任务,是…

全球知识图谱专家分布、研究流派(附学者名单)

来源: THU数据派概要:在维基百科的官方词条中:知识图谱是Google用于增强其搜索引擎功能的知识库。什么是知识图谱?在维基百科的官方词条中:知识图谱是Google用于增强其搜索引擎功能的知识库。本质上, 知识图谱旨在描述…

软件系统架构~思维导图

#原图 System.out.println("https://www.processon.com/view/link/6194f2740e3e7409b9c2f3df")

C++学习之路 | PTA乙级—— 1057 数零壹 (20 分)(精简)

1057 数零壹 (20 分) 给定一串长度不超过 10 ​5 ​​ 的字符串,本题要求你将其中所有英文字母的序号(字母 a-z 对应序号 1-26,不分大小写)相加,得到整数 N,然后再分析一下 N 的二进制表示中有多少 0、多少…

创建型、结构型、行为型模式(1)

来源:http://blog.csdn.net/wulingmin21/article/details/6753363 目的 创建型模式 Creational Pattern 结构型模式 Structural Patterns 行为型模式 Behavioral Pattern 概念 创建型模式,就是创建对象的模式,抽象了实例化的过程。…

干货|全球人工智能专利分布战情图

来源: 点滴科技资讯作者:许倩未来智能实验室是人工智能学家与科学院相关机构联合成立的人工智能,互联网和脑科学交叉研究机构。未来智能实验室的主要工作包括:建立AI智能系统智商评测体系,开展世界人工智能智商评测&am…

Finding Gems

N大就是厚道!紧接着上一部,GPU Gems 2即将免费开放~http://news.developer.nvidia.com/2008/05/gpu-gems-2---on.html转载于:https://www.cnblogs.com/eygneph/archive/2008/05/13/1194635.html

tomcat高版本之URL解析异常解决

IllegalArgumentException 一、项目场景: 例如:由于Apache的tomcat的版本升级,遵循RFC 7230 and RFC 3986规范解析请求地址。同时添加了对于http头的验证请求。 导致报文存在导致特殊字符(不在解析范围内的)tomcat7…

C++学习之路 | PTA乙级—— 1058 选择题 (20 分)(精简)

1058 选择题 (20 分) 批改多选题是比较麻烦的事情,本题就请你写个程序帮助老师批改多选题,并且指出哪道题错的人最多。 输入格式: 输入在第一行给出两个正整数 N(≤ 1000)和 M(≤ 100)&#xf…

创建型、结构型、行为型模式(2)

来源:http://blog.csdn.net/wulingmin21/article/details/6757111 创建型模式 Singleton模式解决的是实体对象个数的问题。 除了Singleton之外,其他创建型模式解决的都是New所带来的耦合关系。 Factory Method,Abstract Factory,B…

大数据行业洞察:未来2-3年或迎数据时代的真正高潮

来源: DT数据侠 作者:中关村老李从2012年的“用户标签”到2014年的“用户画像”,从2015年的“大数据”到2017年的“人工智能”,大数据正在从神坛走向现实。“标签”到“画像”,代表着数据在数量和维度上,逐…

host头攻击漏洞

一个服务器上跑多个程序是非常常见的现象。 但是这样做后会有一个问题&#xff0c;那就是容易造成 Host 头攻击。host 头(host header或称主机头)攻击&#xff0c;非常常见。比如&#xff0c;在 jsp 中&#xff0c;我们通常可能存在类似下面的代码。 <script type"te…

地震

昨天下午2点半多&#xff0c;在家里刚开电脑&#xff0c;突然感到椅子左右轻微晃动&#xff0c;当时想是不是椅子坏了&#xff0c;后来又听到楼上有声音&#xff0c;想是不是整修楼面搞的。随着震动逐渐加大&#xff0c;意识到是地震&#xff0c;赶快喊妈妈姥姥躲卫生间&#x…