小编luk*_*eck的帖子

如何在Windows中注册自定义URL协议?

如何在Windows中注册自定义协议,以便在单击电子邮件或网页中的链接时打开我的应用程序并将URL中的参数传递给它?

windows url protocols custom-url-protocol

54
推荐指数
5
解决办法
4万
查看次数

如何自定义Test Case向导生成的DUnit测试用例类?

在Delphi安装的文件中查找后,我找到了一个文件

"C:\ Program Files\Embarcadero\RAD Studio\7.0\ObjRepos\en\UnitTestFrameworks.xml"

此文件有许多部分用于设置选项,这些选项会影响由创建新测试用例单元时调用的测试用例向导生成的测试用例代码.大多数这些选项都是不言自明的,但看到一些文档会很棒.

特别是,我想:

  • 添加第二个TestClassComment.

  • 在向导的测试用例基类组合框中有多个选项.我可以通过更改UnitTestFrameworks.xml文件中的节点值来更改此列表中单个项目的值,但无法在列表中显示多个项目.

  • 使用某些属性标记测试类和方法.

目前我只关注Delphi Win 32的个性.

我在这里走在正确的轨道上吗?文档可用或失败,是否有人有任何提示?

delphi customization dunit

32
推荐指数
1
解决办法
666
查看次数

开发Win32 Delphi应用程序的最佳工具集是什么?

开发Win32 Delphi应用程序的最佳开发工具集是什么?包括支持工具,如自动构建服务器和建模软件.获得Delphi开发的最佳工具列表会很有趣,所以请提供该工具的简要说明,说明您使用它的原因,选择它的原因以及它对开发过程的影响.每个帖子一个工具请更流行,希望更有用的过滤到顶部.我将在下面用我对这里使用的工具的看法更新我的答案.

delphi

24
推荐指数
4
解决办法
3877
查看次数

通过.RC文件而不是.RES文件在项目中包含资源文件

我记得在几年前读过一篇文章或帖子,建议在项目中包含一个资源文件,方法是引用.rc文件而不是已编译的.res文件,以便资源构建为项目构建过程的一部分.

我有一个glyphs.rc文件,我目前使用命令brcc32 glyphs.rc编译.在我的项目文件中,我有声明{$ R Glyphs.res}.

我想通过改变它来简化它

{$R Glyphs.rc} 
Run Code Online (Sandbox Code Playgroud)

但我不确定语法.当我尝试使用时,{$R Glyphs.rc}我得到一个错误`

[DCC Error] E2161 Error: RLINK32: Unsupported 16bit resource in file "Glyphs.rc". 
Run Code Online (Sandbox Code Playgroud)

这种方法可以用Delphi 2007吗?

delphi build-process embedded-resource

16
推荐指数
2
解决办法
2万
查看次数

当被问及"我如何建立网站?"时 你怎么回答?

我的一个(非技术性)朋友问我如何建立一个网站.我总是得到这个问题.在几个问题之后,我发现她有一个可以变成商业网站的想法.我向她描述了三个选项:

a)获取一本书/报名参加课程/关注一些在线教程并学习如何操作.她非常聪明,她的个性似乎很适合这种事情,所以我相信她可以学习,但她没有很多时间.也许如果她最初开始使用其中一个WYSIWYG编辑器?我强调说这需要花费比周末更长的时间.

b)雇用某人来构建它.范围从超便宜到超贵,蹩脚到好,以及介于两者之间的一切.我没有提到像Rentacoder这样的网站,因为她之前没有参与过这样的项目,也不知道该要求什么.在这个阶段,她可能要求几百美元的Youtube-MySpace-Google,因为她还不知道涉及多少钱.

c)找到技术人员并与他们合作.我解释说,这可以很好地工作或者是一场灾难,因为她不得不放弃她对这个想法的一些所有权.

你如何回应这些情况?

language-agnostic

14
推荐指数
1
解决办法
826
查看次数

将字符串传递给已在运行的应用程序实例

我有一个应用程序,可以检测是否有另一个应用程序运行的实例,如果找到一个,则退出.这部分似乎可靠地工作.我的应用程序采用命令行参数,我想传递给已经运行的实例.到目前为止,我有以下代码:

Project1.dpr

program Project1;

uses
  ...
  AppInstanceControl in 'AppInstanceControl.pas';

  if not AppInstanceControl.RestoreIfRunning(Application.Handle) then
  begin
    Application.Initialize;
    Application.MainFormOnTaskbar := True;
    Application.CreateForm(TFormMain, FormMain);
    Application.Run;
  end;

end.
Run Code Online (Sandbox Code Playgroud)

AppInstanceControl.pas

{基于Zarko Gajic的代码,发现于http://delphi.about.com/library/code/ncaa100703a.htm }

unit AppInstanceControl;

interface

uses
  Windows,
  SysUtils;

function RestoreIfRunning(const AAppHandle: THandle; const AMaxInstances: integer = 1): boolean;

implementation

uses
  Messages;

type
  PInstanceInfo = ^TInstanceInfo;
  TInstanceInfo = packed record
    PreviousHandle: THandle;
    RunCounter: integer;
  end;

var
  UMappingHandle: THandle;
  UInstanceInfo: PInstanceInfo;
  UMappingName: string;

  URemoveMe: boolean = True;

function RestoreIfRunning(const AAppHandle: THandle; const AMaxInstances: integer = 1): …
Run Code Online (Sandbox Code Playgroud)

delphi winapi

11
推荐指数
3
解决办法
3082
查看次数

对于实际上从未分发过的团队,分布式版本控制有哪些优势?

远程工作时,我们的团队只能通过远程桌面访问我们的办公室PC中的源代码,因此我们永远不会真正在离线模式下工作.像Mercurial或Git这样的分布式版本控制系统是否仍然优于我们当前的集中式Subversion设置?如果是这样,他们是什么?有任何缺点或陷阱吗?我已经在许多地方看到,转向分布式版本控制需要改变思维.有人可以解释在这方面需要改变什么吗?

version-control

10
推荐指数
1
解决办法
3161
查看次数