• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号

delphi开发回忆录——面向对象的基础,继承

原作者: [db:作者] 来自: [db:来源] 收藏 邀请

今天是大年三十了,简单总结一下过去一年。回想起来感到惭愧,本来想好好的写一些文章,由于自己没有坚持,写的太少,不过最大的原因我想是自己总是无法理顺自己的思路,技术文章其实最难写,不仅要写出来,关键是要让看的朋友也能明白,不然,仅写给自己意义就不大了。
说真的,叫开发日志系列不妥当,因为是我在回忆以前的开发情况来写的,所以这次就改成开发回忆录吧。虽然是回忆,我还是把所有的东西都重新写了一次,这样,我觉得可以提高自己,让自己更深入的理解delphi的精髓。废话不说了,开始记录这次的东西。
上次创建子基窗体和基窗体相关操作的基类,这次我们开始创建用于如货品资料,员工资料,部门资料,客户资料等基本资料的窗体frmBasic,此窗体继承frmBase,在窗体上放入两个数据感知控件:dbgrdhList(TDBGridEh),用于显示基本资料的列表;dxdbinsEdit:(TdxDBInspector),用于输入基本资料的编辑控件。
然后在主窗体中创建此窗体,并关联数据库,就可以增加,保存数据了。
主窗体打开刚才创建的窗体的代码如下:
procedure TfrmMain.rgBaseDatumItems0Click(Sender: TObject);
var
  testform:TfrmBasic;
begin
  testform:=TfrmBasic.Create(Application);
  try
    testform.DBGridEh1.DataSource:=frmDM.dsMaster;
    testform.dxDBInspector1.DataSource:=frmDM.dsMaster;
    frmDM.qryMaster.SQL.Clear;
    frmDM.qryMaster.SQL.Text:='select * from [user]';
    frmDM.qryMaster.Open;
    testform.Show;
  finally
  
  end;
end;
明天把新的源码再上传一次,并置顶,这样就方便朋友们下载了。
利用面向对象来编程真是太简单,太神奇了,怎么样,是不是很有成就感?
希望有爱好的朋友多多交流,多提问,大家共同进步!


鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
上一篇:
H5 +JS +Bootstrap +IntraWeb +Delphi 10.4.1编程系列发布时间:2022-07-18
下一篇:
matlabX的负次方函数绘制2发布时间:2022-07-18
热门推荐
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap