小编iMa*_*ari的帖子

如何在SQL Server中的表值函数中使用CTE语句

我已经了解到某些版本的Microsoft OLE DB Provider for SQL Server(主要在Windows XP上)不支持WITH语句.所以,我决定将我的SQL语句移动到表值函数中,并从我的应用程序中调用它.现在,我被困住了.我应该如何使用该INSERT INTO声明WITH?这是我到目前为止的代码,但SQL Server不喜欢它... :-(

CREATE FUNCTION GetDistributionTable 
(
    @IntID int,
    @TestID int,
    @DateFrom datetime,
    @DateTo datetime
)
RETURNS 
@Table_Var TABLE 
(
    [Count] int, 
    Result float
)
AS
BEGIN
INSERT INTO @Table_Var ([Count], Result) WITH T(Result)
     AS (SELECT ROUND(Result - AVG(Result) OVER(), 1)
         FROM RawResults WHERE IntID = @IntID AND DBTestID = @TestID AND Time >= @DateFrom AND Time <= @DateTo)
SELECT COUNT(*) AS [Count],
       Result
FROM   T …
Run Code Online (Sandbox Code Playgroud)

sql-server common-table-expression sql-server-2008-r2

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

为什么Array [T forSome {type T; }]意味着数组[任意]

我正在阅读文章"Scala中的存在类型",并找到了一些我无法理解的东西:

Array[T] forSome { type T; }
Array[T forSome { type T; }]
Run Code Online (Sandbox Code Playgroud)

它们看起来几乎相同,但它们实际上是非常不同的.第一个是所有数组的类型,无论它们的类型参数如何.第二个是Array [Any].

为什么他们如此不同,尤其是,为什么第二个意味着Array[Any]什么呢?

type-systems scala existential-type

11
推荐指数
2
解决办法
432
查看次数

如何强制客户端数据集重新计算计算和内部计算字段?

我有ClientDatSet一些fkInternalCalc领域.CDS与任何提供商均无关联; 而是它在飞行中填充.如何强制CDS重新计算所有"可计算"字段?我无法打电话,Refresh()因为没有提供商来刷新数据.我到目前为止唯一的方法是浏览所有记录,这不是最好的方法.

PS:我已经阅读了这个问题这篇文章,但我希望有一个更优雅的方式.

delphi tclientdataset delphi-xe2

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

TStringList是否可以自动释放附加到其项目的对象?

我正在添加一些TObject后代TStringList,例如通过调用AddObject.当我释放列表对象时,我希望它们被释放.有没有办法实现这个目标?

delphi

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

重新锁定后,我的停靠控件上会出现关闭按钮

我有一个油漆盒,我希望用户能够移除和移动.所以我设置了DragKinddkDock及其DragModedmAutomatic,并把它在面板内部与DockSite集来True.当我将油漆盒与浮动形状脱开后,我在遇到油漆盒时会遇到一种相当奇怪的行为.浮动窗体的关闭按钮出现在面板内.我附上了两个截图.一个来自原始状态,一个再次对接油漆盒.我错过了什么?

原始状态:

在脱离之前

对接后:

对接后


更新 使用TLama的解决方案后,结果如下.

对接后;  使用新的dock manager

delphi docking delphi-xe2

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

Android 4.3 KeyStore - 在尝试检索密钥时链== null

这篇博客之后,我正在使用此代码KeyPair在Android KeyStore中创建和存储:

Context ctx = getApplicationContext();
Calendar notBefore = Calendar.getInstance();
Calendar notAfter = Calendar.getInstance();
notAfter.add(1, Calendar.YEAR);
KeyPairGeneratorSpec spec = new KeyPairGeneratorSpec.Builder(ctx).
setAlias(RSA_KEYS_ALIAS).setSubject(
  new X500Principal(String.format("CN=%s, OU=%s", 
    getApplicationName(), ctx.getPackageName()))).
setSerialNumber(BigInteger.ONE).
setStartDate(notBefore.getTime()).setEndDate(notAfter.getTime()).build();

KeyPairGenerator kpGenerator;
try {
    kpGenerator = KeyPairGenerator.getInstance("RSA", "AndroidKeyStore");

    kpGenerator.initialize(spec);
    kpGenerator.generateKeyPair();
} catch (Exception e) {
    showException(e);
}
Run Code Online (Sandbox Code Playgroud)

当我尝试使用此代码从KeyStore检索公钥时,会抛出NullPointerException带有消息的a chain == null.

public RSAPublicKey getRSAPublicKey() {
    RSAPublicKey result = null;
    try {
        KeyStore keyStore = KeyStore.getInstance("AndroidKeyStore");
        keyStore.load(null);
        KeyStore.PrivateKeyEntry keyEntry = 
            (KeyStore.PrivateKeyEntry) keyStore.getEntry(RSA_KEYS_ALIAS, null); // --< …
Run Code Online (Sandbox Code Playgroud)

android rsa android-keystore android-4.3-jelly-bean

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

如何在Delphi中查找DataSet是否为主/详细关系中的主服务器?

我想创建一个"重复记录"操作,在调用时,它会复制任何TDataSet后代中的当前记录.如何确定数据集是否为主/明细关系的主数据集?随着TClientDataSet这是相当容易的,但我需要用的所有后代使用这个动作TDataSet.

delphi master-detail tdataset

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

TIdBlockCipherIntercept的等效服务器端组件是什么?

我想加密a TIdTCPClientTIdTCPServer组件之间发送的一些数据包.在客户端,我可以TIdBlockCipherIntercept用来实现我的加密/解密.但是,我找不到匹配的服务器端组件来分配给我IdTCPServer,我在谷歌上找不到任何东西.我该怎么办?

delphi indy delphi-xe2

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

为什么当ShowCaption设置为True时,TToolBar会自动计算按钮宽度?

我需要TToolBar在主窗体的右侧有两个s,所以我将三个TPanels用于对齐,然后将TToolBars放入其中.我一直试图告诉toolbuttons在过去的一天有相同的宽度,但无济于事.这是我所拥有的屏幕截图: 在此输入图像描述

我发现如果ShowCaption设置为True,工具栏会自动计算按钮宽度.我的问题是为什么,以及如何禁用它?

delphi delphi-xe2

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

如何覆盖TClientDataSet的排序机制

是否可以更改索引用于TClientDataSet排序记录的方式?阅读完这个问题后,我认为能够在客户端数据集中逻辑排序字符串字段会很好.但是我不知道如何在索引时覆盖客户端数据集的默认行为.有任何想法吗?

PS:我的CDS没有链接到任何提供商.我正在寻找一种方法来修改TClientDataSet(或实现机制的父级)本身的排序机制.

delphi indexing tclientdataset delphi-xe2

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