Delphi7 语言手册部分参考

时间:2010-01-31 10:00:46  来源:第二电脑网  作者:第二电脑网

  第二电脑网导读:ssage:string;veginMyMessage := 'Hello World!';Writeln(MyMessage);end.Save to GREETING.PAS or GREETING.DPRwin DCC32 Greetinglinux dcc Greeting2、Unit框架和语法
  正文:1、一个控制台程序

program Greeting;
{$APPTYPE CONSOLE}
var MyMessage:string;
vegin
MyMessage := 'Hello World!';
Writeln(MyMessage);
end.
Save to GREETING.PAS or GREETING.DPR

win DCC32 Greeting
linux dcc Greeting

2、Unit框架和语法

unit Unit1;

Interface

uses

implementation

uses

initialization

finalization

end.


3、uses顺序产生的问题
该顺序决定了initialization部分的程序代码执行的顺序,finalization则和initialization相反。如果两个单元有同名对象,则起作用的是Uses中比较后面一个。

4、符号
(. 相当于[
.) 相当于]
(* 相当于{
*) 相当于}

%,?,,!,”,_,|,~并非特殊符号

@var 表示变量var的地址
P^表示指针取值

{$B+}完整演算{$B-}快捷演算(默认)
如果操作数包含变量则总是完整演算
Compiler Option->complete Boolean Evaluation为该选项

暗示指示符
platform 指示平台
deprecated 指示陈旧
library 依赖特殊库文件或者组件

5、语法点

Lable aaa;
Goto aaa;

if exp1 then
 if exp2 then
  s1
 else
  s2;

相当于

if exp1 then
begin
   if exp2 then
    s1
   else
    s2
end;


6、数据类型
序数
ord 顺序pred 前驱succ 后续inc 增加dec 减少
枚举

type size=(small=5,medium=10,large=small+medium);//size包括了5~15共11个值 array[size] of char有11个数
type SomeEnum=(e1,e2,e3=1);//ord(e1)=0 ord(e2)=1 ord(e3)=1,没有赋值的序数都大于排在他前面的值


压缩的数据存储

type Tmunbers = packed array[1..100] of real;

packed会影响速度,对字节数组会影响兼容性

集合
属于结构化类型,定义在序数类型基础上

type TASet = set of 1..250


记录
属于结构化类型
可变的record

type TEmployee = record
FirstName,LaseName:string[40];
case Salaried:boolean of
 true:(AnnualSalary:currency);
 false:(HourlyWage:currency);
end;


指针
^typeName 代表 指向typeName的指针 类型。
Pointer^ 代表pointer指向地址处的内容
指针相关函数new GetMem Addr Ptr

{$T+}@只能得到^T的指针
{$T-}无类型指针模式,所有指针兼容

标准的指针 system、SysUtils中
PAnsiString、photoshop/ target=_blank class=infotextkey>pstring "Delphi7 语言手册部分参考"由第二电脑网原创提供,转载请注明:http://www.002pc.com/master/College/Language/Delphi/12670.html


关键字:

关于《Delphi7 语言手册部分参考》文章的评论

站内搜索: 高级搜索

热门搜索: Windows style 系统 tr IP QQ CPU 安装 function 注册 if td