- 博客(50)
- 资源 (10)
- 收藏
- 关注
原创 截窗体、截主屏、截扩展屏
截窗体QPixmap map=this->grab();截主屏QScreen *screen=QGuiApplication::primaryScreen();QPixmap map=screen->grabWindow(0);截扩展屏QRect r2 = QApplication::desktop()->screenGeometry(1);QPixmap map=QPixmap::grabWindow(QApplication::desktop()->...
2020-09-20 08:54:14
282
原创 delphixe Dll 断点设置无效
菜单Project->Options...Delphi Compiler -Comiling -Debugging +Use debug .dcus 设置为True -Linking +Include remote debug symbols设置为True
2018-06-29 14:27:15
1471
1
原创 保存为UTF-8格式的Txt文件
procedure SaveUTF8File(const AFileName: string; AListText: TStringList);var Latin1Encoding: TEncoding;begin Latin1Encoding := TEncoding.GetEncoding(CP_UTF8); try AListText.SaveToFile
2018-04-19 11:14:36
7782
原创 RichTextBox 全角引号变成半角解决方法
Private Function ReplaceRtfFullQuotes(ByVal TextRTF As String) As String Dim sText As String sText = Replace(TextRTF, "\ldblquote ", "“") sText = Replace(sText, "\ldblquote", "“") ...
2018-02-26 16:52:27
430
原创 mac os libray not loaded:(加载dylib出错)
用Delphixe10调用一个三方的dylib,在mac上运行报错 libray not loaded:1、修改Project Options中的packages-Runtime Packages-Link with runtime packages设置为True2、修改Project-Deployment-三方dylib的Remote Path,改为Contents\Ma
2017-08-04 17:26:06
651
原创 word转换HTML后 HTML编码是charset=x-cp20936怎么转换成gb2312
有些word转换HTML后编码为x-cp20936,导至android系统中查看出现乱码,改为gd2312正常Private WrdApp As Word.ApplicationPrivate wrdDoc As Word.Document Set wrdDoc = WrdApp.Documents.Open(sPath, , True) wrdDoc.WebOptions
2017-08-01 13:35:50
3890
1
原创 IdHttp.Get 返回字符串中,双引号(")前的汉字返回乱码(�?)
ResponseStream := TStringStream.Create('');...ResponseStr := UTF8Decode(ResponseStream.DataString;把解码放到创建时ResponseStream := TStringStream.Create('',TEncoding.UTF8);...ResponseStr := ResponseStre
2017-05-11 15:59:06
1279
原创 C#绑定Delphi的Dll多事件出错,ErrorCode=-2147220990
绑定任何一个都可以,但绑定多个就出错ErrorCode=-2147220990,把下面的ckSingle,改为ckMulti,测试通过。 delphi中TMyClass.Initialize的FConnectionPoint:=FConnectionPoints.CreateConnectionPoint(AutoFactory.EventIID, ckSingle, EventConne
2017-04-05 12:24:25
402
原创 遍历窗体控件,设置FontName
function HasProperty(const AObject: TObject;const APropName:String):Boolean; var PropInfo:PPropInfo;begin PropInfo:=GetPropInfo(AObject.ClassInfo,APropName); Result:=Assigned(PropInfo);
2016-04-13 16:17:26
1486
转载 MyEclipse的Windows下面没有Android sdk and avd manager
打开 Windows==》Customize Perspective==》Command Groups Availability选项卡,左边的Available command groups 下的Android 开头的那几个都打上勾,然后ok就好了。如果找不到 Android 开头的请确认已经安装ADT插件,不光是 DDMS 还有 Android Development Tools 哦。h
2013-04-24 21:09:38
1687
原创 判断编绎的平台是32bit还是64bit
{$ifdef CPUX64} lblVision.Caption := lblVision.Caption + '(64bit)'// 64 bit compiler used; {$else} lblVision.Caption := lblVision.Caption + '(32bit)'; // 32 bit compiler used; {$endif}
2012-10-19 08:46:11
470
原创 OpenDialog.Execute 成功后再设置OpenDialog.InitialDir无效
OpenDialog.FileName :=''; //需先清空OpenDialog.InitialDir:='c:\';
2012-08-17 08:49:18
1780
转载 程序员也要养生
http://news.cnblogs.com/n/142382/其实这些问题不仅见于程序员,其他长期经常坐在电脑前的职场人士(比如:网络编辑、站长等),都会有其中的某些健康问题。希望从事这些行业的朋友,对自己的健康问题,予以重视。以下是全文。 我最近在写《Learn Python The Hard Way》的最后几节课,我还要加一课:关于程序员在其职业生涯中普遍的健康问题。我发现诸多代
2012-06-12 19:09:39
773
转载 window.open()打开的窗口第2次进入时不执行page_load
protected void Page_Load(object sender, EventArgs e)if (!IsPostBack) { Response.Cache.SetExpires(DateTime.Now); //增加此句 解决 window.open()打开的窗口第2次进入时不执行page_load}
2012-06-05 23:36:12
913
原创 64os “System.BadImageFormatException:”没有为此类型库注册包装程序集。
“System.BadImageFormatException:”没有为此类型库注册包装程序集。在System.Windows.Forms.Design.DocumentDesigner.AxToolboxItem.Create.ComponentsCore(IDesignerHost host)在System.Drawing.Design.ToolboxItem.CreateComp
2012-03-16 15:19:04
2837
转载 GridView CommandField 动态添加到最后一列
1、 GridView1.RowEditing += new GridViewEditEventHandler(GridView1_RowEditing); //添加编辑事件 GridView1.RowDeleting += new GridViewDeleteEventHandler(GridView1_RowDeleting); GridVie
2012-03-13 22:00:48
3000
原创 RzListView
//------------------------------------RzListView选择新行并取消上次选择的痕迹 (显示的虚线框)lvRecord.ItemFocused:=nil; //需加此句,取消上次选择的痕迹lvRecord.ItemIndex:=Index
2011-07-07 12:12:12
888
原创 File
-------------------------- 加载含换行符的文件(如QQ聊天记录)//readln 不区分换行符(#10),替换为空字符assignfile(lTextFile,mFile); reset(lTextFile); //以只读方式打开文件 while
2011-07-07 12:10:52
243
原创 从源数组中取不同的随机数
TArrayInt = Array Of Integer; //自定义整数数组 Function GetRandomIntArray(SrcArray: TArrayInt; Var DestArray: TArrayInt; CntDest: integer): Boolean;Var i, j, lRnd, lCntSrc: integer;Begin Try
2010-04-28 12:45:00
7660
原创 ocx控件引用
1、导入后面板如没有显示图标,则可在Environmet Options 中 选择Ignore special ColClass Flags when importing中Can Create 2、导入成功但不能使用,如版本升级过(8.1)的可以用没有升级过的4.453版(换台机器装个d7)导入一次,导入后在Program Files/Borland/Delphi7/Imports/找
2010-04-28 12:34:00
407
原创 像拍电影一样做软件-资源管理的规划、预算不协调的根本原因
资源管理的规划:1、管理层要充分了解项目类型和所关联到的业务2、构建一个人才储备数据库3、使用人才数据库作为资源分配的参照4、定期对数据库中的人员信息进行维护和更新5、设定人才战略规划,依据项目和业务需要补充适当的人员6、岗位轮换,最大限度地允实企业的知识库 预算不协调的根本原因:1、让非技术人员主导评估2、照镜子(自我反省)恐惧症3、理解设计时间和调试时间4、不恰当或不清晰的需求5、一口
2010-04-08 07:38:00
590
原创 像拍电影一样做软件-需求开发、可控的开发节奏、时间约束策略的好处
需求开发:1、让目标客户参与需求开发流程2、确立商业目标3、重视需求分析 4、表述形式的标准化5、功能需求源自业务需求6、平衡需求7、引入早期需求测试策略 可控的开发节奏:1、构建恰当的开发进程2、开发一个易于管理的生产任务列表3、与产品拥有者进行沟通4、允分发挥知识型团队的优势 时间约束策略的好处:1、提升重视程序和加强优先级管理2、养成制定可行计划和可靠预算的习惯3、支持有效资
2010-04-08 07:33:00
639
原创 COM 接口得到实现该接口的对象实例
参见http://www.wangchao.net.cn/bbsdetail_47176.html 外部调用Vote1.Base :=Base1.DefaultInterface; Base属性设置为Read|Write|Write byref, Type 为Base*。 procedure TVote.Set_Base(const Value: Base);var e
2009-10-10 17:19:00
499
原创 COM 数组参数
function TAutoCls.SetArray(iMode: Integer; vAry: OleVariant): WideString;var i,j:Integer ; s:string;begin case iMode of 2: //二维 begin for I:=VarArrayLowBound(vAry, 1)
2009-10-10 17:07:00
433
原创 德尔菲估算
Delphi法的步骤是:1 协调人召集估计人员,由作者介绍情况、限制条件、估计单位;2 协调人向估计人员提供估计表格; 3 估计人员匿名填写估计表格;4 协调人整理出一个估计总结,以汇总表的形式返回估计人员;5 协调人召集估计人员,讨论估计结果和差异。由作者对相关的条件和情况进行澄清;6 估计人员在估计表上填写另一次匿名估计结果;重复步骤4-6(控制在2-3次), 得到最终估计结果。
2009-07-25 11:07:00
1865
原创 项目管理之路
技术人员通常比较讨厌写文档,但一个高效的技术人员一定要时时把自己学习的东西、做的事情给与总结,一是对自己的思考、付出给出交代,从中发现问题;二是作为知识的传承,提供给将来需要的人。互联网时代,把知识烂在自己的肚子里也不愿传递的人,一定会边缘化的。他距离项目经理会很遥远(项目经理的基本功就是汇报)。有了明确的需求,我们一定竭力做如下几件事情:什么(WHAT):按顺序列出达到目标所需完成的工作;何
2009-07-25 11:02:00
257
原创 原型建立及技巧
原型建立的步骤。 ●确定用户需求。原型的开发取决于用户需求,需求决定了系统必须支持的业务对象。●建立原型。不要花大量时间去写“好”代码,因为在对原型作了评估之后,你很可能丢弃这些代码。 ●评估原型。核实原型是否满足用户需求。 ●确定是否完成。当评估过程中不再有新的需求,或只有少量无关紧要的需求时,原型建立过程就可结束。 原型的不同层次。可以依次开发系统的三种不同类型的原型。手绘
2009-07-25 10:59:00
499
原创 成功的项目管理10-12章
10章 项目经理项目经理的职责 确保全部工作在预算范围内按时优质地完成,从而使客户满意。领导项目的计划、组织和控制工作,领导项目团队完成项目目标。计划:要高度明确项目目标,并就该目标与客户取得一致意见。再与项目团队一起制定实现项目目标的计划。组织:为开展工作如何合理地配置资源。给每个具体人员分配职责,授予权力。控制:需要一套项目管理信息系统,跟踪实际工作进度。积级主动及早发现、解决问题
2009-06-19 17:00:00
460
原创 梦断代码 第9章 方法
第9章 方法汉弗里在IBM执行强制进度纪律的成功基于两条原则1、计划是强制的。2、计划是“从下往上”,由负责按计划执行的程序员的经验和知识而来,而不是“从上往下”,靠管理者拍脑袋或对市场的期望而来。敏捷软件开发个体和交互 胜于 过程和工具可工作的软件 胜于 面面俱到的文档客户协作 胜于 合同谈判响应需求 胜于 遵循计划极限编程忘掉详细规约和代码文档只在确实需要时和实现之,而不是
2009-06-19 16:56:00
415
原创 目标——简单而有效的常识管理
公司是否赚钱的三个重要指标:净利、投资报酬率和现金流量 公司目标--我们要靠提升净利来赚钱,同时也要增加投资报酬率和现金流量。不着眼于局部效益。 效率与赚钱,高效率不一定赚钱,可能只是生产更多的多余存货。 每个人时时刻刻都在工作的工厂,是非常没有效率的工厂。 要根据目标来管理产能 平衡的工厂假如我们没有充足的产能,我们预估的有效产出就是假的。但是假
2009-06-19 16:40:00
1260
原创 激励机制
激励对生产率的影响最大、提高开发速度。最重要的5个激励因素1、 成就感(自主权、设定目标、)2、 发展机遇(进修机会、提供培训、自学假期、购买专业书籍、避免进度压力过大)各行业前10%平均为开发人员提供2周、软件经理3周培训时间。3、 工作乐趣(技术多样性、任务完整性、任务重要性、自主性、工作反馈)为能够专注于工作本身创造条件。4、个人生活(有实际计划使开发
2009-03-08 08:20:00
556
原创 高效开发环境、自愿加班
高效开发环境(软件开发需长时间不间断地集中注意力)工作的质量依赖于工作者保持“作业状态”1、 工作空间根据开发人员的个人需要配置2、 商务和社会面谈不应该在开发人员的办公空间内进行3、 防止打断有效“作业状态” 自愿加班(一周4-8小时的额外工作时间能增加10%-20%的产出)1、对开发者采用“拉”而不是“推”的方法2、不要要求加班,它将产生更少的
2009-03-08 08:19:00
307
librfid.dll DelphiXE2调用Demo
2020-04-18
调用PDFtoolkit合并pdf生成dll及delphixe10的demo
2019-08-22
ics for delphixe2
2012-03-20
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人