線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:981
推到 Plurk!
推到 Facebook!

列印出指定的字串

答題得分者是:Stallion
solid098
一般會員


發表:16
回覆:14
積分:6
註冊:2007-02-15

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-04-23 13:57:12 IP:203.69.xxx.xxx 訂閱
DELPHI有任何方法可以指定一個字串從哪開始讀到哪裡停嗎?
sl:TstringList
我現在用的方法是rightstr(sl[sl.count-1],9)但這方法只能從右邊的讀取特定的幾個位元數,假設我的文字檔是XXXX;88888;XXXXX而我只要88888這幾各數字,不知道有什麼方法嗎
編輯記錄
taishyang 重新編輯於 2007-04-25 14:45:09, 註解 將文章分類成[問題]‧
solid098
一般會員


發表:16
回覆:14
積分:6
註冊:2007-02-15

發送簡訊給我
#2 引用回覆 回覆 發表時間:2007-04-23 14:30:11 IP:203.69.xxx.xxx 訂閱

我已經找到方法了,我是使用copy(memo.line[0],5,10)在把值傳到變數內,如果有更好的方法麻煩跟我說一下^^謝謝

===================引 用 solid098 文 章===================
DELPHI有任何方法可以指定一個字串從哪開始讀到哪裡停嗎?
sl:TstringList
我現在用的方法是rightstr(sl[sl.count-1],9)但這方法只能從右邊的讀取特定的幾個位元數,假設我的文字檔是XXXX;88888;XXXXX而我只要88888這幾各數字,不知道有什麼方法嗎
Stallion
版主


發表:52
回覆:1600
積分:1995
註冊:2004-09-15

發送簡訊給我
#3 引用回覆 回覆 發表時間:2007-04-23 19:08:52 IP:211.22.xxx.xxx 未訂閱
Uses
StrUtils;

function AnsiMidStr(const AText: AnsiString; const AStart, ACount: Integer): AnsiString;
function MidBStr(const AText: AnsiString; const AByteStart, AByteCount: Integer): AnsiString;
function MidStr(const AText: AnsiString; const AStart, ACount: Integer): AnsiString; overload;
function MidStr(const AText: WideString; const AStart, ACount: Integer): WideString; overload;

不勝枚舉,任君挑選~
系統時間:2024-05-19 13:34:04
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!