[Delphi 7] 有沒有提供這樣的函數 |
尚未結案
|
aAlan
一般會員 發表:38 回覆:24 積分:12 註冊:2004-07-23 發送簡訊給我 |
|
wyndog
資深會員 發表:7 回覆:362 積分:348 註冊:2004-10-12 發送簡訊給我 |
可以用 ClassName 得到物件的類型
用 Name 得到物件的名稱
像這樣:
Memo1.Lines.Add('Self:' Self.ClassName); Memo1.Lines.Add('Parent:' Parent.ClassName); Memo1.Lines.Add('Sender:' Sender.ClassName); Memo1.Lines.Add('Owner:' Owner.ClassName); or Memo1.Lines.Add('Self:' Self.Name); Memo1.Lines.Add('Parent:' Parent.Name); Memo1.Lines.Add('Sender:' (Sender as TComponent).Name); Memo1.Lines.Add('Owner:' Owner.Name);不過,要注意幾個地方: 不是每個元件都有 Parent 所以,Parent 的部份有可能出錯 另外,就是 Sender 沒有 Name 屬性,要強制轉型成 TComponent 才行 |
Chance36
版主 發表:31 回覆:1033 積分:792 註冊:2002-12-31 發送簡訊給我 |
aAlan 你好 另外還可以用'='來判斷,例: If (Self = Form1) Then // => True
.... if Sender = bitbtn1 then ...... // 判斷Sender是否為bitbtn1 PS:原先貼的IS 是要判斷 是否為某個類或其子類! _______________________________________
深藍的魚,祝您好運..........連連 發表人 - chance36 於 2005/03/28 23:02:48
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |