Delphi APP 开发入门(六)Object Pascal 语法初探.pdf

《Delphi APP 开发入门(六)Object Pascal 语法初探.pdf》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、DelphiAPP開發入門（六）ObjectPascal語法初探經過前面五週幾乎每週可以寫出一個簡單App後，大家都可以感受到Delphi強大的開發威力！這個禮拜要很快速的教大家Delphi的核心語言「ObjectPascal」，當然因為這系列的文章是「DelphiAPP開發入門」，所以不會著墨太多語法的部份(一方面是怕大家很快就嚇跑了)，筆者還是希望能擺在對入門有興趣為重心。接下來就教導大家最常見的變數、常數宣告、資料型態的種類、結構型態的宣告以及流程控制等基本語法，其他的部份就留待實戰時再一一解說了。程式註解單行註解使用的是雙反斜線//，多行註解使用的是{}1//這是單行註解2{13

2、2435這是多行註解6475}常數、變數ObjectPascal宣告變數的關鍵字是使用var，例如建立一個i1的變數，型態是Integer整數的話。1var2i1:Integer;如果同時宣告i1,i2都是整數時，可以用,隔開1var2i1,i2:Integer;而常數的關鍵字則是Const，我們建立一個pi的變數，型態是Double，值為3.141591Const2pi:Double=3.14159;型態種類ObjectPascal的型態種類繁多，甚至因為支援多種平台還有支援各平台的型態。我們僅先列出最常用的資料型態給大家參考，如果對完整的資料型態有興趣，可以參考Embarcadero

3、VariantType這一章節。基本的資料型態如下:1var2i:Integer;//整數3s:String;//字串4c:Char;//字元5d:Double;//浮點數6b:Boolean;//布林結構型態宣告結構型態的宣告是由程式設計師自訂之資料型態。例如宣告一個員工記錄1type2TEmployee=Record3Name:String;//員工姓名4Addr:String;//員工地址5Hour:Double;//上班時數6Employed:Boolean;//在職與否7end;或是宣告一個1到100的整數陣列1Type2TMyArray=array[1..100]ofinte

4、ger;流程控制if流程if流程控制大概是所有程式語言中最常用的判斷語法，在Delphi中的用法如下//用法1(單一判斷)ifZ>Bthen1s:='Z大於B';2//用法2(多重判斷)3ifZ>Bthen4s:='Z大於B'//注意這邊不5用;6elseifZBthenbegin7s:='Z大於B';//注意這邊要8用;9endelseifZFor迴圈for是一個明確執行次數的迴圈，可以升冪或降冪執行1//由1執行到102fori:=1to1

5、0dobegin3sum:=sum+i;4end;1//由10執行到12fori:=10downto1dobegin3sum:=sum+i;4end;While迴圈for與while最大的不同在於for有明確執行次數，但while則是依照條件判斷是否要執行，以剛才的1加到10為例。1Whilei<=10dobegin2sum:=sum+i;3i:=i+1;4end;repeat迴圈while與repeat都是條件式迴圈，而二者不同是while是先判斷再執行，repeat是先執行再判斷。1repeat2sum:=sum+i;3i:=i+1;4untili>10;Case多選一如果你的判斷是

6、要多選一的話，可以使用caseof的語法1caseiMonthof22,3,4:3Showmessage('春季');45..7:5Showmessage('夏季');68..10:7Showmessage('秋季');811..12,1:9Showmessage('冬季');10else11Showmessage('月份有誤');12end;程序與函數程序(procedure)與函數(function)的不同在於有無傳回值。varname:String;1procedureTForm1.hello1(s:String);2begin3name:='hello'+s;//如果需要傳遞值4

7、需在外部宣告變數5end;67functionTForm1.hello2(s:String):String;8begin9result:='hello'+s;//回傳字串型態變數10end;1112procedureTForm1.Button1Click(Sender:TObject);13var14s:String;15begin16s:='';17hello1('codedata');//直接呼叫18procedure19sho