字串擷取問題 |
答題得分者是:eaglewolf
|
cursegold
一般會員 發表:16 回覆:36 積分:15 註冊:2006-08-22 發送簡訊給我 |
|
P.D.
版主 發表:603 回覆:4038 積分:3874 註冊:2006-10-31 發送簡訊給我 |
1.針對所提問題解答
假設你的 cut(...) function 是自己寫好的, mstr:= CUT(',',MSTR); 就成了 2.要擷取字串, 可以用 copy( ), Delete( ), 可再搭配 StringReplace( ) function 就可以做到 提供你做參考 ======================================================================== 位大大好? 小弟我有一個問題想請教大家? 今天我在DELPHI裡面宣告一個字串變數 var mStr:string; 後我在程式裡面做 mstr:='A,B,C'; 後 把MSTR傳入一個FUNCTION 叫做CUT(XTOKEN,XSTR:STRING):STRING; RESULT:=CUT(',',MSTR); 此時CUT會回傳一個值假如是 A 所以RESULT為A 請教各為我要如何再跑完CUT這個FUNCTION後MSTR馬上就變成字串B,C了 而不是A,B,C
編輯記錄
P.D. 重新編輯於 2010-03-10 02:09:39, 註解 無‧
|
cursegold
一般會員 發表:16 回覆:36 積分:15 註冊:2006-08-22 發送簡訊給我 |
版主大 你好
今天主要是要寫一個FUNCTION CUT 只要我傳入一個字串跟TOKEN 就可以得到字串擷取後的2個值例如 我今天有一個字串 'ABC,BCD,CDE' 我把此字串丟入CUT FUNCTION後除了可以得到RESULT回傳值'ABC'以外 我原本丟進去的變數會變成被截斷後的值 'BCD,CDE' 所以我不能用mstr:= CUT(',',MSTR); 因為我CUT回傳出來值是'ABC'所以我式宣告另一個變數假如是 mTEMP:=CUT(',',MSTR);但我原本的MSTR希望變成'BCD,CDE' 謝謝 ===================引 用 P.D. 文 章=================== 1.針對所提問題解答 假設你的 cut(...) function 是自己寫好的, mstr:= CUT(',',MSTR); 就成了 2.要擷取字串, 可以用 copy( ), Delete( ), 可再搭配 StringReplace( ) function 就可以做到 提供你做參考 ======================================================================== 位大大好? 小弟我有一個問題想請教大家? 今天我在DELPHI裡面宣告一個字串變數 var mStr:string; 後我在程式裡面做 mstr:='A,B,C'; 後 把MSTR傳入一個FUNCTION 叫做CUT(XTOKEN,XSTR:STRING):STRING; RESULT:=CUT(',',MSTR); 此時CUT會回傳一個值假如是 A 所以RESULT為A 請教各為我要如何再跑完CUT這個FUNCTION後MSTR馬上就變成字串B,C了 而不是A,B,C
------
蔡志全 |
eaglewolf
資深會員 發表:4 回覆:268 積分:429 註冊:2006-07-06 發送簡訊給我 |
修改宣告
function CUT(XTOKEN:string; var XSTR:string):string; 在cut function中 最後一行加入 XSTR := RightStr(XSTR, Length(XSTR) - Pos(XTOKEN,XSTR)); ===================引 用 cursegold 文 章=================== 各位大大好 小弟我有一個問題想請教大家 今天我在DELPHI裡面宣告一個字串變數 var mStr:string; 後我在程式裡面做 mstr:='A,B,C'; 後 把MSTR傳入一個FUNCTION 叫做CUT(XTOKEN,XSTR:STRING):STRING; RESULT:=CUT(',',MSTR); 此時CUT會回傳一個值假如是 A 所以RESULT為A 請教各為我要如何再跑完CUT這個FUNCTION後MSTR馬上就變成字串B,C了 而不是A,B,C
------
先查HELP 再查GOOGLE 最後才發問 沒人有義務替你解答問題 在標題或文章中標明很急 並不會增加網友回答速度 Developing Tool: 1.Delphi 6 2.Visual Studio 2005 3.Visual Studio 2008 DBMS: MS-SQL |
cursegold
一般會員 發表:16 回覆:36 積分:15 註冊:2006-08-22 發送簡訊給我 |
eaglewolf 你好
XSTR := RightStr(XSTR, Length(XSTR) - Pos(XTOKEN,XSTR)); 我之前試過了 你只是改變了CUT 裡面的XSTR 他並不會引想你當初都給CUT 這個FUNCTION的變數 例如 MSTR:='ABC,BCD,DEF' MTEMP:=CUT(',',MSTR); 雖然CUT FUNCTION 裡面 XSTR := RightStr(XSTR, Length(XSTR) - Pos(XTOKEN,XSTR)); XSTR變成'BCD,DEF' 但是離開CUT FUNCTION 後MSTR還是'ABC,BCD,DEF' 謝謝 ===================引 用 eaglewolf 文 章=================== 修改宣告 function CUT(XTOKEN:string; var XSTR:string):string; 在cut function中 最後一行加入 XSTR := RightStr(XSTR, Length(XSTR) - Pos(XTOKEN,XSTR));
------
蔡志全 |
eaglewolf
資深會員 發表:4 回覆:268 積分:429 註冊:2006-07-06 發送簡訊給我 |
|
syntax
尊榮會員 發表:26 回覆:1139 積分:1258 註冊:2002-04-23 發送簡訊給我 |
function CUT(XTOKEN:string; var XSTR:string):string;
還是標給他看吧,連這都不知道,肯定沒看書,所以這基本常識都沒有 cursegold 建議你自己花點時間,補足基本常識,沒有書,那看 Deplhi 自帶的 Help 也是一樣 新版還有 Wiki 可看 http://docwiki.embarcadero.com/RADStudio/en/Parameters_(Delphi) ===================引 用 eaglewolf 文 章=================== 你有修改宣告嗎? function CUT(XTOKEN:string; var XSTR:string):string; |
cursegold
一般會員 發表:16 回覆:36 積分:15 註冊:2006-08-22 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |