什么都不用说了,ERP你懂的.一张报表,不同的客户都可以调死你.直接上图 通过这个设置界面,直接生成参数调整报表所用的DBGridEh.对,是DBGridEh,不是DBGrid,也不是CXGrid. 然后再将这些参数生成一个JSON,保存到数据库.下次打开,直接取这个JSON就可以了.这样,客户可以根据自己的需要调整自己的报表. unit uGridDes; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, Syst

@ 目录 前端三要素 JavaScript 框架 NodeJs 常用UI框架 前后端分离的演进 MVVM模式 总结 前端演进到现在,各种技术框架已经层出不穷了,作为一名开发少不了要干一些前端的活儿,那么整个前端的架构体系是怎样的呢?让我们一起来了解回顾一下 前端三要素 HTML(结构):超文本标记语言(Hyper Text Markup Language),决定网页的结构和内容 CSS(表现):层叠样式表(Cascading Style Sheets),设定网页的表现样式 JavaScript(

这个玩意有点意思,要不要搞来玩玩? ----------- 射频技术(RF)是Radio Frequency的缩写,较常见的应用有无线射频识别(Radio Frequency Identification,RFID),常称为感应式电子晶片或近接卡.感应卡.非接触卡.电子标签.电子条码等.其原理为由扫描器发射一特定频率之无线电波能量给接收器,用以驱动接收器电路将内部的代码送出,此时扫描器便接收此代码.接收器的特殊在于免用电池.免接触.免刷卡故不怕脏污,且晶片密码为世界唯一无法复制,安全性高.长寿命

之前做c/s架构,接了有家装饰的一个ERP项目,做了一个ERP框架,现在转后端开发了,这些东西还是蛮怀念的,就开源出来吧,有需要的同学可以参考. https://github.com/qianlnk/LnkSys 为了方便开发和团队合作,采用dll做动态库,数据库中读取菜单项动态加载对应菜单的模块.

1.得到当前格子中的内容:DBGrid1.Fields[DBGrid1.SelectedIndex].DisplayText;把DBGrid1.SelectedIndex改为你所希望引用的字段就可以了,如第3个字段. DBGrid1.Fields[3].DisplayText; 2.双击单元格触发不同事件 procedure TMainFrm.DBGrid1DblClick(sender:TObject); begin if dbgrid1.fields[dbgrid1.selectedInde

// 新增行后,默认首列 procedure TForm1.ADOQuery1AfterInsert(DataSet: TDataSet);begin  with DBGridEh1 do  begin    SelectedIndex := 0;  end;end; // 行选中 DBGridEh_Yingfu_SearchQK.SelectedRows.SetCurrentRowSelected(True); //选中单元格 DBGridEh1.SelectedField := ADOQue

uses comobj, word2000procedure TForm1.Button2Click(Sender: TObject);var WordApp, WordDoc,table: OleVariant; fileName : string;begin WordApp := CreateOleObject('Word.Application'); WordDoc := WordApp.Documents.Add; try WordDoc.PageSetup.LeftMargin :=

procedure TForm1.DBGrid1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);var coords:TGridCoord; // 这个结构体中x是列,y 是行begin coords := dbgrid1.MouseCoord(x,y); // 根据鼠标位置获得行列 Self.Caption := IntToStr(coords.X)+' ' + IntToStr(coords.Y);end;

在cxGrid中选中需要合并的字段,单击F11调出属性控制面板,展开Options,设置CellMerging的Value为True.

Infragistics 是.NET平台优秀的控件供应商,囊括了WinForms,ASP.NET,Silverlight,WPF,Windows Phone等所有关于微软.NET技术的界面控件.借助于这些功能复杂的控件,为ERP的界面提供了灵活的操作能力. 本篇不谈控件开发,只详细说明ERP系统如何使用Infragistics WinForms,而不用.NET 自带的控件. 1  文本编辑控件提示必须输入值 如果一个文本编辑控件必须输入值,有许多实现方法可以借鉴.看金蝶ERP的实现,在文本标签控

Delphi Excel 操作大全 (一) 使用动态创建的方法首先创建 Excel 对象,使用ComObj:var ExcelApp: Variant;ExcelApp := CreateOleObject( 'Excel.Application' );1) 显示当前窗口:ExcelApp.Visible := True;2) 更改 Excel 标题栏:ExcelApp.Caption := '应用程序调用 Microsoft Excel';3) 添加新工作簿:ExcelApp.WorkBook

摘自:http://wenjieshiyu.blog.163.com/blog/static/10739413201072033115869/ 个人收藏:Delphi  控制Excel(一) 使用动态创建的方法首先创建 Excel 对象,使用ComObj:var ExcelApp: Variant;ExcelApp := CreateOleObject( 'Excel.Application' );1) 显示当前窗口:ExcelApp.Visible := True;2) 更改 Excel 标题

ERP体现出信息流.资金流.物流在供应商.企业.客户间的运营方向,是以销售为源头,生产.物料需求计划为核心,以金额.实时数据为基础的整体.ERP的核心是MRP(物料需求).企业的经营活动最终是为了赢利.本文围绕销售系统中的价格(Price)展开分析,详细说明ERP系统如何设计灵活的价格机制. Price 的理解 Price可翻译为价格,卖价,面价等,是物料的货币表现形式.以价格中是否包含税可分表未税价格(Net Price)和含税价格(Price).Price只是作为定价的依据,实际过程中还要考

查找 Lookup 窗体是一个容器,也可以把TextBox,Button也看成是一个容器,可以往容器里面添加按钮. 参考下面的实现代码,给TextBox增加查找按钮. var btn = new Button(); btn.Size = new Size(25, txtOutputPath.ClientSize.Height + 2); btn.Location = new Point(txtOutputPath.ClientSize.Width - btn.Width, -1); btn.Cu

代码包括: 1:导出多个sheet    2:设置单元格格式   3:合并单元格   4:下拉框选项   5:输入数字限制   6:锁定单元格 static void Main(string[] args) { //实例化一个操作excel工作薄的对象 IWorkbook workbook = new HSSFWorkbook(); //创建表 ISheet sheet1 = workbook.CreateSheet("sheet1"); //创建行(一行一行的创建,参数代表第几行,不

Delphi Code Editor 之 编辑器选项 可从Code Editor的右键菜单中选择“Properties”菜单项来查看编辑器选项.也可以从主菜单[Tools | Editor Options…]打开编辑器选项对话框.如下图: 下面分别来讲述各个页面. 1.General页面 这两个页面用于控制编辑器的工作方式.其中包括很多选项. 页面下面的“Editor SpeedSetting”组合框,可从里面选择多种设置,如下图: 如果改变此组合框的设置,上面的“Editor options”

我是参考了万一的博客里面的关于TStringGrid学习的教程,但是我也结合自己的实际操作和理解,加入了一些个人的补充,至少对我有用! 学用TStringGrid之——ColCount.RowCount.Cells 本例中使用到了Panel控件,只是比较简单的拖拽到界面上(比如可以在Panel上面放按钮……),详细的知识并没有涉及到,还是先学习TStringGrid. 本例的功能: 1.获取StringGrid的行数.列数 2.给单元赋值 运行效果图 : 代码如下: unit Unit1; in

最近在开发中使用到了UpDown这个控件,但是因为之前没有使用过,所以很不熟悉,于是就编写了一个简单的demo来学习UpDown以及其结合TEdit的用法. 初步的常用功能的简介 目前(2015.08.07)只是涉及到其简单的用法,因为目前我所需要使用的就只有这些内容,系统化的使用和知识将会在以后需要的时候再补充. 目前涉及到的内容有UpDown组件与TEdit组件的配合使用.UpDown的Position属性. 寻找UpDown: 如下图,Win32下,用红色框框出来的 先看一下这个程序的运行

  随着ERP系统的深入发展,越来越多的企业开始实施ERP,ERP实施是借用一种新的管理模式来改造原企业旧的管理模式,是先进的.行之有效的管理思想和方法.ERP软件在实际的推广应用中,其应用深度和广度都不到位,多数企业的效果不显著,没有引起企业决策者的震动和人们的广泛关注.   1．实施ERP是企业管理全方位的变革 企业领导层应该首先是受教育者,其次才是现代管理理论的贯彻者和实施者,规范企业管理及其有关环节,使之成为领导者.管理层及员工自觉的行动,使现代管理意识扎根于企业中,成为企业文化的一部分

Delphi Cxgrid获取选中行列,排序规则,当前正在编辑的单元格内的值 cxGrid1DBTableView1.Controller.FocusedRowIndex 当前行号 cxGrid1DBTableView1.Controller.FocusedRow 当前行 cxGrid1DBTableView1.Controller.FocusedColumn 当前列 cxGrid1DBTableView1.Controller.FocusedColumnIndex 当前列号 cxGrid1DB