代码改变世界

delphi算法

2017-01-09 18:44 by 绿贝, 303 阅读, 0 推荐, 收藏, 编辑
摘要:/ 求余 mod 取模 var a1,a2,a3 : Integer; b1,b2,b3 : Integer; c1,c2 : Integer;begin a1 := 987; //ShowMessage(IntToStr(a1/10)); ShowMessage(IntToStr(a1 mod 1 阅读全文

delphi 弹出选择目录窗口

2017-01-05 14:58 by 绿贝, 643 阅读, 0 推荐, 收藏, 编辑
摘要:使用SelectDirectory函数注意要在use下引入FileCtrl。 第一个参数是提示信息,第二个参数是默认路径,第三个参数是你自己选择的路径。 阅读全文

delphi 导出xml文件

2017-01-04 15:12 by 绿贝, 1022 阅读, 0 推荐, 收藏, 编辑
摘要:上面是delphi自定义xml的简单例子。 阅读全文

play 源码分析

2016-12-28 09:10 by 绿贝, 683 阅读, 0 推荐, 收藏, 编辑
摘要:play 入口: play.server.Server类 主要做2件事情: 1,Play.init; // 初始化,主要是配置的加载,插件的加载等等 2,new Server(); 这里play使用了netty作为底层通讯服务器 boss线程池实际就是Acceptor线程池,负责处理客户端的TCP连 阅读全文

oracle指令

2016-12-26 16:22 by 绿贝, 260 阅读, 0 推荐, 收藏, 编辑
摘要:使用expdp 命令导出库 按用户导出: expdp 用户名/密码@orcl schemas=用户名 dumpfile=expdp.dmp; 删除用户和用户下所有的表: drop user user_name cascade; 导入数据库: 1,登录服务器。 2,切换到oracle用户 su - o 阅读全文

delphi 环境问题

2016-12-21 17:15 by 绿贝, 528 阅读, 1 推荐, 收藏, 编辑
摘要:这个编译时的警告该如何理解?[Warning] Unit 'Unit101' implicitly imported into package 'Package202' 解决方案 [Warning] Unit 'Unit101' implicitly imported into package 'P 阅读全文

如何启动redis

2016-12-19 17:25 by 绿贝, 459 阅读, 0 推荐, 收藏, 编辑
摘要:直接运行redis-server既可以启动redis 阅读全文

关于整理和工作小结

2016-12-19 17:07 by 绿贝, 205 阅读, 0 推荐, 收藏, 编辑
摘要:一个井井有条的电脑会有效的提高你的工作效率。 任务比较多,如何合理的安排和规划已经对自己电脑的整理至关重要。 首先是文档的整理。电脑上经常出现一堆需求说明书,时间一长就不知道哪一个是哪一个了。项目也有很多,同一个项目不同地方的版本也不一样。 禅道上有很多任务,首先根据优先级来确定下一个任务是什么。 阅读全文

如何强制关闭服务

2016-12-07 12:01 by 绿贝, 4286 阅读, 0 推荐, 收藏, 编辑
摘要:工作中有时需要启动和停止windows service,有时候会出现服务处于stopping或者starting的状态,但是,在services界面中,start service/stop service已经处于灰色不可操作状态,用命令行的形式net start/stop servicename也无 阅读全文

delphi之事件

2016-11-30 21:12 by 绿贝, 570 阅读, 0 推荐, 收藏, 编辑
摘要:delphi的事件如上图所示: 图中oncloseup代表的是日期选择下拉框关闭时触发的事件。 大家都知道TdateTimerPicker控件是无法显示空值的。 我写这段代码的目的是使TdateTimerPicker能显示空值。 实际是将Tedit覆盖到TdateTimerPicker上,通过监听T 阅读全文