請問各位大大該怎樣動態建立物件 |
答題得分者是:pcplayer99
|
xhunger
一般會員 發表:3 回覆:4 積分:1 註冊:2007-05-24 發送簡訊給我 |
|
Stallion
版主 發表:52 回覆:1600 積分:1995 註冊:2004-09-15 發送簡訊給我 |
你有搜尋KTOP嗎?
看看這篇雷同的東西。 http://delphi.ktop.com.tw/board.php?cid=30&fid=71&tid=87653 ===================引 用 xhunger 文 章=================== 請問各位大大 我今天在FORM裡面想要用FOR迴圈去動態建立LABEL 並且LABEL的名稱是可被回圈控制的 比如 FOR i:=0 to 3 do begin LABEL.name:= i //或是一個陣列 end; 因為我主要是想要分別最創出來的LABEL來做屬性變化 煩請各位大大幫我解答一下 完全不知道該怎樣動態建立LABEL 看了其他文章還是看不懂在寫什麼 可以用簡單一點的程式碼說明一下嗎? 謝謝,拜託拜託 |
xhunger
一般會員 發表:3 回覆:4 積分:1 註冊:2007-05-24 發送簡訊給我 |
var
EditArray:array[0..4] of TEdit; i:integer; begin for i := 0 to 4 do begin EditArray[i] := TEdit.Create(Self); EditArray[i].Name := 'Edit' IntToStr(i); EditArray[i].Visible := true; EditArray[i].Left := 100; EditArray[i].top := 100 i * 10; end; for i := 0 to 4 do EditArray[i].Free; end;
------
HAO |
xhunger
一般會員 發表:3 回覆:4 積分:1 註冊:2007-05-24 發送簡訊給我 |
|
Stallion
版主 發表:52 回覆:1600 積分:1995 註冊:2004-09-15 發送簡訊給我 |
|
pcplayer99
尊榮會員 發表:146 回覆:790 積分:632 註冊:2003-01-21 發送簡訊給我 |
最简单的:
ALabel := TLabel.Create(nil); ALabel.Caption := 'hello'; ALabel.Name := 'Alabel1'; 这样就创建了一个 Label 了。 这里的问题是,这个 Label 放在什么东西上面?比如,放在一个 Panel1 上面,该如何做?应该增加一条: ALabel.Parent := Panel1; 这样就把它放到了Panel1 上面了。 在什么位置呢? 所以,还要写:ALabel.Top := 10; ALabel.Left := 5; OK ,到这里,动态创建一个 Label 已经没问题了。动态创建 N 个 Label,该如何管理呢?用 array 是一个办法。比如: <textarea cols="60" rows="10" class="delphi" name="code"> 比如: type TMyArray: array of TLabel; var MyLabelArray: TMyArray; i: Integer; begin SetLength(MyLabelArray, 101); for i := 0 to 100 do begin ALabel := TLabel.Create(nil); MyLabelArray[i] := ALabel; end; end; 不过呢,对于 Label 来说,可以不用 array 来管理。注意:ALabel := TLabel.Create(nil);这里的 nil 这个 nil 应该是 Label 的 Owner.如果我们写成: ALabel := TLabel.Create(Form1); 则 form1 就成了 ALabel 的 Owner. 以后要找到这个 ALabel 就很简单了,问 Form1 要。 for i := 0 to Form1.ComponentCount - 1 do begin if Form1.Components[i] is TLabel then begin ALabel := TLabel(Form1.Components[i]); //这样就找到 ALabel 了。要知道是哪个 Label,你可以判断名字,或者判断其它的什么属性了。 end; end; </textarea> ===================引 用 xhunger 文 章=================== 不小心按到發表了 以上,萬一,我的是要給使用者輸入N個 而產生N個 那程式碼要怎麼改 謝謝大大的幫助 |
xhunger
一般會員 發表:3 回覆:4 積分:1 註冊:2007-05-24 發送簡訊給我 |
|
jow
尊榮會員 發表:66 回覆:751 積分:1253 註冊:2002-03-13 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |