Delphi中擷取字串

以擷取*號為例，edtspec_1為tedit,strspec為*號之前的字元，strspec2位*號之後的字元

starposition:integer;

strspec,strspec1,strspec2:string;

starposition:=pos('*',edtspec_1.text);

if starposition<=0 then

showmessage('規格輸入格式不正確，請重新輸入！')

else

begin

strspec:=edtspec_1.text;

delete(strspec,starposition,length(edtspec_1.text)-starposition+1);

strspec1:=strspec;

strspec:=edtspec_1.text;

delete(strspec,1,length(strspec1)+1);

strspec2:=strspec;

...end;

Delphi中擷取字串

如果要使用leftstr,rightstr,midstr必需引用系統單元strutils 宣告變數str string str helloworld 1,leftstr str,2 he 從str字串變數的最左邊 第乙個字元包括第乙個字元 開始擷取2個字元 2,rightstr str,2 ld 從...

Delphi 擷取字串 詳細注釋

rad studio 10.3.3 測試 字串分割 被分割的字串 分隔標識 陣列 tarray string function mstrsplit mstr string mdelimiter string tarray var i,len,count integer mpart string ma...

Delphi擷取字串 防止中文截斷

在delphi中，用length來取字元長度時，會將漢字當成兩個位元組來計算，copy把漢字當成兩個來處理，可能擷取半個漢字，那我們如何知道是否取的是漢字呢?是否把乙個漢字取完整了呢?其實，可以用bytetype對取出來的字元進行判斷是乙個單字元還是漢字的一部分 mbleadbyte 漢字的第乙個位...