熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> Delphi編程 >> 正文

Delphi面向對象的編程方法(六)

2022-06-13   來源: Delphi編程 

  字符串類型 

       字符串類型事實上是一個一維的字符數組當您說明一個字符串型的變量時您應當指明這個字符串的大小下面是說明字符串類型的例子

  type
  MyString: string[];
  var
  MyName: MyString; 

       則變量MyName被說明成為最多可以包含個字符如果您沒有說明字符串的大小Delphi會認為字符串包含最大值個字符給字符串賦值可以直接使用單引號括起的字串賦值 

  MyName := FrankSmith;或MyName := 張明 

       因為MyName是一個可以包含個字符的MyString型變量上文的兩個的變量都是有效的一個漢字可以視作兩個字符當您給字符串型變量賦的值多於定義數值時例如將MyName賦為FrankSmithFranklin則Delphi只會接受前個字符FrankSmithFran在內存中字符串通常占用比所說明的大小多一個字節的空間因為第一個位置是一個包含這個數組大小的字節您可以使用索引值來訪問字符串的字符MyName[]可以得到MyName的第一個字符F

       您可以使用Delphi豐富的運算符過程和函數來處理字符串型的變量和屬性下面介紹幾個常用的運算符和Delphi過程或函數

       Concat和(+)功能相同都可以將多個字符串組合在一起建立一個較大的字符串Copy會返回一個字符串中的子字符串Delete在一個字符串中從一個指定位置起刪除一定數目的字符Insert在一個字符串中插入一個字符串Length返回字符串的長度Pos返回一個子字符串在一個字符串中的位置即索引值 

  集合類型 

       集合類型是一群相同類型元素的組合這些類型必須是有限類型如整形布爾型字符型枚舉型和子界型在檢查一個值是否屬於一個特定集合時集合類型非常有用下面的例程可以說明集合類型的用法

       在窗體上加入一個編輯框和一個按鈕清除編輯框中的文字在其上加上Caption為輸入元音的標簽Label並在編輯框的下方加入一個空的標簽將按鈕的Default屬性改為True建立按鈕的事件處理過程如下 

  procedure TFormButtonClick(Sender:TObject);
  type
  Tvowels=set of Char;
  var
  Vowels:TVowels;
  begin
  Vowels := [aeiou];
  if EditText[] in Vowels then
  LableCaption := 是元音;
  else
  LableCaption := 請再試;
  end; 

       執行這個程序在編輯框中輸入字母表達式EditText[] in Vowels的結果是布爾型的in是運算符用來判斷字母是否存在於集合中輸入的判別結果會顯示在編輯框的下方以上就用到了集合類型TVowels 

  記錄類型 

       記錄是您的程序可以成組訪問的一群數據的集合下面的例程說明了一個記錄類型的用法 

  type
  TEmployee=record
  Name : string[];
  YearHired:;
  Salsry: Double;
  Position: string[];
  end; 

  記錄包含可以保存數據的域每一個域有一個數據類型上文的記錄TEmployee類型就含有四個域您可以用以下的方式說明記錄型的變量 

  var
  NewEmployeePromotedEmployee:TEmployee;

       用如下的方法可以訪問記錄的單域

  NewEmployeeSalary := ;

  編寫如下的語句可以給整個記錄賦值 

  with PromotedEmployee do
  begin
  Name :=;
  YearHired := ;
  Salary :=
  Position := editor;
  end; 

       您的程序可以將記錄當成單一實體來操作 

  PromptEmployee := NewEmployee;

  以上介紹了用戶常用的自定義類型在Delphi的編程中對象是非常重要的用戶自定義數據類型象記錄一樣對象是結構化的數據類型它包含數據的域(Field)也包含作為方法的過程和函數在Delphi中當您向窗體中加入一個部件也就是向窗體對象中加入了一個域每一個部件也是對象每當您建立一個事件處理過程使得部件可以響應一個事件時您即自動地在窗體中加入了一個方法在本章第節中將詳細講述Delphi面向對象編程的方法和技巧 

   Object Pascal的庫單元Unit 

  Units是常量變量數據類型過程和函數的集合而且能夠被多個應用程序所共享Delphi已經擁有許多預定義的程序庫單元可供您建立您的程序庫單元使用Delphi的Visual Component Library由多個程序庫單元組成它們說明了對象部件以供您的應用程序用來設計用戶界面例如當您在窗體中加入一個Check Box時Delphi自動在您的程序庫單元中加入了Stdctrls庫單元因為TCheckBox部件是在StdCtrls庫單元中說明的

  當您設計您的窗體時Delphi自動建立一個和您的窗體有關的庫單元您的庫單元不必都和窗體有關也可以使用預定義的只包含數學運算函數的庫單元或是自行編寫數學函數庫單元在一個庫單元中所有的說明都相互有關系例如CDialogs程序庫單元包含了在您的應用程序中使用的普通對話框的所有說明

   Object Pascal程序庫單元的結構 

       不管一個庫單元是否和一個窗體有關庫單元的結構都是相同的其結構如下 

  unit <庫單元名稱> 
  interface 
  uses <選擇性的庫單元列表>
  {公有說明} 
  implementation 
  uses <選擇性的庫單元列表>

  在implementation部分的uses子句中指定的庫單元只供給本庫單元的程序使用其interface中說明的程序其他使用本庫單元的庫單元不能訪問這些在implementation的udes子句中庫單元的說明因為在implementation後進行的庫單元包含是私有的所以上例中如果C出現在B的implementation部分則A不能使用C的公有部分除非C出現在A的uses子句中在implementation中出現的循環訪問是Delphi所允許的如果A的implemetation的uses子句中出現B則B的implementation部分也可以出現A 

  程序庫單元的初始化部分 

  初始化當前庫單元所使用的數據或是通過interface部分將數據提供給其他應用程序庫單元使用時您可以在庫單元中加入一個initialization部分在庫單元的end前加上您的初始化語句當一個應用程序使用一個庫單元時在庫單元中的initialization部分會先於其他的代碼執行如果一個應用程序使用了多個庫單元則每一個庫單元的初始化部分都會在所有的程序代碼前執行 

  使用Delphi的可視化部件及其庫單元 

  當您在窗體中加入可視化部件時如果該部件在可視化部件庫中Delphi會在您的庫單元的interface部分的uses子句中自動加上需要使用的庫單元名稱但有些對象在Delphi的環境中並沒有可視化部件存在例如您想在庫單元中加入一個預定義的信息框則您必須把MsgDlg庫單元加入您的uses子句中如果您要使用TPrinter對象的話必須將Printer庫單元加入uses子句中在在線幫助中可以查到對象所屬的預定義庫單元

  要使用在其他庫單元中說明的函數應在函數的前面加上這一庫單元的名稱並用號隔開例如要在Unit中使用Unit中說明的Calculate函數應使用下面的方法

  Number := UnitCalculate();

  您可以在任何標識符如屬性常量變量數據類型函數等之前加上庫單元的名稱您可以在自由地在任何Delphi庫單元中加入程序代碼但不要改變由Delphi生成的程序 

   建立與窗體無關的新庫單元 

  如果您想在工程中建立一個和任何窗體無關的新庫單元可以現選用File|New Unit這時一個新的庫單元加入了工程新庫單元的代碼如下 

  unit Unit;
  interface
  implementation
  end 

  Delphi將根據您的工程中的文件數目為您的庫單元選擇名稱您可以在程序骨架間加入您的程序代碼

  當編譯您的工程時這個新加入的庫單元會被編譯為一個具有DCU後綴的文件這個新生成的文件是鏈接到工程的可執行文件上的機器代碼

  {私有說明}
  {過程和函數的執行部分}
  initialization {選擇性的}
  {選擇性的初始化程序}
  end 

  程序庫單元的接口部分 

  interface是庫單元的接口部分它決定了本庫單元對其他任何庫單元或程序的可見(可訪問)部分您可以在接口部分說明變量常量數據類型過程和函數等等Delphi在您設計窗體的庫單元中將窗體數據類型窗體變量和事件處理過程都說明在這一部分

  interface標志庫單元接口部分的開始在interface中的說明對要使用這些說明的其他庫單元或應用程序是可見的一個庫單元可以使用其他Unit的說明只需要在uses子句中指明那些庫單元即可例如您在庫單元A中編寫程序代碼且您想調用UnitB於interface部分說明的程序您可以把庫單元B的名稱加入到A的interface部分的uses子句中則任何A中的程序都可以調用B中說明的程序而且如果B中interface部分的uses子句中出現C庫單元盡管A中未曾出現CA同樣可以調用BC庫單元在interface中說明的程序但如果B出現在A的interface部分的uses子句中那麼庫單元A便不能出現在B的interface的uses子句中因為這樣會產生對庫單元的循環訪問當試圖編譯時會產生出現錯誤信息 

  程序庫單元的實現部分 

  實現部分implementation中包含interface中說明的過程函數事件處理過程的具體實現程序代碼這一部分可以有自己的額外說明但這些說明是私有的外部程序不能調用這些說明在interface中說明的函數實體必須在implementation部分出現可以使用標題簡寫只輸入procedure或function保留字後面跟過程或函數的名稱即可其後則是程序的實現部分了如果您在implementation部分說明任何常式其標題並未出現在interface部分則必須寫全其標題部分

  在implementation部分的uses子句中指定的庫單元只供給本庫單元的程序使用其interface中說明的程序其他使用本庫單元的庫單元不能訪問這些在implementation的udes子句中庫單元的說明因為在implementation後進行的庫單元包含是私有的所以上例中如果C出現在B的implementation部分則A不能使用C的公有部分除非C出現在A的uses子句中在implementation中出現的循環訪問是Delphi所允許的如果A的implemetation的uses子句中出現B則B的implementation部分也可以出現A


From:http://tw.wingwit.com/Article/program/Delphi/201311/8489.html
    推薦文章
    Copyright © 2005-2022 電腦知識網 Computer Knowledge   All rights reserved.