添加事件委托

AddHandler xdlstFriends.EditCommand, AddressOf xdlstFriends_ItemCommand


内层控件数据绑定与事件声明在外层的ItemDataBind中实现;例子中外层DataList的Id为dlQuestion,内层为dlItem;代码如下

private void dlQuestion_ItemDataBound(object sender, System.Web.UI.WebControls.DataListItemEventArgs e)
        {
            
            if ( e.Item.ItemType == ListItemType.EditItem || e.Item.ItemType == ListItemType.Item || e.Item.ItemType == ListItemType.AlternatingItem )
            {
                LinkButton lb = (LinkButton)e.Item.FindControl("lbtnDelete");
                if ( lb != null )
                    lb.Attributes.Add("onclick", "return confirm('确实要删除么?')");
                 //得到内层DataList
                DataList dlItem= (DataList)e.Item.FindControl("repItem");
                if ( dlItem != null )
                {
                    if ( ViewState["repIndex"] != null )
                    {
                       dlItem.EditItemIndex = (int ) ViewState["repIndex"];
                    }
                    dlItem .ItemCommand += new DataListCommandEventHandler(dlItem_ItemCommand);
 
                    dlItem .ItemDataBound += new DataListItemEventHandler(dlItem_ItemDataBound);
 
 
                    int qid = ((InvQuestion)e.Item.DataItem).Que_Id;
                    ArrayList al = InvController.GetItemCollection( qid );
                    dlItem .DataSource = al;
                    dlItem .DataBind();
                }
                
            }
        
        }
其中ViewState对状态信息的读取和下面的保存联系后再讨论;

下面以内层DataList的Edit事件为例;

 

private void dlItem_ItemCommand(object source, DataListCommandEventArgs e)
        {
            if ( e.CommandName == "edit")
            {
                int qid = 0;
                //得到外层datalist
                DataList dllist = (DataList)e.Item.Parent.Parent.Parent;
                                //取得外层Question记录的Id
                HtmlInputHidden lbEditNum = (HtmlInputHidden)dllist.Items[0].FindControl("hidQuestion");
            
            
                if ( lbEditNum.Value != "")
                {
                    qid = int.Parse(lbEditNum.Value);
                }
                                
                                //得到内层DataList
                DataList dl = (DataList)e.Item.Parent;
                dl.EditItemIndex = e.Item.ItemIndex;
                //保存状态信息
                ViewState["repIndex"] = e.Item.ItemIndex;
                // Response.Write(e.Item.ItemIndex);
 
                                //重新绑定内层DataList数据
                ArrayList al = InvController.GetItemCollection( qid );
                dl.DataSource = al;
                dl.DataBind();
            }
}
在内层DataList中e.CommandName="edit"事件中必须保存ViewState["index"] = e.Item.Index信息;否则在e.CommandName="update"中得不到editIndex的信息.需要保存ViewState的原因是:由于暂时没有找到更好的方法,内层DataList数据绑定需要在每个事件发生时对外层DataList重新绑定,也就是在Page.Load中加载DataBind()事件,对效率有一定影响

 

Delphi 12.3 作为一款面向 Windows 平台的集成开发环境,由 Embarcadero Technologies 负责其持续演进。该环境以 Object Pascal 语言为核心,并依托 Visual Component Library(VCL)框架,广泛应用于各类桌面软件、数据库系统及企业级解决方案的开发。在此生态中,Excel4Delphi 作为一个重要的社区开源项目,致力于搭建 Delphi 与 Microsoft Excel 之间的高效桥梁,使开发者能够在自研程序中直接调用 Excel 的文档处理、工作表管理、单元格操作及宏执行等功能。 该项目以库文件与组件包的形式提供,开发者将其集成至 Delphi 工程后,即可通过封装良好的接口实现对 Excel 的编程控制。具体功能涵盖创建与编辑工作簿、格式化单元格、批量导入导出数据,乃至执行内置公式与宏指令等高级操作。这一机制显著降低了在财务分析、报表自动生成、数据整理等场景中实现 Excel 功能集成的技术门槛,使开发者无需深入掌握 COM 编程或 Excel 底层 API 即可完成复杂任务。 使用 Excel4Delphi 需具备基础的 Delphi 编程知识,并对 Excel 对象模型有一定理解。实践中需注意不同 Excel 版本间的兼容性,并严格遵循项目文档进行环境配置与依赖部署。此外,操作过程中应遵循文件访问的最佳实践,例如确保目标文件未被独占锁定,并实施完整的异常处理机制,以防数据损毁或程序意外中断。 该项目的持续维护依赖于 Delphi 开发者社区的集体贡献,通过定期更新以适配新版开发环境与 Office 套件,并修复已发现的问题。对于需要深度融合 Excel 功能的 Delphi 应用而言,Excel4Delphi 提供了经过充分测试的可靠代码基础,使开发团队能更专注于业务逻辑与用户体验的优化,从而提升整体开发效率与软件质量。 资源来源于网络分享,仅用于学习交流使用,请勿用于商业,如有侵权请联系我删除!
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值