Object Pascal 过程和函数 数据类型 流程控制 单元结构

Stella981
• 阅读 256

Object Pascal 过程和函数 数据类型 流程控制 单元结构

子过程

Object Pascal 过程和函数 数据类型 流程控制 单元结构

 Object Pascal 过程和函数 数据类型 流程控制 单元结构

数据类型

简单数据类型:

Integer,Double,Boolean,String,Enumerated,Subrange,Variant

复杂数据类型:

Set,Array,Record,Class,Interface

Object Pascal 过程和函数 数据类型 流程控制 单元结构

Object Pascal 过程和函数 数据类型 流程控制 单元结构

Object Pascal 过程和函数 数据类型 流程控制 单元结构

Object Pascal 过程和函数 数据类型 流程控制 单元结构

case只能用于有序类型

循环:

var

I:Integer;

begin

  for I:=0 to 10 do

  begin

     ...

  end;

end;

Object Pascal 过程和函数 数据类型 流程控制 单元结构

Object Pascal 过程和函数 数据类型 流程控制 单元结构

Exit,用于结束过程或函数

Object Pascal 过程和函数 数据类型 流程控制 单元结构  

Continue

Object Pascal 过程和函数 数据类型 流程控制 单元结构

Break;

Object Pascal 过程和函数 数据类型 流程控制 单元结构

单元的组织结构:

Program

Object Pascal 过程和函数 数据类型 流程控制 单元结构

Object Pascal 过程和函数 数据类型 流程控制 单元结构

Unit

Object Pascal 过程和函数 数据类型 流程控制 单元结构

Object Pascal 过程和函数 数据类型 流程控制 单元结构

Object Pascal 过程和函数 数据类型 流程控制 单元结构

Unit包括:

Object Pascal 过程和函数 数据类型 流程控制 单元结构

单元的循环引用问题:

A引用了B,B引用了A,且都是在interface部分

解决:

引用语句,放在implementation中

with...do

begin

end;

Object Pascal 过程和函数 数据类型 流程控制 单元结构

点赞
收藏
评论区
推荐文章
光头强的博客 光头强的博客
4个月前
Java面向对象试题
1、请创建一个Animal动物类,要求有方法eat()方法,方法输出一条语句“吃东西”。创建一个接口A,接口里有一个抽象方法fly()。创建一个Bird类继承Animal类并实现接口A里的方法输出一条有语句“鸟儿飞翔”,重写eat()方法输出一条语句“鸟儿吃虫”。在Test类中向上转型创建b对象,调用eat方法。然后向下转型调用eat()方
刚刚好 刚刚好
4个月前
css问题
1、在IOS中图片不显示(给图片加了圆角或者img没有父级)<div<imgsrc""/</divdiv{width:20px;height:20px;borderradius:20px;overflow:h
blmius blmius
1年前
MySQL:[Err] 1292 - Incorrect datetime value: ‘0000-00-00 00:00:00‘ for column ‘CREATE_TIME‘ at row 1
文章目录问题用navicat导入数据时,报错:原因这是因为当前的MySQL不支持datetime为0的情况。解决修改sql\mode:sql\mode:SQLMode定义了MySQL应支持的SQL语法、数据校验等,这样可以更容易地在不同的环境中使用MySQL。全局s
晴空闲云 晴空闲云
4个月前
css中box-sizing解放盒子实际宽高计算
我们知道传统的盒子模型,如果增加内边距padding和边框border,那么会撑大整个盒子,造成盒子的宽度不好计算,在实务中特别不方便。boxsizing可以设置盒模型的方式,可以很好的设置固定宽高的盒模型。盒子宽高计算假如我们设置如下盒子:宽度和高度均为200px,那么这会这个盒子实际的宽高就都是200px。但是当我们设置这个盒子的边框和内间距的时候,那
艾木酱 艾木酱
3个月前
快速入门|使用MemFire Cloud构建React Native应用程序
MemFireCloud是一款提供云数据库,用户可以创建云数据库,并对数据库进行管理,还可以对数据库进行备份操作。它还提供后端即服务,用户可以在1分钟内新建一个应用,使用自动生成的API和SDK,访问云数据库、对象存储、用户认证与授权等功能,可专
Wesley13 Wesley13
1年前
MySQL查询按照指定规则排序
1.按照指定(单个)字段排序selectfromtable_nameorderiddesc;2.按照指定(多个)字段排序selectfromtable_nameorderiddesc,statusdesc;3.按照指定字段和规则排序selec
Wesley13 Wesley13
1年前
Java与面向对象
抽象类!image(http://static.oschina.net/uploads/img/201203/14184511_YVtp.png"image")(http://static.oschina.net/uploads/img/201203/14184508_Cmqd.png)!image(http://static.osc
Wesley13 Wesley13
1年前
AS3 数据绑定
一个简单的例子!image(http://static.oschina.net/uploads/img/201203/04143350_InYw.png"image")(http://static.oschina.net/uploads/img/201203/04143350_Otx1.png)!image(http://static
Wesley13 Wesley13
1年前
MySQL部分从库上面因为大量的临时表tmp_table造成慢查询
背景描述Time:20190124T00:08:14.70572408:00User@Host:@Id:Schema:sentrymetaLast_errno:0Killed:0Query_time:0.315758Lock_
helloworld_34035044 helloworld_34035044
7个月前
皕杰报表之UUID
​在我们用皕杰报表工具设计填报报表时,如何在新增行里自动增加id呢?能新增整数排序id吗?目前可以在新增行里自动增加id,但只能用uuid函数增加UUID编码,不能新增整数排序id。uuid函数说明:获取一个UUID,可以在填报表中用来创建数据ID语法:uuid()或uuid(sep)参数说明:sep布尔值,生成的uuid中是否包含分隔符'',缺省为
helloworld_28799839 helloworld_28799839
4个月前
常用知识整理
Javascript判断对象是否为空jsObject.keys(myObject).length0经常使用的三元运算我们经常遇到处理表格列状态字段如status的时候可以用到vue