delphi7怎樣定義控制項陣列並獲得下標?

2025-03-11 07:25:20 字數 1902 閱讀 5103

1樓:匿名使用者

對的補充1、要定義乙個陣列儲存按鈕abtns: array[0..9] of tbutton;2、建立按鈕時給陣列賦值,並將下標保凳盯穗存到按鈕的tag屬性。

棗卜abtns[i] ;abtns[i].tag :=i;

3、點選按鈕的**取tag就是陣列的下標則侍 :=inttostr((sender as tbutton).tag);

2樓:吉人有吉事

formshow

varbtn: tbutton;

i:integer;

beginfor i := 0 to 10 do

beginbtn := ;

(i + 1) *50;//間隔。

i; buttonclick;

end;buttonclick(sender:tobject)begin

showmessage(tbutton(sender).tag);

end;我只是簡寫了**, 有不清楚再問。

delphi7可以控制項拖放後再設定為控制項陣列嗎?

3樓:網友

可以的,比如你在頁面上放了三個edit 分別為edit1 edit2 edit3 ,然後。

varedt_arr:array[1..3] of tedit;

i:integer

beginfor i:=1 to 3 do

beginedt_arr[i]:=('edit'+inttostr(i)) as tedit)

end;end;

具體你自己在修改吧。

4樓:網友

你可以先拖控制項,然後在程式啟動時建立乙個控制項陣列,然後把相關的控制項名賦給這個控制項每個元素就可以了。

c#如何獲取控制項陣列的下標

5樓:網友

如果你是想獲得該事件對應的picture控制項,可以這樣picturebox pic=(picturebox)sender;

然後操作pic就行了。

通常都是先知道了陣列下標,然後根據下標訪問元素;沒碰到過先知道了陣列元素,然後求其下標的,這邏輯好像行不通啊。

控制項陣列怎麼得到當前的index值

6樓:可愛小不點

這是是指控制項陣列的下標。

使用方法是對多個相同元件進行遍歷操作;

例如:有三個option1控制項,你可以設定其名稱相同,index值不同為0-2;

即可通過。for i=0 to 2

option1(i).value...

next另,在控制項陣列中,index用於傳遞是那乙個控制項發生了該事件;

例如:private sub option1_click(byval index as integer)

則index表示事件發生的具體控制項是控制項陣列中的那乙個。

option1(index).caption="你點了我!"

end sub

前端如何定義陣列下標

7樓:折柳成萌

可以直接用定義陣列。

var a = ;//等價於var a = new array();

js如何快速獲取陣列中的最下值並取得其下標

8樓:

var mycars=new array()mycars[0]="saab"

mycars[1]="volvo"

mycars[2]="bmw"

var a= //陣列的長度 是3

alert(mycars[a-1]) // 長度-1 就是最大下標了 最小下標永遠是0

如何delphi7獲取xp winvista系統下主機板序列號

呼叫windows的api。可以實現的。不過,只適合在windows的系統。其它的系統,不知道您是不是指linux,delphi7只支援這兩個系統中編譯。linux系統不是很清楚,理論上,使用主機板驅動提供的程式,是可以實現的,不過,只是針對主機板要設計多個函式,多型的方式。linux下,我還沒想到...

DELPHI怎樣編寫可呼叫模組

你這個過程不需要用到sender引數,改成 procedure myclear 然後在form1的onshow事件中寫 myclear 這樣就完成了 delphi如何在一個窗體中呼叫資料模組 1全部儲存為dcu儲存好了後再uses。哦這樣你可以用with dm.aq admin do 或者是 dm....

夢見打牌定對家選得7裡什麼回事?

夢見七,代表有對藝術或創作方面的靈感,對從事這種行業的人來說是個好夢。夢到你和一些朋友在打撲克牌,你正努力的在算牌局,這是表示你的同事中有人對你有不大好的看法,你必須費盡心思才能扭轉這種局面,如果這種情況持續下去,對你的工作或公升遷都有影響。夢見打撲克的七,儘管你通常對各式節日頗為熱中,也是喜歡製造氣...