小编Ste*_*eve的帖子

是否有可能以编程方式区分SQL Server的版本?

基本上,是否有可能确定是否有一个人将我的程序挂钩到SQL Server Compact或Express Edition?我希望能够将我的产品的不同版本限制为不同版本的SQL Server.

sql-server

3
推荐指数
1
解决办法
539
查看次数

如何在COM服务器中引发异常?

如何在COM服务器中引发异常以供COM客户端使用?我的服务器和客户端是用Delphi编写的,如果有什么不同的话?基本上我有一个后台线程检查我的服务器中的各种事情.当它不满意时,它应该停止服务器正在做的任何事情,并引发异常.此异常需要由客户端捕获.不知道如何处理它.

delphi com exception-handling

3
推荐指数
1
解决办法
1150
查看次数

Delphi Prism/Oxygene中的Lambda表达式

我一直在试验Oxygene中的Lambda表达式.非常简单的递归lambda表达式来计算斐波那契数:

var fib : Func<int32, int32>;
fib := n -> iif(n > 1, fib(n - 1) + fib(n - 2), n);
fib(3);
Run Code Online (Sandbox Code Playgroud)

当我运行此代码时,我得到一个nullreferenceexception.关于我做错了什么的任何想法?

delphi lambda fibonacci oxygene

2
推荐指数
1
解决办法
1827
查看次数

将tdbgrid的部分复制到剪贴板?

有没有办法轻松地将Delphi 2007中的TDBGrid选择行复制到剪贴板?

delphi clipboard

2
推荐指数
1
解决办法
3725
查看次数

Delphi开发人员的C#标准/风格?

在使用某种语言编写了很长时间之后,您会选择某些编码标准或样式.使用Delphi时,可以使用f为私有变量添加前缀,并在受保护之前放置私有声明,然后将其置于公共变量之前等等.其中大多数来自VCL.

C#世界中是否有任何公认的编码标准或风格?我很想在我的私有成员变量前添加一个f,但这只对其他Delphi开发人员有意义.

c# delphi coding-style

2
推荐指数
1
解决办法
271
查看次数

这是Delphi 2009中的错误吗?

它当然看起来像一个bug,但我只有试用版本,所以它可能已被修复.

ITestInterface = interface
  ['{9445CED8-4DBA-4EDB-9897-60980B438BE4}']
  procedure Foo1;
  procedure Foo2;
end;

TTest = class(TInterfacedObject, ITestInterface)

end;
Run Code Online (Sandbox Code Playgroud)

以上将无法编译.但以下呢!

ITestInterface<t> = interface
  ['{9445CED8-4DBA-4EDB-9897-60980B438BE4}']
  procedure Foo1;
  procedure Foo2;
end;

TTest<T> = class(TInterfacedObject, ITestInterface<T>)

end;
Run Code Online (Sandbox Code Playgroud)

编辑:我刚刚发现它如果你尝试实例化TTest就会失败.所以有点不一致,但不是那么糟糕!

delphi generics interface delphi-2009

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

如何为Cruisecontrol.NET设置多个触发器?

我是CruiseControl.net的新手,我正在尝试为我正在进行的项目设置它.该项目保持颠覆,但整个项目由核心项目和几个组件组成,每个组件都有一个单独的subversion项目,每个组件都有一个主干,可能的分支和标签.我需要设置cruisecontrol.net,以便主核心项目subversion文件夹以及任何包含的组件的更改触发构建.显然,如果提交包含提交给多个组件的文件,我仍然只需要一个构建.可能吗?

svn cruisecontrol.net msbuild

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

Application.OnException是否在COM Dll中有效?

我想在Delphi编写的COM DLL中记录一些看似随机的错误.我该怎么做呢?是否可以使用Application.OnException事件处理程序?我控制COM DLL源,但不控制调用应用程序.

delphi exception-handling

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

将变体数组转换为动态数组

我正在尝试将变量数组(双精度数,但它可能是我猜的任何数据)转换为动态数组.我通常使用DynArrayFromVariant和DynArrayToVariant过程,但在这种情况下,我的变体数组是基于1的.这两个函数似乎只适用于基于0的数组.知道如何做我需要做的事吗?

arrays delphi

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

是否可以清除FPU?

我正在使用Delphi XE6执行复杂的浮点计算.我意识到浮点数的局限性,因此理解FP数中固有的不准确性.然而,在这种特殊情况下,我总是在计算结束时获得2个不同值中的1个.
第一个值和一段时间后(我还没弄清楚原因和时间),它翻转到第二个值,然后我再也无法获得第一个值,除非我重新启动我的应用程序.由于计算非常复杂,我无法更具体.我几乎可以理解这个值是否有点随机,但只有2个不同的状态有点令人困惑.这只发生在32位编译器中,无论我尝试多少次,64位编译器都会给出一个答案.这个数字与32位计算中的2不同,但我理解为什么会发生这种情况,我很好.我需要一致性,而不是完全准确性.
我唯一怀疑的是,在一些影响后续计算的计算之后,FPU可能会处于某种状态,因此我的问题是清除所有寄存器和FPU堆栈以平衡竞争场.在开始计算之前,我打电话给这个CLEARFPU.

经过一番调查,我意识到我在找错了地方.你看到的不是浮点数所得到的.我正在查看数字的字符串表示,并认为这里有4个数字进入计算ALL EQUAL,结果是不同的.事实证明这些数字似乎只是相同.我开始记录数字的十六进制等效值,回过头来找到一个外部dll,用于矩阵乘法导致错误.我用Delphi编写的例程替换了矩阵乘法,一切都很好.

delphi floating-point fpu

1
推荐指数
2
解决办法
689
查看次数

如何在不使用Javascript的情况下重定向网页?

我的默认页面中有一些脚本,根据浏览器的语言将用户重定向到我网站的特定语言版本.我想添加一些重定向那些没有启用Javascript的用户的东西.

目前我有以下内容:

<noscript>
  <META HTTP-EQUIV=REFRESH CONTENT="1; URL=en/index.htm">.
</noscript>
Run Code Online (Sandbox Code Playgroud)

但我已经读过这个并不太明智,因为一些搜索引擎不屑一顾.我该怎么做并保持搜索引擎的快乐?

html javascript http-status-code-301 http-status-code-302

0
推荐指数
2
解决办法
1610
查看次数