小编LaB*_*cca的帖子

无法创建外键,因为它与自身冲突

我正在尝试将外键添加到表中,但我不能,因为我收到此错误:

消息 547,级别 16,状态 0,第 1 行 ALTER TABLE 语句与 FOREIGN KEY 约束“FK_RDATA_COMBO_VALUES_ID_REFERENCES”冲突。冲突发生在数据库“MyDatabase”、表“dbo.EVA_REFERENCES”、列“ID_REFERENCES”中。

错误消息表明问题与此冲突,FK_RDATA_COMBO_VALUES_ID_REFERENCES但这是我尝试创建的 FK 的名称,它还不存在。

这是我的桌子:

CREATE TABLE [dbo].[RDATA_COMBO_VALUES](
    [ID_RDATA_COMBO] [int] IDENTITY(1,1) NOT NULL,
    [ID_REF_CDATA] [int] NOT NULL,
    [ID_MODULE_REC_ID] [int] NOT NULL,
    [VALUE] [nvarchar](max) NULL,
    [ID_REFERENCES] [int] NOT NULL,
 CONSTRAINT [PK_RDATA_COMBO_VALUES] PRIMARY KEY CLUSTERED 
(
    [ID_RDATA_COMBO] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]

GO

ALTER TABLE [dbo].[RDATA_COMBO_VALUES]  WITH CHECK ADD …
Run Code Online (Sandbox Code Playgroud)

sql-server foreign-keys sql-server-2014

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

如何在关闭应用程序之前删除openssl dll

我做了一个简单的工具(LogAndMailApplication),它将日志发送到我的gmail帐户,为此我使用了Indy组件TIdSSLIOHandlerSocketOpenSSL.要使用它需要ssleay32.dll和libeay32.dll.

所以在应用程序启动时,我从exe资源中提取2 dll,然后将它们复制到应用程序文件夹中.

在关闭应用程序之前,所有indy组件都在我销毁的数据模块中.

在破坏数据模块之后,我尝试删除dll,但我不能.

我刚刚使用了DeleteFile,但这对于我在应用程序退出时删除的所有其他文件(包括ini文件)都很有效.

我试图制作一个简单的exe,只删除2 dll并且它有效.所以问题是2 dll以某种方式锁定,直到LogAndMailApplication没有关闭,如何解决问题?

delphi openssl indy

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

从托盘栏显示通知的不同方式

气球提示有哪些替代方法可以显示来自托盘栏的通知?

我想要实现的就像Skype通知一样,所以我想拥有堆积通知的功能(在Skype,我们让John在线,Marc在线,Jim在线同时).我怎样才能做到这一点?

此外,比气球提示更好看的东西会更好.

delphi notifications trayicon delphi-2009

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

Delphi:在OnFormShow事件中是否有可能告诉表单即使在毫秒内也不显示?

在OnFormShow事件中,我需要(对于一组特定的条件)不显示表单.

像"如果计数器> 15不显示表格"之类的东西.

我当然可以在表单创建上重构和移动很多东西,但这是很多工作,因为这是一种常见的形式,并且涉及太多的变化.

现在我在OnFormShow的末尾关闭表单,但无论如何我看到表单出现了几毫秒.

不幸的是,告诉我不要显示表单的条件是在OnFormShow中决定的.是否有诀窍避免表格显示?

delphi tform

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

强制使用Internet Explorer打开网页

我需要使用Internet Explorer打开网页,即使它不是预定义的浏览器.

(例如,Chrome是预定义的,但我想打开www.ThisRunsOnlyOnInternetExplorer.com.

怎么做到这一点?当然,ShellExecute我知道如何打开默认浏览器.

当然,这必须适用于所有Windows操作系统和所有Internet Explorer版本,因此我无法对其路径进行编码iexplorer.exe.

你能建议一个解决方案吗?

注意:如果有一种方法可以获得带有一些API的iexplorer.exe的路径可能就是gtet那条路径然后使用ShellExecute来运行

PATH_TO_INTERNET_EXPLORER_EXE www.ThisRunsOnlyOnInternetExplorer.com
Run Code Online (Sandbox Code Playgroud)

delphi internet-explorer shellexecute

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

缩小JavaScript是保护源代码的唯一方法吗?

我正在做一些研发,以定义所有涉及开发多层应用程序的技术,该应用程序将html5作为浏览器前端.

现在我打算用html5 css js编写所有客户端,中间层我的"真实"代码无论如何都安全地在服务器端,无论如何由于各种原因可能有理由在我的网页中隐藏javascript.

缩小它是一种降低可读性的方法,但有一种简单的方法可以"隐藏来源"吗?

js文件通常在webfarm上,但在相同的情况下会有企业安装,这就是为什么我正在研究"隐藏代码"的方法.

谢谢.

javascript

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

如何检查outlook是默认的邮件客户端

我使用此代码来检查outlook是否是默认的邮件客户端:

Function IsOutlookIsDefaultEmailPrg:Boolean;
var
  reg: TRegistry;
  key : string;
begin
  Result := False;
  with TRegistry.Create do
  TRY
    RootKey := HKEY_LOCAL_MACHINE;
    if OpenKeyReadOnly('Software\Clients\Mail') then
    begin
      key := Uppercase(ReadString('')); //default value
    end;
    result :=  (Pos('MICROSOFT OUTLOOK',Key) > 0);
  FINALLY
    Free;
  END;
end;
Run Code Online (Sandbox Code Playgroud)

它一般工作,但在一些电脑上它已被报告不起作用,我检查,注册表密钥在那里.

Pos区分大小写?知道为什么这个有时不起作用吗?还有更好的建议吗?

delphi outlook delphi-xe2

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

如何强制exe始终从内存加载

使用标志(基于这篇文章)

IMAGE_FILE_REMOVABLE_RUN_FROM_SWAP
Run Code Online (Sandbox Code Playgroud)

IMAGE_FILE_NET_RUN_FROM_SWAP
Run Code Online (Sandbox Code Playgroud)

当可执行文件位于LAN路径或可移动设备中时,可以将可执行文件加载到内存中.

即使exe在本地光盘上,有没有办法实现相同的目的?

我知道几乎没有性能提升,但要"摆脱光盘"这是一个想法.我没有在文档中找到这样的编译器选项.

delphi compiler-flags delphi-xe7

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

TPoint 是 Delphi 中的原语吗?

TPoint在运行时创建了几个对象,但我没有销毁它们。

我检查了TPointin的代码System.Types

PPoint = ^TPoint;
  TPoint = record
    X: FixedInt;
    Y: FixedInt;
  public
    constructor Create(P : TPoint); overload;
    constructor Create(const X, Y : Integer); overload;

    //operator overloads
    class operator Equal(const Lhs, Rhs : TPoint) : Boolean;
    class operator NotEqual(const Lhs, Rhs : TPoint): Boolean;
    class operator Add(const Lhs, Rhs : TPoint): TPoint;
    class operator Subtract(const Lhs, Rhs : TPoint): TPoint;

    class operator Implicit(Value: TSmallPoint): TPoint;
    class operator Explicit(Value: TPoint): TSmallPoint;

    class function PointInCircle(const Point, …
Run Code Online (Sandbox Code Playgroud)

memory delphi primitive destructor delphi-10-seattle

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