vcl

5热度

1回答

我在Windows 7 运行德尔福XE7 VCL应用程序我已经观察到，当Ctrl + A全（全选）按下TEdit.OnChange事件触发。这是为什么？只有当TEdit中的文字确实发生变化时，我才需要可靠地触发OnChange事件。不幸的是，没有OnBeforeChange事件可用，所以我可以比较更改前后的文本。那么，如何实现一个可靠的OnChange事件TEdit？

0热度

1回答

为什么BringWindowToTop与VCL Ribbon结合不能正常工作？

我有以下（简化的）过程，使所期望的窗口之上的所有其它正常窗口： function focusWindow(): boolean; var h: Hwnd; begin result := true; h := findwindow('Notepad', 'Unbenannt - Editor'); if h <> 0 then BringWin

1热度

1回答

Embarcadero C++：如果有新的更新可用，如何通知用户？

我是Embarcadero C++的初学者，如果我的应用程序是在Embarcadero C++中开发的并安装在客户端机器上，那么如果新的更新可用，我的应用程序如何通知用户？如果用户点击yes按钮，那么它将首先下载应用程序然后安装它。如果有人有任何想法，请让我知道。

0热度

1回答

Delphi中的通知栏

我已经用Delphi编写了一个应用程序。该软件是通知栏。当出现通知时，还会显示该软件。只能显示通知，不显示软件吗？（如Windows 8.1 & 10和电报） VCL应用程序被编写。谢谢。

-1热度

1回答

应用程序z订购问题

这可能不是我的应用程序（XE7）的问题，因为它只发生在我的客户工作站中的一个上，但是我想确认我是否正确编码并要求提供解决方案的任何指导会发生什么事是，从应用程序主窗体没有非模态形式，可以推出，然后当这些最后一个随后关闭场所的应用主要形式，在Windows的Z顺序的后面这里是我的启动代码的主要应用 Application.Initialize; Application.MainFormOnTa

0热度

1回答

制作ShowHint工作与几个不同的Rects，每个都有自己的提示

使用C++ Builder的2009年我有一个从TCustomControl继承，关于这一点我画几个平方（TRect）与内容等自定义控制我现在想显示提示，我将鼠标悬停在每平方，但我不知道如何实现这个最好的。我试图简单地用TCustomControl的ShowHint，并改变Hint我将鼠标悬停在广场，但问题是，控制不显示暗示了它第一次消失后，除非我离开的控制和回来到它。我希望我可以简单地'

3热度

2回答

TColorProperty Delphi Berlin 10.1.2？

我试图组件德尔福7转换为德尔福柏林（的FlatStyle成分：https://sourceforge.net/projects/flatstyle/）源许多变化后，i'm停留在TColorPorperty 请看下图： type TRxColorProperty = class(TColorProperty) public function GetValue: str

0热度

2回答

C++与vcl：关闭辅助表单不会结束进程

我仍然在学习c + +与vcl表单，所以原谅我，如果我问的事实证明比看起来简单。作为参考，我在Windows环境中使用C++ builder 10.1 berlin。我有两种形式的程序（让我们称之为“MainForm”和“BackupForm”）。我在MainForm中接受用户输入，然后当用户单击某个特定按钮（“DoSomething”）时，该操作设置了一些变量，然后调用BackupForm->

0热度

1回答

TSQLQuery，中tfields和操作符[]

我有一个查询，使用TSQLQuery即是这样的 TSQLQuery* tq = new TSQLQuery(NULL); tq->SQLConnection = atdbDM->SQLConnection1; tq->SQL->Add("SELECT LAST_INSERT_ID();"); tq->Open(); int insert_id = tq->Fields->operator

0热度

1回答

Brainf * ck解释器奇怪的输出

我决定用C++编写一个简单的Brainfu * k IDE，使用Borland的CppBuilder6。我已经把我的RichEdit放在了一起，使它看起来有点像记事本。然后我添加了TEdit输入和TMemo输出。经过一些测试，我认为RichEdit在我的情况下是不好的组件，我将它改为TMemo。在我的code input = Edit2，code = Memo2，output = Memo1。我