用户名:  密码:   
您当前的位置:首页 > 程序设计 >  Delphi > 

语法基础

上次修改时间: 2022-08-24 17:57:05      来源:网络总结      作者:钢铁长陈
上一页      路径:DSD\Learn\Delphi语言\Delphi相关\Delphi资料\      下一页

                          Delphi的简介
     Delphi是全新的可视化编程环境,为我们提供了一种方便、快捷的Windows
应用程序开发工具。它使用了Microsoft Windows图形用户界面的许多先进特性和设计
思想,采用了弹性可重复利用的完整的面向对象程序语言(Object-Oriented Language)
当今世界上最快的编辑器、最为领先的数据库技术。对于广大的程序开发人员来讲,使用
Delphi开发应用软件,无疑会大大地提高编程效率,而且随着应用的深入,您将会发现
编程不再是枯燥无味的工作——Delphi的每一个设计细节,都将带给您一份欣喜。
1. 变量声明格式: Var a:string;
                Var b:integer;
2. 常量声明格式: Const a:="string";
                    b:=3.15;
3. 数据类型:整型 Integer 范围:-32768~32768,占2字节的内存
               Shorting 范围:-128~128,占1字节的内存
               Longing 范围:-2147443648~2147443648,占4字节的内存
               Byte 范围:0~255,占1字节的内存
               Word 范围:0~65535,占2字节的内存
          实型 Single 范围:7~8位的有效小数部分,占4字节的内存
               Double 范围:15~16位的有效小数部分,占8字节的内存
               Extended 范围:19~20位的有效小数部分,占10字节的内存
               Comp 范围:可以包含19~20位的有效小数部分,占10字节的内存
               Real 范围:可以包含11~12位的有效小数部分,占6字节的内存(它只有在和以前的BORLAND PASCAL 兼容的情况才使用,否则应使用Double或Extended)
        布尔型 Boolean 包含:True和False两个值,占1字节的内存
        字符型 Char 范围:一个ASCII字符,字符串类型一串长255个ASCII
        指针型 Pointer 范围:可指向任何特定类型
      字符串型 Pchar 范围:是一个指以零结尾的字符串的指针
4. 赋值语句:":=" 例如:我们把 CORED 赋值给label(标签)格式:label1.color:=cored
5. 注释语句的使用a.组合符号:"{"和"}"中间的内容为注释部分(推荐:大块的注释使用此符号)
                b.组合符号:"("和")"中间的内容为注释部分(同上)
                c.    符号:"//"后面的内容为注释部分(建议:小块注释使用)
6. 函数的使用:
      函数头:
      Function<函数名>(<形式参数表>):<类型>
      函数体:
      begin
       <语句>
       <语句>
        ...
       <语句>
      end;
7. 过程的声明和使用:
      过程头
      Proceduce<过程名>(<形式参数名>)
      过程体:
      begin
       <语句>
       <语句>
        ...
       <语句>
      end;
8. 基本语法:
条件语句(if语句:)
   if <条件> then   
      <语句>
      else
      <语句>;
      end;
说明:如果IF语句后的条件为真或者说成立的话,则施行then后的语句反之则施行Else        后的语句。
      if语句可以嵌套,当使用复合语句表达时,复合语句前后需加上begin…end。else保留字前不能加“;”,而且,编译器会将else语句视为属于最靠近的if语句。必要时,须使用begin…end保留字来强迫else部分属于某一级的if语句。
       case语句:
       case语句适用于被判断的变量或属性是整形、字符型、枚举型或子界型时(LongInt除外)。用case语句进行逻辑跳转比编写复杂的if语句容易阅读,而且程序代码整形较快。
下面的例程显示一个使用case语句的窗体:建立如下的事件处理过程:
       procedure TForm1.Button1Click(Sender: TObject);
       var Number : Integer;
       begin
       Number := StrToInt(Edit1.Text);
       case Number of
       1,3,5,7,9: Label2.Caption := ‘奇数’;
       0,2,4,6,8: Label2.Caption := ‘偶数’;
       10..100:
       begin
       Label2.Caption := ‘在10到100之间’;
       Form1.Color := clBlue;
       end;
       else
       Label2.Caption := ‘大于100或为负数’;
       end;
       end;
     执行程序,当Edit1部件接受到一个值,并按动“OK”按钮触发程序后,Number便被赋值为用户输入的数值。case语句根据Number的值判断该执行哪一条语句。象if语句一样。case语句也有可选择的else部分。case语句以end结尾。
    (注意:上面的例程只供参考不能复制到编程开发当中。)
Delphi语言中的循环
     Object Pascal的循环语句有三种:repeat、while和for语句
repeat语句会重复执行一行或一段语句直到某一状态为真。语句以repeat开始,以until结束,其后跟随被判断的布尔表达式。参阅以下的例程:
       i := 0;
       repeat
       i := i+1;
       Writen(i);
       until i=10;
    当此语句被执行时,窗体的下方会出现1到10的数字。布尔表达式 i=10 (注意,与其他语言不同的是,“=”是关系运算符,而不能进行赋值操作)直到repeat..until程序段的结尾才会被计算,这意味着repeat语句至少会被执行一次。
while语句和repeat语句的不同之处是,它的布尔表达式在循环的开头进行判断。while保留字后面必须跟一个布尔表达式。如果该表达式的结果为真,循环被执行,否则会退出循环,执行while语句后面的程序。
       i := 0;
       while i<10 do
       begin
       i := i+1;
       writeln(i);
       end;  
    for语句的程序代码会执行一定的次数。它需要一个循环变量来控制循环次数。您需要说明一个变量,它的类型可以是整形、布尔型、字符型、枚举型或子界型。
下面的程序段会显示1到5的数字,i为控制变量:
      var
      i : integer;
      for i := 1 to 5 do
      writeln(i); 
    以上介绍了三种循环语句。如果您知道循环要执行多少次的话,可以使用for语句。for循环执行速度快,效率比较高。如果您不知道循环要执行多少次,但至少会执行一次的话,选用repeat..until语句比较合适;当您认为程序可能一次都不执行的话,最好选用while..do语句。

异常处理语句
1.
 try //尝试执行
 ....//失败时跳到except里执行
 except //出错时执行
 ....
 end;
2.
 try //尝试执行
 ... //成功失败都跳到finally执行
 finally //无论如何都强制执行
 ...
 end;

3.
 try //尝试执行
 ....  //失败时跳到except里执行
 except on e:exception do
  showmeaage(e.message);
 end;

例:
try
Age:=StrToint(Edit1.text);
showmeaage(format('生于%d年',[YearOf(Now)-Age]))
except
on EConvertError do
showmeaage('输入的不是一个有效数字')
on ERangeError do
showmeaage('输入值太大');
end;