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

將多個Edit物件的text串起來的方法有 ?

答題得分者是:P.D.
Aybar
一般會員


發表:1
回覆:1
積分:0
註冊:2011-07-06

發送簡訊給我
#1 引用回覆 回覆 發表時間:2011-07-06 16:11:53 IP:61.221.xxx.xxx 訂閱
請問一下如果我要將同在一個FORM的多個EDIT的TEXT串起來,除了能用這種跑迴圈的方式
還有其他的嗎?
[code delphi]
var i : integer;
s : string;

for i:=0 to ComponentCount -1 do begin
if (Components[i] is Tedit) then
s :=s TEdit(Components[i]).Text;
end;
showmessage(s);
[/code]
P.D.
版主


發表:603
回覆:4038
積分:3874
註冊:2006-10-31

發送簡訊給我
#2 引用回覆 回覆 發表時間:2011-07-06 21:50:59 IP:118.169.xxx.xxx 未訂閱
換成是我, 也是這樣做法, 我覺得這已經是很好的處理方式!
===================引 用 Aybar 文 章===================
請問一下如果我要將同在一個FORM的多個EDIT的TEXT串起來,除了能用這種跑迴圈的方式
還有其他的嗎?
[code delphi]
var i : integer;
s : string;

for i:=0 to ComponentCount -1 do begin
if (Components[i] is Tedit) then
s :=s TEdit(Components[i]).Text;
end;
showmessage(s);
[/code]
mephise
高階會員


發表:4
回覆:149
積分:205
註冊:2004-02-09

發送簡訊給我
#3 引用回覆 回覆 發表時間:2011-07-07 06:39:03 IP:220.137.xxx.xxx 訂閱
我也只會這招而以, 還有更高的招數嗎?  
------
Mephise Chen
前興德工程師
max5020
資深會員


發表:29
回覆:277
積分:321
註冊:2003-06-04

發送簡訊給我
#4 引用回覆 回覆 發表時間:2011-07-07 13:32:16 IP:211.22.xxx.xxx 訂閱
Edit1.Text Edit2.Text Edit3.Text .....
mephise
高階會員


發表:4
回覆:149
積分:205
註冊:2004-02-09

發送簡訊給我
#5 引用回覆 回覆 發表時間:2011-07-07 16:27:53 IP:220.137.xxx.xxx 訂閱
噗  沒有不敬之意  我笑了 ^^

===================引 用 max5020 文 章===================
Edit1.Text Edit2.Text Edit3.Text .....
------
Mephise Chen
前興德工程師
Aybar
一般會員


發表:1
回覆:1
積分:0
註冊:2011-07-06

發送簡訊給我
#6 引用回覆 回覆 發表時間:2011-07-07 19:12:35 IP:61.221.xxx.xxx 訂閱
謝謝各位的回應,看來是我想太多了...

另外看到max5020大大的回應,也不自覺的會心一笑,心情愉快許多.....
===================引 用 max5020 文 章===================
Edit1.Text Edit2.Text Edit3.Text .....
系統時間:2024-04-26 14:01:01
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!