凌 凌云客 Unregistered / Unconfirmed GUEST, unregistred user! 2002-01-25 #1 在VB中,只要两个控件名称相同,就可以创建一个控件组,例如Edit[1]、Edit[2]等 等,请问,在Delphi中如何实现? (注:我写了一个控件组,在编译的时候,没有语法错误,但是,显示不出来)
U ugvanxk Unregistered / Unconfirmed GUEST, unregistred user! 2002-01-25 #3 控件组可能用来动态创建 tedit.creat; 你也可以 var s;array[1..5] of string; ; ; s[(sender as tedit).tag]:=(sender as tedit).text;
控件组可能用来动态创建 tedit.creat; 你也可以 var s;array[1..5] of string; ; ; s[(sender as tedit).tag]:=(sender as tedit).text;
远 远帆 Unregistered / Unconfirmed GUEST, unregistred user! 2002-01-25 #4 在delphi中控件数组实在是比麻烦的多。 你要懂动态创建控件。比如一组按钮控件数组。 buttonarray:array [0..10] of tbuton; for i:=0 to 10 do ; begin ; ; buttonarray:=tbutton.create(self); ; ; buttonarray .parent:=form1; ; end; 这样才可以生成控件数组。 然后在引用的时候用sender属性来区分。
在delphi中控件数组实在是比麻烦的多。 你要懂动态创建控件。比如一组按钮控件数组。 buttonarray:array [0..10] of tbuton; for i:=0 to 10 do ; begin ; ; buttonarray:=tbutton.create(self); ; ; buttonarray .parent:=form1; ; end; 这样才可以生成控件数组。 然后在引用的时候用sender属性来区分。
B bubble Unregistered / Unconfirmed GUEST, unregistred user! 2002-01-25 #5 这个问题讨论多次了. 官方的用法是设置tag, 通过TWinControl(sender).tag区分. 用起来跟VB差不多.
凌 凌云客 Unregistered / Unconfirmed GUEST, unregistred user! 2002-01-26 #6 但是,这样子建了以后,Edit不能显示在Form里呀(我很菜)。麻烦各位再帮小弟 想想问题在哪?多谢啦。
B bubble Unregistered / Unconfirmed GUEST, unregistred user! 2002-01-26 #7 Edit:=TEdit.create(self); Edit.parent:=form1;
远 远帆 Unregistered / Unconfirmed GUEST, unregistred user! 2002-01-26 #9 可以显示啊! 不过最好显式指定:left,top,width,height
C cooton Unregistered / Unconfirmed GUEST, unregistred user! 2002-01-28 #10 Edits: array of TEdit; ... n := 5; SetLength(Edits, n); for i:=0 to n-1 do ; Edits := TEdit.Create; //这样可以创建动态控件数组,想要多少就多少,不用浪费资源
Edits: array of TEdit; ... n := 5; SetLength(Edits, n); for i:=0 to n-1 do ; Edits := TEdit.Create; //这样可以创建动态控件数组,想要多少就多少,不用浪费资源