對字串及陣列的操作,是每個程式設計師必須要掌握的。熟練的使用這些函式,
在程式設計時能更加得心應手。
1.copy
功能說明:該函式用於從字串中複製指定範圍中的字元。該函式有3個引數。第乙個引數是資料來源(即被複製的字串),第二個引數是從字串某一處開始複製,第三個引數是要複製字串的長度(即個數)。最後函式返回乙個新的字串(即是我們指定要複製的字串內容)。
vars: 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
功能說明:連線兩個或多個字串為乙個字串。
vars1, s2: string;
begin
s1 := concat(''a'', ''b''); // 連線兩個字串,s1變數等於ab。
s2 := concat(''borland'', '' delphi'', '' 7.0''); // 連線三個字元,s2變數等於borland delphi 7.0。
end;
3.delete
功能說明:刪除字串中指定的字串。該函式有三個引數。第乙個引數為要進行處理的字串,第二個引數為從何處開始刪除,第三個引數為刪除的字元個數。
vars: string;
begin
s := ''i like reading cpcw.'';
// 下面的**將刪除s變數中的「c」字元。
delete(s, 16, 1);
end;
此時s變數則是i like reading pcw.(「c」已經不存在了)。
4.high
功能說明:返回陣列下標的最大值。
vararrtext: array[0..9] of char;
i: integer;
begin
i := high(arrtext); // i的值則為9
end;
5.insert
功能說明:插入乙個字元(串)。該函式有三個引數。第乙個引數為要插入的字元(串),第二個引數為被插入字串(源字串),第三個引數為從何處插入。
vars: string;
begin
s := ''wat is your name?'';
// 上面句子中的what單詞查乙個「h」字元,下面使用insert函式將h新增進去。
insert(''h'', s, 2); // 將「h」從第2位處插入。
end;
6.leftstr(所在單元:strutils)
功能說明:返回字串左邊指定個數的新字元(串)。該函式有兩個引數。第乙個引數為完整的字串,第二個引數為指定個數。
vars, a: string;
begin
s := ''msn messenger'';
a := leftstr(s, 3); // 從最左邊開始,獲取左邊的三個字元。因此a變數則等於msn。
end;
7.length
功能說明:該函式用於統計指定字串的長度(即個數)。
varnlen1, nlen2: integer; // 用於儲存字串長度
begin
nlen1 := length(''cpcw'');
nlen2 := length(''電腦報'');
end;
執行結果,nlen1等於4,nlen2等於6。由於乙個漢字相當於兩個字元的長度,所以3個漢字的長度為6。
8.low
功能說明:返回陣列下標的最小值。
vararrtext: array[1..9] of char;
i: integer;
begin
i:= high(arrtext); // i的值則為1
end;
9.lowercase
功能說明:將字元(串)中的英文本元轉換為小寫。
vars, a: string;
begin
s := ''abc'';
a := uppercase(s); // 經過uppercase函式轉換後,a則等於abc。
end;
10.midstr(所在單元:strutils)
功能說明:返回指定範圍內的字串。該函式有三個引數。第乙個引數為源字串,第二個引數為起點,第三個引數為結束點。通過第
二、第三個引數則可指定要複製字串的範圍。
copy函式與此函式類似。midstr主要用於處理含有中文字元的字串。
vars: 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
功能說明:查詢字元(串)所在位置。該函式有二個引數。第乙個引數為要查詢的字元(串),第二個引數為被查詢字元(串)。
varnpos: integer; // 用於儲存查詢的字元所在位置
begin
npos := pos(''like'', ''i like reading!'');
end;
此時npos等於3。如果沒有查詢到,則npos為0。
注意:pos函式在查詢時是要區分字元大小的。如果要實現不區分大小,那麼需要使用uppercase或lowercase函式將兩個引數的字元(串)轉換為「大寫」或「小寫」再進行查詢。
另外還有乙個查詢字元(串)的函式----ansipos,該函式的使用方法與pos函式完全一樣。當你查詢的是漢字時,最好使用ansipos函式。
12.rightstr(所在單元:strutils)
功能說明:返回字串右邊指定個數的新字元(串)。該函式有兩個引數。第乙個引數為完整的字串,第二個引數為指定個數。
vars, a: string;
begin
s := ''msn messenger'';
a := rightstr(s, 3); // 從最右邊開始,獲取右邊的三個字元。因此a變數則等於ger。
end;
13.setlength
功能說明:設定字串或動態陣列長度。該函式有兩個引數。第乙個引數為要設定的字串變數或動態陣列變數,第二個引數為指定的長度,其取值範圍在0到255之間。
vars: string;
arrtext: array of char; // 定義乙個動態陣列
begin
setlength(s, 10); // 當設定後,s變數只能賦值長度為10的字串。
setlength(arrtext, 10); // 只有使用setlength為動態陣列分配記憶體空間後才能使用動態陣列。這句**的作用相當於arrtext: array[0..9] of char
end;
14.strpcopy
功能說明:將字串複製到字元陣列中。該函式有兩個引數。第乙個引數為「目標陣列」,第二個引數為「字串」。
vararrchar: array[0..255] of char; // 這裡宣告了長度為256的char型陣列
begin
strpcopy(arrchar, ''come on, baby!'');
end;
15.trim
功能說明:刪除字串左右兩邊的空格(無論左右兩邊有多少個空格均被全部刪除)。
vars: string;
begin
s := '' delphi 7.0 '';
s := trim(s);
end;
16.trimleft
功能說明:刪除字串左邊的空格(無論左邊有多少個空格均被全部刪除)。
s := trimleft('' delphi'');
17.trimright
功能說明:刪除字串左邊的空格(無論左邊有多少個空格均被全部刪除)。
s := trimright(''delphi '');
18.uppercase
功能說明:將字元(串)中的英文本元轉換為大寫。
vars, a: string;
begin
s := ''abc'';
a := uppercase(s); // 經過uppercase函式轉換後,a則等於abc。
end;
DELPHI字串 陣列操作函式
1.copy 功能說明 該函式用於從字串中複製指定範圍中的字元。該函式有3個引數。第乙個引數是資料來源 即被複製的字串 第二個引數是從字串某一處開始複製,第三個引數是要複製字串的長度 即個數 最後函式返回乙個新的字串 即是我們指定要複製的字串內容 參考例項 var s string mystr st...
DELPHI字串 陣列操作函式
對字串及陣列的操作,是每個程式設計師必須要掌握的。熟練的使用delphi的這些函式,在程式設計時能更加得心應手。1.copy 功能說明 該函式用於從字串中複製指定範圍中的字元。該函式有3個引數。第乙個引數是資料來源 即被複製的字串 第二個引數是從字串某一處開始複製,第三個引數是要複製字串的長度 即個...
DELPHI字串 陣列操作函式
對字串及陣列的操作,是每個程式設計師必須要掌握的。熟練的使用delphi的這些函式,在程式設計時能更加得心應手。1.copy 功能說明 該函式用於從字串中複製指定範圍中的字元。該函式有3個引數。第乙個引數是資料來源 即被複製的字串 第二個引數是從字串某一處開始複製,第三個引數是要複製字串的長度 即個...