delphi字串操作集
1.copy
字串的複製操作，有3個引數：
copy(源資料，複製起始位置(含)，複製長度)
2.leftstr ，rightstr (所在單元：strutils)
功能說明：返回字串左（右）邊指定個數的新字元(串)。該函式有兩個引數。第乙個引數為完整的字串，第二個引數為指定個數。
leftstr(源資料，長度)，rightstr (源資料，長度)
3.concat
連線字串函式，跟+號功能一樣，效率要比+號高，只連線字串。用法：concat(string1,string2,stringn)
delete 刪除函式用法：delete（字串，刪除開始位置，刪除長度）；
insert 插入函式用法：insert（插入的文字，原文本，插入位置）；
length 統計指定字串的長度。
ansiuppercase將字串中的英文轉換為大寫。
ansilowercase將字串中的英文轉換為小寫。
ansipos查詢字串所在位置。有2個引數。第乙個引數是要查詢的字元，第二個為被查詢的字元。注意：ansipos函式在查詢時是要區分字元大小的。如果要實現不區分大小，那麼需要使用uppercase或lowercase函式將兩個引數的字元(串)轉換為「大寫」或「小寫」再進行查詢。用法是：ansipos（要查詢的字元，被查詢字元）返回乙個布林型。
trim，trimright，trimleft
功能說明：trim刪除字串左右兩邊的空格(無論左右兩邊有多少個空格均被全部刪除)，trimright,timleft單獨刪除左右兩邊的空格。
procedure tform22.bt1click(sender: tobject);
var str1, str2: string;
ind: integer;
begin
str1 := edit1.text;
str2 := edit2.text;
ind := ansipos(str1,str2);
if ind <= 0 then
begin
label3.caption := '沒有找到' + str2+',返回**：'+inttostr(ind);
end;
if ind > 0 then
begin
label3.caption := '已經找到位於：' + inttostr(ind);
end;
end;
procedure tform22.bt2click(sender: tobject);
var s1, s2, s3: string;
in1, nlen2: integer;
begin
s1 := 'hello word';
s2 := copy(s1, 7, 4);
memo1.clear;
memo1.lines.add(s2); //word
memo1.lines.add(leftstr(s1, 5)); //hello
memo1.lines.add(rightstr(s1, 4)); //word
s2 := concat(leftstr(s1, 5), rightstr(s1, 4), '88', '測試' + '文字');
memo1.lines.add(s2); //helloword88測試文字
delete(s2, 2, 4);
s3 := s2; //直接寫s3:=delete(s2,2,4);會報錯。
memo1.lines.add(s3); // hword88測試文字
insert('ello', s3, 2);
memo1.lines.add(s3); //helloword88測試文字
in1 := length(s3);
memo1.lines.add(inttostr(in1)); //15
s3 := '藍海科技';
in1 := length(s3);
memo1.lines.add(inttostr(in1)); //4
memo1.lines.add('長度為：' + inttostr(s3.length)); //4
s3 := 'lhkj';
in1 := length(s3);
memo1.lines.add(inttostr(in1)); //4
s3 := 'lanhai王陽';
s3 := ansiuppercase(s3);
memo1.lines.add(s3); //lanhai王陽
s3 := ansilowercase(s3);
memo1.lines.add(s3); //lanhai王陽
s3 := ' lanhai王 陽 ';
memo1.lines.add(trim(s3)); //lanhai王陽兩邊沒空格）
memo1.lines.add((s3)); // lanhai王陽 （兩邊有空格）
memo1.lines.add(trimright(s3)); // lanhai王陽(左邊有空格)
memo1.lines.add(trimleft(s3)); //lanhai王陽 (右邊有空格)
setlength(s3, 5); //設定s3長度為5的字串
memo1.lines.add(trimleft(s3)); //l
end;
Delphi 字串操作
常忘記，在此做筆記。這幾個函式都包含在strutils中，所以需要uses strutils 假設字串是 dstr delphi is the best 那麼 leftstr dstr,5 delph midstr dstr,6,7 i is th rightstr dstr,6 e best fu...
DELPHI字串 陣列操作函式
1.copy 功能說明 該函式用於從字串中複製指定範圍中的字元。該函式有3個引數。第乙個引數是資料來源 即被複製的字串 第二個引數是從字串某一處開始複製，第三個引數是要複製字串的長度 即個數 最後函式返回乙個新的字串 即是我們指定要複製的字串內容 參考例項 var s string mystr st...
DELPHI字串 陣列操作函式
對字串及陣列的操作，是每個程式設計師必須要掌握的。熟練的使用delphi的這些函式，在程式設計時能更加得心應手。1.copy 功能說明 該函式用於從字串中複製指定範圍中的字元。該函式有3個引數。第乙個引數是資料來源 即被複製的字串 第二個引數是從字串某一處開始複製，第三個引數是要複製字串的長度 即個...