不知谁遇到过这样的问题:
我动态创建了一批控件,有标签、文本框、下拉框等等,在释放的时候,如果所有控件都看得到,那就不会出问题,但是当还有一些控件在滚动条以下的时候,释放就出错了。如果把面板宽度调宽点,让所有动态创建的控件都能够看得到,一切都正常,不知是何原因?还望高人指教!~~~~
我动态创建了一批控件,有标签、文本框、下拉框等等,在释放的时候,如果所有控件都看得到,那就不会出问题,但是当还有一些控件在滚动条以下的时候,释放就出错了。如果把面板宽度调宽点,让所有动态创建的控件都能够看得到,一切都正常,不知是何原因?还望高人指教!~~~~
解决方案 »
- reportmachine2.6安问题
- 请教各位高手:ado能否实现批量导入导出
- 捉拿 ‘小小’昨天晚上是否game的太晚了,现在还不来、
- ftp 异常
- ●●一个msOutlookBarPro的问题???怎样获得一个mxHeader中当前鼠标所在的mxButton的index?,我是指不用单击,因为鼠标移动button能获
- 三层中如何在服务器与客户端之间传输自定义的'Record'类型??????
- insertmenuitem如何向actionmainmenubar插入菜单项?
- 如何把一秒鐘當作判斷條件﹖
- 300分买一个qq,目录先付75分。将qq号与密码发入我的邮箱[email protected]
- 我的程序中对字体总是不满意,主要是不对齐,空格太短,对字体有何良策?
- 从字符串转换为datetime时发生语法错误
- *****************关于计划任务的设计**********************
另外提示搂主,动态创建的对象都应该有手工释放的代码,这样才是安全的代码。
MySEdit := TEdit.Create(KJPan); //KJPan为一面板控件
MySEdit.Parent := KJPan;
MySEdit.Tag := KJID;
MySEdit.TabOrder := KJID;
MySEdit.Name := 'SEdit_' + IntToStr(KJID);
MySEdit.MaxLength := ZJLength[KJID];
MySEdit.Text := '';
MySEdit.Height := 20;
MySEdit.Width := 160;
MySEdit.OnClick := EditClick;
MySEdit.OnChange := EditChenClick;
我把事件屏掉也一样出错。
看到有这句,感觉,动态创建的组件,应该用个组件数组或者什么数据结构存储吧,没有必要给组件起名字了,组件名就是MySEdit,没有必要修改Name属性了。