癫狂编程

摘要： 首先有两个自定的转换函数： function myStrToHex(s:string):string; //字串转16进制 var TmpStr:string; i:integer; begin TmpStr:=''; for i:=1 to Length(s)do TmpStr:=TmpStr+IntToHex(ord(s[i]),2)... 阅读全文

摘要： RegExp对象提供简单的正则表达式支持功能： 1.Global属性设置或返回一个 Boolean 值，该值指明在整个搜索字符串时模式是全部匹配还是只匹配第一个。 语法： object.Global [= True | False ] object 参数总是 RegExp 对象。如果搜索应用于整个字 阅读全文

摘要： SQL语句还可以搭配正则表达式作为查询条件，很是有用。 REGEXP_LIKE(匹配)REGEXP_INSTR (包含)REGEXP_REPLACE(替换)REGEXP_SUBSTR(提取) 表 1：定位元字符 表 2：量词或重复操作符 表 3：预定义的 POSIX 字符类 表 4：表达式的替换匹配 阅读全文

摘要： 充分匹配了‘用友’的中文品牌的含义，即‘与用户真诚合作，做用户可靠朋友’。其中‘U’代表‘User’，即用户；‘FID’表示忠诚、信任，来源于 Fidelity（诚实）等英文词的词根；助音词‘A’放在结尾则使得‘UFIDA’更易于朗读和记忆。 缩写的含义 缩写的含义 同时，新名称很好地反映了用友‘诚 阅读全文

摘要： //例1:begin raise Exception.Create('抛出异常');end;//例2:begin raise Exception.CreateFmt('%s %d', ['错误代码:', 999]);end;//例3:var exc: Exception;begin exc := E 阅读全文

摘要： 比如procedure TForm1.Button1Click(Sender: TObject);vari:Integer;lbl: TLabel;beginfor i:=1 to 3 dobeginlbl:= TLabel.Create(Application);lbl.Parent := Sel 阅读全文

摘要： 开发所用delphi版本是xe2，效果图如下： 代码如下： 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 阅读全文

摘要： unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) pnl1: TPanel; btn1: T... 阅读全文

摘要： procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);begin if (ssctrl in shift) and (key=vk_delete) then key:=0;end; 阅读全文

摘要： 有人的地方，就是江湖。在职场的江湖上，有能力的你是桀骜不驯还是顺应潮流，取决于你对规则的理解和敬意。 我之前在某公司做业务，到公司没多长时间就新来了一名同事。当时部门经理手把手的教他业务内容，他还一副我什么都懂的样子。 一次经理分配给他一个任务，晚上回来时发现他一天什么都没有做，忙一些无关紧要的事情 阅读全文

摘要： 20～27题使用的数据如表1和表2所示。 表1 教师表(TEACHER.DBF) 教师号 姓名 性别 籍贯 职称 年龄 工资／元 0001 王吉兵 男 江苏 讲师 27 2003.50 0002 张晓春 女 安徽 副教授 28 2800.50 0003 左燕 女 江苏 讲师 25 2040.00 0 阅读全文

摘要： 首先向Form窗体拖一个SaveDialog控件，Name属性改为：dlgSave，然后添加一个按钮，Caption属性改为：浏览，Name属性改为：btnBrowse。 然后双击浏览按钮添加如下代码： 注：dlgSave.DefaultExt := '.dbf'; 一行实现的是我们只填写文件名默认 阅读全文

摘要： 读取，反过来就是了，不多说。 阅读全文

摘要： BP= business partner，指业务伙伴 HR=human resources，指人力资源 HRBP就是人力资源服务经理。主要工作内容是负责公司的人力资源管理政策体系、制度规范在各业务单元的推行落实，协助业务单元完善人力资源管理工作，并发展业务单元各级干部的人力资源管理能力。 阅读全文

摘要： 关于这本书，一般是因为好奇，从HR到BP的角色，再到这个SBP,其实是一段没有走过的很虚的过程，不过总归是需要灯塔，即使偶尔只是海市蜃楼。不过提到STRATEGE，不得不说到波特他老人家，整本书的感觉就是做SBP不能够单单做HR，从业务出发，从关系的建立，信任的取得和维护出发，更多的是提供一个通用的 阅读全文

摘要： DBGrid的Options中的dgConfirmDelete改为:False;在DBGrid所连接的DataSet的BeforeDelete事件中写:Abort; ^_^ 阅读全文

摘要： delphi adoquery的post和UpdateBatch Post是确认当前的修改，而UpdateBatch是把已经确认但是没有存盘的数据写入数据库当ADOQuery的CursorType是ctKeySet或者ctStatic，并且LockType是ltBatchOptimistic的时候， 阅读全文

摘要： Var FExcel:OleVariant; //excel应用程序 FWorkBook :OleVariant; //工作表 Temsheet:OleVariant; //工作薄 FPicture:OleVariant;//图片 tmpstr:String; range:variant;//范围 i,j,TemInt:integer; TemFileName:S... 阅读全文

摘要： procedure CreatRepSheet(SheetName:String;PageSize,PageLay:Integer); {新建Excel工作簿、进行页面设置} begin {新建Excel工作簿} if ExlApp.WorkBooks.Count < 1 then begin ExlBook := ExlApp.Workbooks.Add; //... 阅读全文

摘要： 运行预览 模板样式 存储返参 导出的Excel 2. 代码实现 阅读全文