Delphi中優秀的字串分割函式

delphi沒有自己的字串分割函式，所以只能程式設計師自己寫了，網上搜了好多但是真正好用的沒有幾個。

下面這個是我在網上找到修改後了的，個人感覺演算法不錯，所以就貼了上來。

function splitstring(source, deli: string ): tstringlist;stdcall;

var endofcurrentstring: byte;
stringlist:tstringlist;
begin
stringlist:=tstringlist.create;
while pos(deli, source)>0 do
begin
endofcurrentstring := pos(deli, source);
stringlist.add(copy(source, 1, endofcurrentstring - 1));
source := copy(source, endofcurrentstring + length(deli), length(source) - endofcurrentstring);
end;
result := stringlist;
stringlist.add(source);
end;

DELPHI中優秀的字串分割函式

delphi沒有自己的字串分割函式，所以只能程式設計師自己寫了，網上搜了好多但是真正好用的沒有幾個，下面這個是我在網上找到修改後了的，個人感覺演算法不錯，所以就貼了上來。function splitstring source,deli string tstringlist stdcall var e...

DELPHI 字串分割處理

tstringlist，預設分割符為逗號 空格 回車，還可以指定單個字元 但是待分解的字串中不能包含逗號 空格 回車 indy的庫函式和tstringlist差不多，也不能包含逗號 空格 回車 下面這個函式是我自己寫的，指定分割符，可以單個字元，也可以是多個字元為分割符號，專案中一直在用，還不錯 f...

delphi之分割字串

因為喜歡用文本來記錄資料，比如帳號密碼等等，乙個遊戲帳戶一行 帳號1,密碼1,遊戲區11 帳號2,密碼2,遊戲區11 需要用到分割字串函式。delphi的classes有extractstrings函式，感覺用起來不好，後來網上找了個，如下 function splitstring pstring ...