知识大全经典案例财务管理系统（9）[1]

Posted 2022-07-21 知

篇首语：石可破也，而不可夺坚；丹可磨也，而不可夺赤。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全经典案例财务管理系统（9）[1]相关的知识，希望对你有一定的参考价值。

　 ——此文章摘自《Delphi 数据库开发经典案例解析》定价￥　特价￥　购买>> 　新建一个窗体将窗体的Name属性设置为 SecSetting Caption属性设置为会计科目设置

　　( ) 单击Project | Options 菜单命令将SecSetting窗体从自动创建的窗体列表中删除将窗体保存为 SetSettingForm pas 为窗体添加如图所示的控件其中除搜索栏的编辑框属于Edit控件外其他编辑框都使用DBEdit控件所有数据库控件的DataSet都设置为DataSource 各控件属性如表所示

　　图会计科目设置窗体

　　表会计科目设置窗体控件清单

　　( ) 这里需要说明的是窗体中ImageList和ToolBar中ToolButton的设置方法

　　首先双击这个控件弹出如图所示的对话框单击Add 按钮将配书光盘中\\Chap \\ocons目录下的图标一一添加从对话框中的Images框中可以看到添加的图标然后将ToolBar的Images属性设为ImageList 后在ToolBar上再右击在弹出的菜单中选择New Button或New Separator可以在工具栏上添加按钮或分割符按钮的图标就是刚才在ImageList中加入的图标了

　　图设置ImageList

　　( ) 需要注意的一点是在设置DBRadioGroup 的Items属性时由于数据库中的项目都是个字符长度因此可能出现无法正常显示的情况这时只要将Items中每项后面补上足够的空格即可

　　public

　　 Public declarations

　　procedure SetToolBar(isEnable:bool);

　　end;

　　var

　　SecSetting: TSecSetting;

　　implementation

　　$R * dfm

[ ] [ ] [ ]

cha138/Article/program/Delphi/201311/25008

知识大全 经典案例 财务管理系统（9）[1]

知识大全经典案例财务管理系统（9）[1]