小编Ste*_*eve的帖子

XE2 exe和dcu位置

我试图从Delphi 6迁移到XE2.

当我编译并创建一个exe时,exe和dcu似乎被放在项目下的\ win32\debug目录中.

有没有办法让它将exe和dcu放在与项目和源相同的目录中?

delphi delphi-xe2

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

如何检测组件已被释放?

我有一个组件,我创建,然后在我的主窗体上传递给它一个面板.

这是一个非常简单的例子:

procedure TMy_Socket.StatusPanel_Add(AStatusPanel: TPanel);
Run Code Online (Sandbox Code Playgroud)

然后,该组件将在需要时更新面板标题.

在我的主程序中,如果我FreeAndNil在面板下次组件尝试更新面板时我得到一个AV.我理解为什么:组件对面板的引用现在指向一个未定义的位置.

如何在组件内检测面板是否已被释放,以便我知道我无法引用它?

我试过if (AStatusPanel = nil)但不是nil,它还有一个地址.

delphi

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

将Warp Speed添加到转换系列

我使用米/秒作为基础为ConvUtils添加了一个Speed系列.

   Cf := RegisterConversionFamily('Speed');
   RegisterConversionType(Cf,'Meters per second'    ,1);
   RegisterConversionType(Cf,'Speed of Light'       ,0.000000003335641);
   RegisterConversionType(Cf,'Speed of Sound(Mach)' ,0.0029411765);
Run Code Online (Sandbox Code Playgroud)

现在我想添加'Warp Speed'作为一种类型.

我有公式

V = wf^3 * C
Run Code Online (Sandbox Code Playgroud)

其中:V =速度wf =翘曲因子C =光速

如何添加公式以添加类型?

delphi

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

用于DelphiXE的THtmlViewer

我需要一个可以在DelphiXE中运行的PBears thtmlviewer版本.

我发现Google代码页(http://code.google.com/p/thtmlviewer)现在支持了,但我无法弄清楚在哪里/如何下载我可以使用的版本.

我也无法弄清楚如何在网站上问别人.

我错过了一些明显的东西,还是没有可用的下载?

史蒂夫...

delphi

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

从RichEdit获取未格式化的文本

我有一个Richedit,允许我的用户格式化和查看我的应用程序中显示的错误消息.

我现在需要能够将文本(无格式化)导出到他们的故障单系统使用的另一个数据库.

我已经尝试了我能想到的所有PlainText组合,而且我总是得到rtf格式.

我怎样才能获得文字?

delphi richedit

4
推荐指数
2
解决办法
8332
查看次数

如何在Delphi中以编程方式获取GDI和用户对象计数?

我有一个程序开始达到10,000用户对象限制.当我强制它超过限制时程序崩溃.我可以让我的用户更改注册表项,但这是一个尴尬的事情,询问客户,许多人没有访问注册表.

我可以在任务管理器中看到值,但我想在我的应用程序中获取值.有没有办法以编程方式获取这些值?

好的,我现在已经准备好了所有关于如何只有一个编写得很糟糕的程序需要那么多对象的评论;>)

delphi winapi

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

delphi 7转换HTTP获取到HTTPS获取

我有一个程序,目前使用Delphi 7和Indy 9(我相信)执行多个HTTP GET请求.我现在需要将它们转换为使用HTTPS.

服务器端在我的控制之下.

我也不想在我的程序中安装任何外部DLL.

我做了很多谷歌搜索,但对我来说,我要么必须安装外部OpenSSL DLL,要么升级到以后的Delphi版本,或使用不像TIdHTTP组件那么简单的第三方控件.

有没有人对从哪里开始有任何建议?

delphi delphi-7

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

最小化应用程序启动程序

有没有办法检测然后覆盖Windows快捷方式参数运行最小化?我想检测快捷方式是否想要启动程序最小化,然后自己处理最小化/最大化/正常大小调整.

我有一个我用它创建的启动画面

Form_Splash := TForm_Splash.Create(Application);
Run Code Online (Sandbox Code Playgroud)

我稍后使用创建主窗体

Application.CreateForm(TForm_main, Form_main);
Run Code Online (Sandbox Code Playgroud)

显示主窗体后,我销毁form_Splash,那时我想根据windows快捷方式请求的内容最小化/最大化/正常大小的form_main.

谢谢你的帮助.史蒂夫...

delphi

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

设置提示时创建的MouseMove事件

我在XP机器上使用Delphi 6.

我在stringgrid中使用Onmousemove来获取单元格的内容.然后我使用单元格内容来设置提示.然后我使用Application.ActivateHint来显示提示.但每次更新提示值时,操作系统都会发送另一个MouseMove事件.这会导致提示非常糟糕的闪烁.

我知道鼠标没有移动,但我充斥着MouseMove事件.mousemove导致提示更新导致鼠标移动导致提示更新等.

delphi

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

标签 统计

delphi ×9

delphi-7 ×1

delphi-xe2 ×1

richedit ×1

winapi ×1