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

如何识别分隔符号读取不同数值?

答題得分者是:pcboy
BIG-ROM
初階會員


發表:94
回覆:91
積分:37
註冊:2005-04-16

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-03-12 12:05:16 IP:219.130.xxx.xxx 未訂閱
在数据表内有一字段,内容为: "1,2,3,4,5,...."以 逗号 作为分隔符,每一数值分别表示不同权限,如何识别逗号分隔,将不同的数值读取??
Stallion
版主


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

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-03-12 12:38:51 IP:75.41.xxx.xxx 未訂閱
2 ways.
1. Do it your self ! press F1, see Pos function.
2. Use TStringList object, there is a property named DelimitedText which meets your need.
===================引 用 BIG-ROM 文 章===================
在数据表内有一字段,内容为: "1,2,3,4,5,...."以 逗号 作为分隔符,每一数值分别表示不同权限,如何识别逗号分隔,将不同的数值读取??
pcboy
版主


發表:177
回覆:1838
積分:1463
註冊:2004-01-13

發送簡訊給我
#3 引用回覆 回覆 發表時間:2008-03-12 13:14:21 IP:61.220.xxx.xxx 訂閱
供您參考

[code cpp]
procedure TForm1.FormCreate(Sender: TObject);
var
ss:TStringList;
s:string;
i: Integer;
begin
s:='1,2,3,4,5';
ss:=TStringlist.Create;
ss.Delimiter:=',';
ss.DelimitedText:=s;
for i:=0 to ss.count-1 do
begin
showmessage(ss[i]);
end;
end;
[/code]
------
能力不足,求助於人;有能力時,幫幫別人;如果您滿意答覆,請適時結案!

子曰:問有三種,不懂則問,雖懂有疑則問,雖懂而想知更多則問!
BIG-ROM
初階會員


發表:94
回覆:91
積分:37
註冊:2005-04-16

發送簡訊給我
#4 引用回覆 回覆 發表時間:2008-03-12 16:26:20 IP:219.130.xxx.xxx 未訂閱
感谢  pcboy 版主 大人!!

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