Tag: delphi 7

如何在Delphi 7 IDE中将方法挂接到Edit事件？: 我想在Delphi 7 IDE中开始编辑文件时自动检出一个文件。 ClearCase是我的版本控制系统，我真的很讨厌在开始编辑之前需要检出一个文件。它总是打破我的思想stream：我试图解决一个问题，find我需要改变的地方，尝试编辑它，失败，因为文件是只读的，打开clearcase，search文件，最后结帐，尝试编辑文件再次失败，因为IDE仍然认为它是只读的，告诉不是只读的IDE。当我终于回到代码，我忘记了我正在尝试做什么。我发现了这个漂亮而简单的ClearCase IDE集成代码。它工作，但使用不赞成的ToolIntf单位。我已经添加了几个快捷键。这里是它的简化版本（没有尝试编译）： unit clearcase; interface uses ToolsApi, ToolIntf; implementation uses Windows, Dialogs, Classes, ExptIntf, Menus, ShellApi, SysUtils; type TDelphiClearcase = class private FClearcaseMenu, FDoCheckOutPasDfm, FDoCheckInPasDfm : TIMenuItemIntf; procedure ExecCommand(const command: string; path: PChar = nil); public destructor Destroy;override; procedure DoClick(Sender: TIMenuItemIntf); property ClearcaseMenu: TIMenuItemIntf […]

Delphi：即使设置了分隔符，StringList分隔符也始终是空格字符: 我遇到了TStringList类中的分隔符问题。看一看： var s: string; sl: TStringList; begin sl := TStringList.Create; s := 'Users^foo bar^bar foo^foobar^barfoo'; sl.Delimiter := '^'; sl.DelimitedText := s; ShowMessage(sl[1]); end; sl[1]应该返回'foo bar' sl[1]返回'foo' 看来分隔符现在是'^' AND ' ' 有任何想法吗？

delphiunit testing – 你好吗？: 我想知道这里的几个Delphi用户如何进行unit testing？是否有任何与您find的IDE集成的工作良好？如果没有，你使用什么工具，你有或知道示范微型项目，说明如何运作？更新：我忘了提到我使用的是BDS 2006 Pro，虽然我偶尔会使用Delphi 7，当然其他人也可能使用其他版本。

杀毒软件在我的可执行文件中出现错误: 我遇到了一个恼人的问题。突然， Avira AntiVir开始将我的软件中的一个可执行文件标记为病毒。由于几乎所有用户的默认操作都是单击“确定”，Avirabuild议将病毒置于隔离区，因此我的大多数用户正在删除此可执行文件。那么，让我们不要傲慢，检查我是否确实感染了。我把这个文件发布到http://www.virustotal.com ，而所有的反病毒只有Avira把它标记为感染病毒。此外，我用两种不同的反病毒扫描我的电脑，它很干净。我已经发布了一封邮件给我的用户解释发生了什么，但这是我的支持，我真的不想要的开销。好的，问题是：有没有办法避免这种行为？除了签署文件之外，我想不出别的办法（真的不知道它是否会解决），但让我们看看你是否有任何创意。