<ul id="6mmiq"></ul>
<fieldset id="6mmiq"></fieldset>
  • <strike id="6mmiq"><input id="6mmiq"></input></strike>
  • <ul id="6mmiq"></ul>
    您當前位置:首頁 > 新聞頻道 > 技術動態 > 正文
    Delphi綜述
    函數由一句或多句代碼組成,可以實現某個特定的功能。使用函數可以使代碼更加易讀、易懂,加快編程速度及減少重復代碼。過程與函數類似,過程與函數最重要的區別在于,過程沒有返回值,而函數能有返回值。 
      在Delphi 7.0中,已為我們定義好了非常多的函數,大致分類有6種:數據類型轉換函數、字符串、數組操作函數、文件、磁盤操作函數、內存、指針操作函數、數學運算函數、日期函數。

      在Delphi中調用函數,一般情況下可以直接使用函數即可,但由于有一些函數未包含在Uses中列出的單元中(默認單元有Windows,Messages,SysUtils,Variants,classes,Graphics, Controls,Forms,Dialogs,所以需要我們手動添加單元。比如,MidStr函數就未包含在這些單元中,MidStr所屬單元在StrUtils中,因此我們將StrUtils添加Uses中即可。

      在本手冊中,凡是未包含在默認列出的單元中的函數,都標明了其所屬的單元,使用時應當注意。

      一、數據類型轉換函數
      在我們編寫程序當中,根據不同情況,會使用到多種數據類型。當要對不同的類型進行操作時,必須要將不同的類型轉換成同樣的類型。因此熟練地掌握數據類型的轉換是非常重要的。

      1.FloatToStr
      功能說明:該函數用于將“浮點型”轉換成“字符型”。

      參考實例:

      Edit1.Text := FloatToStr(1.981); 

      2.IntToStr
      功能說明:該函數用于將“整數型”轉換成“字符型”。

      參考實例:

      S := IntToStr(10);(注:S為String類型變量。)

      3.IntToHex
      功能說明:該函數用于將“十進制”轉換成“十進制”。該函數有二個參數。第一個參數為要轉換的十進制數據,第二個參數是指定使用多少位來顯示十六進制數據。

      參考實例:

      Edit1.Text := IntToHex('100', 2);

      執行結果,Edit1.Text等于64。

      注意:Delphi沒有提供專門的“十六進制”轉換為“十進制”的函數。使用StrToInt函數可以實現這個功能。具體代碼是:I := StrToInt('S' + '64'); 這時I等于100。加上一個'S'即可將“十六進制”轉換為“十進制”。

      4.StrToInt
      功能說明:該函數用于將“字符型”轉換成“整數型”。

      參考實例:

      I := StrToInt('100');

      注意:不能轉換如 StrToInt('ab')或StrToInt('好')這樣的類型,因為他們并不存在數字型。

      5.StrToFloat
      功能說明:該函數用于將“字符型”轉換成“浮點型”。

      參考實例:

      N := StrToFloat(Edit1.Text);

      注意:Edit1.Text中的內容為1.981(凡在Edit控件中顯示的文本均為字符串)。N為Double類型,用于保存轉換后的浮點型數據。

      二、字符串、數組操作函數
      對字符串及數組的操作,是每個程序員必須要掌握的。熟練的使用這些函數,在編程時能更加得心應手。

      1.Copy
      功能說明:該函數用于從字符串中復制指定范圍中的字符。該函數有3個參數。第一個參數是數據源(即被復制的字符串),第二個參數是從字符串某一處開始復制,第三個參數是要復制字符串的長度(即個數)。最后函數返回一個新的字符串(即是我們指定要復制的字符串內容)。

      參考實例:

      var

        S: String;

        MyStr: String; // 保存新的字符串

      begin

        S := 'I Love China!';

      //下面將獲取I Love China中的“Love”字符串。

      MyStr := Copy(S, 3, 4);

      end;

      執行結果,MyStr等于“Love”,“Love”字符串在“I Love China!”中第3個位置開始,所以第二個參數為3,“Love”一共有4個字符,所以第三個參數為4。

      2.Concat
      功能說明:連接兩個或多個字符串為一個字符串。

      參考實例:

      var

        S1, S2: String;

      begin

        S1 := Concat('A', 'B'); // 連接兩個字符串,S1變量等于AB。

        S2 := Concat('Borland', ' Delphi', ' 7.0'); // 連接三個字符,S2變量等于Borland Delphi 7.0。

      end;

      3.Delete
      功能說明:刪除字符串中指定的字符串。該函數有三個參數。第一個參數為要進行處理的字符串,第二個參數為從何處開始刪除,第三個參數為刪除的字符個數。

      參考實例:

      var

        S: String;

      begin

        S := 'I Like Reading CPCW.'; 

        // 下面的代碼將刪除S變量中的“C”字符。

        Delete(S, 16, 1);

      end;

      此時S變量則是I Like Reading PCW.(“C”已經不存在了)。

      4.High
      功能說明:返回數組下標的最大值。

      參考實例:

      var

        arrText: array[0..9] of Char;

        i: Integer;

      begin

        i := High(arrText); // i的值則為9

      end;



      5.Insert
      功能說明:插入一個字符(串)。該函數有三個參數。第一個參數為要插入的字符(串),第二個參數為被插入字符串(源字符串),第三個參數為從何處插入。

      參考實例:

      var

        S: String;

      begin

        S := 'Wat is your name?';

        // 上面句子中的What單詞查一個“h”字符,下面使用Insert函數將h添加進去。

        Insert('h', S, 2); // 將“h”從第2位處插入。

      end;

      6.LeftStr(所在單元:StrUtils)
      功能說明:返回字符串左邊指定個數的新字符(串)。該函數有兩個參數。第一個參數為完整的字符串,第二個參數為指定個數。

      參考實例:

      var

        S, A: String;

      begin

        S := 'MSN Messenger';

       A := LeftStr(S, 3); // 從最左邊開始,獲取左邊的三個字符。因此A變量則等于MSN。

      end;

      7.Length
      功能說明:該函數用于統計指定字符串的長度(即個數)。

      參考實例:

      var

      nLen1, nLen2: Integer; // 用于保存字符串長度

      begin

        nLen1 := Length('CPCW');

      nLen2 := Length('電腦報');

      end;

      執行結果,nLen1等于4,nLen2等于6。由于一個漢字相當于兩個字符的長度,所以3個漢字的長度為6。

      8.Low
      功能說明:返回數組下標的最小值。

      參考實例:

      var

        arrText: array[1..9] of Char;

        i: Integer;

      begin

        i:= High(arrText); // i的值則為1

      end;

      9.LowerCase
      功能說明:將字符(串)中的英文字符轉換為小寫。

      參考實例:

      var

        S, A: String;

      begin

        S := 'ABC';

        A := UpperCase(S); // 經過UpperCase函數轉換后,A則等于abc。

      end;

      10.MidStr(所在單元:StrUtils)
      功能說明:返回指定范圍內的字符串。該函數有三個參數。第一個參數為源字符串,第二個參數為起點,第三個參數為結束點。通過第二、第三個參數則可指定要復制字符串的范圍。

      Copy函數與此函數類似。MidStr主要用于處理含有中文字符的字符串。

      參考實例:

      var

        S: String;

        H: String;

      begin

        S := MidStr('China', 1, 2); // S變量為Ch

        H := MidStr('電腦報', 1, 1); // H變量為“電”。如果使用Copy函數,則應是H := Copy('電腦報, 1, 2),否則返回的將不是“電”字。因此在使用操作含有中文的字符串時,最好使用MidStr。

      end;

      11.Pos
      功能說明:查找字符(串)所在位置。該函數有二個參數。第一個參數為要查找的字符(串),第二個參數為被查找字符(串)。

      參考實例:

      var

        nPos: Integer; // 用于保存查找的字符所在位置

      begin

        nPos := Pos('Like', 'I Like Reading!');

      end;

      此時nPos等于3。如果沒有查找到,則nPos為0。

      注意:Pos函數在查找時是要區分字符大小的。如果要實現不區分大小,那么需要使用UpperCase或LowerCase函數將兩個參數的字符(串)轉換為“大寫”或“小寫”再進行查找。

      另外還有一個查找字符(串)的函數----AnsiPos,該函數的使用方法與Pos函數完全一樣。當你查找的是漢字時,最好使用AnsiPos函數。

      12.RightStr(所在單元:StrUtils)
      功能說明:返回字符串右邊指定個數的新字符(串)。該函數有兩個參數。第一個參數為完整的字符串,第二個參數為指定個數。

      參考實例:

      var

        S, A: String;

      begin

        S := 'MSN Messenger';

        A := RightStr(S, 3); // 從最右邊開始,獲取右邊的三個字符。因此A變量則等于ger。

      end;

      13.SetLength
      功能說明:設置字符串或動態數組長度。該函數有兩個參數。第一個參數為要設置的字符串變量或動態數組變量,第二個參數為指定的長度,其取值范圍在0到255之間。

      參考實例:

      var

        S: String;

        arrText: array of Char; // 定義一個動態數組

      begin

        SetLength(S, 10); // 當設置后,S變量只能賦值長度為10的字符串。

        SetLength(arrText, 10); // 只有使用SetLength為動態數組分配內存空間后才能使用動態數組。這句代碼的作用相當于arrText: array[0..9] of Char

      end;

      14.StrPCopy
      功能說明:將字符串復制到字符數組中。該函數有兩個參數。第一個參數為“目標數組”,第二個參數為“字符串”。

      參考實例:
      var
        arrChar: array[0..255] of Char; // 這里聲明了長度為256的Char型數組
      begin
        StrPCopy(arrChar, 'Come on, baby!');
      end;
      15.Trim
      功能說明:刪除字符串左右兩邊的空格(無論左右兩邊有多少個空格均被全部刪除)。
      參考實例:
      var

        S: String;

      begin

        S := ' Delphi 7.0 ';

        S := Trim(S);

      end;

      16.TrimLeft
      功能說明:刪除字符串左邊的空格(無論左邊有多少個空格均被全部刪除)。

      參考實例:

        S := TrimLeft(' Delphi');

      17.TrimRight
      功能說明:刪除字符串左邊的空格(無論左邊有多少個空格均被全部刪除)。

      參考實例:
        S := TrimRight('Delphi ');
      18.UpperCase
      功能說明:將字符(串)中的英文字符轉換為大寫。

      參考實例:
      var
        S, A: String;
      begin
        S := 'abc';
        A := UpperCase(S); // 經過UpperCase函數轉換后,A則等于ABC。

      end;
    關鍵字:通訊
    About Us - 關于我們 - 服務列表 - 付費指導 - 媒體合作 - 廣告服務 - 版權聲明 - 聯系我們 - 網站地圖 - 常見問題 - 友情鏈接
    Copyright©2014安裝信息網 www.zqccq.com. All rights reserved.
    服務熱線:4000-293-296 聯系電話:0371-61311617 傳真:0371-55611201 QQ: 郵箱:zgazxxw@126.com 豫ICP備18030500號-4
    未經過本站允許,請勿將本站內容傳播或復制
    安全聯盟認證
    主站蜘蛛池模板: 男女男精品视频网站在线观看 | 亚洲国产精品国自产电影| 精品无码久久久久久尤物| 精品一区二区三区无码免费视频| 无码日韩精品一区二区免费 | 久久97久久97精品免视看秋霞| 精品水蜜桃久久久久久久| 青春草无码精品视频在线观| 合区精品中文字幕| 特级精品毛片免费观看| 国产精品美女久久久久 | 亚洲综合国产精品第一页 | 亚洲欧美国产∧v精品综合网| 无码精品A∨在线观看| 成人国内精品久久久久影院 | 亚洲国产成人精品无码久久久久久综合 | 国产精品无码一区二区三区电影| 欧美精品v欧洲精品| 国产精品麻豆高清在线观看| 国产精品99久久不卡| 亚洲AV蜜桃永久无码精品| 国产精品久线在线观看| 国产高清在线精品一本大道国产| 欧美日韩精品一区二区视频 | 日韩精品无码人妻一区二区三区 | 精品国产不卡一区二区三区 | 久久亚洲国产成人精品性色| 四虎4hu永久免费国产精品| 美女岳肉太深了使劲国产精品亚洲专一区二区三区 | 亚洲国产成人久久精品动漫 | 亚洲国产第一站精品蜜芽| 91视频国产精品| 国产一区二区三精品久久久无广告| 真实国产乱子伦精品一区二区三区| 国产精品自产拍在线观看| 久久久久久一区国产精品| 国产欧美日韩精品a在线观看 | 欧美精品久久久久久久自慰 | 亚洲精品tv久久久久| 久久国产精品久久精品国产| 无码人妻精品一区二区蜜桃百度 |