johnnywww的专栏

今天做代码，发现在线程里面操作老是提示“Out of system Resource”错误，代码如下：      if ARect.Right - ARect.Left = 0 then        FBitmap.Canvas.StretchDraw(FBitmap.Canvas.ClipRect, ABitmap)      else        FBitmap.Canvas.CopyRe

ocx 注册 应用程序配置不正确

最近用Delphi7编写了两个IE插件，在同一IE页面打开含这两个插件提示DAX错误。在网上找到一篇文章，原来是Delphi编写插件在Win2k和XP下有这个问题，需要修改Vcl目录下AxCtrls.pas文件里面的ParkingWindow函数内容，编译后将AxCtrls.dcu拷贝到Lib目录下，重新编译插件即可。function ParkingWindow: HWND;var

在开发中经常希望输出调试信息，我平时一般使用下面两种之一：1.用dbgview.exe可以查看，在代码里写法如下    OutputDebugString(PChar(AMsg));2.产生一个console窗口  procedure TInfDebugInfoConsoleImpl.CloseConsole;begin  if (FHandle then 

最近学习DirectShow，按照Dspack里面介绍的安装步骤，安装成功，但是关闭Delphi后，重新运行Delphi，提示无法load DSPackDesign_D7.bpl问题，在网上查找相关解决方案，终于解决，只要在Delphi7环境变量设置中设置好Path变量即可，选择Tools-Envirnoment Options-Envirnoment varibles，选择Path定义，将DSP

在网上可看见ICEBird的一篇Delphi开发方面的文章，感觉收益良多，推荐给大家。 我的Delphi开发经验谈 --------开发环境--------    Delphi 7是一个很经典的版本，在Win2000/XP下推荐安装Delphi 7来开发软件，在Vista下推荐使用Delphi 2007开发软件。安装好Delphi 7后，应立即安装Delphi 7 Update P

 最近做个ocx控件，需要做数字签名，看了许多文章，做了个脚本，运行成功。 @echo offSET SIGNPATH=SET PATH=%PATH%;D:/Program Files/Microsoft.NET/SDK/v1.1/BinSET ERROR=if EXIST GSMPlayerControl.cer @del GSMPlayerControl.cerif EXIST

安装Delphi7一段时间了，一直运行良好，今天突然提示我注册失败，上网找到解决方案， 步骤如下： 将安装光盘的dent.slip文件(修改时间为2002-08-22)，拷贝到本地Delphi7安装目录下覆盖同名文件 运行Delphi7的Register Now,重新输入序列号确认，提示非法注册信息，点击Cancel按钮取消注册 去大富翁论坛下载dent.sli

 今天调试园刚EZCapture878采集卡，运行其Delphi Demo只出现CPU窗口，不出现程序窗口，在网上找方法，终于找到这个方法procedure PatchInt3;var  NOP: Byte;  NTDLL: THandle;  BytesWritten: DWORD;  Address: Pointer;begin  if Win32Platform     Exit;  N

最近有个项目需要用到Timeout的MessageBox，在网上查找资料推荐使用未公开API函数MessageBoxTimeout，但是我在win2000下没有调用成功，只有自己动手，参照MessageDlg改造为Timeout功能的 MessageDlgunit UMessageTimeOutDlg;interfaceuses  Windows, Messages, SysUtils

最近在学习TDD开发，一直用Delphi7开发程序（各位大侠不要笑话我），配合DUNIT开发（推荐用DUNITWizard插件，支持生成test程序在Console和GUI下运行），通过网上查找内容，发现这篇网页和PDF文档介绍的内容比较适用我，下载Want（下载0.3.3，最新2.02支持的脚本xml，是一种Script语言），WANT是像ant的构建工具，基本上语法与ant一致，但是增加了dc