使用自定义运行时软件包构建的远程调试Win32 VCL应用程序:找不到BPL
我在Delphi 11.1 Alexandria中写了Win32 VCL应用程序,该应用程序使用了我也写过自己的运行时软件包。该应用程序在我的开发机上正确运行。 我现在正在…
在file-open-dialog中包括多选项选项
为了允许在file-open-dialog中进行多键执行,并避免了这个长的表达式: OpenDialogSourceFiles.Options := OpenDialogSourceFiles.Options + [Vcl.Dia…
如何防止topendialog更改文件相对路径的当前工作目录?
我使用 topendialog 选择要打开的文件,并希望用 initiaLdir 属性指定文件夹: FILE* fp; OpenDialog1->InitialDir= "../data"; if (OpenDialog1->Exe…
Delphi:在备忘录/编辑中禁用撤消
我已经为 tmemo / tedit 实施了一个undomanager >在上下文菜单中撤消)是这些组件,而是执行我的do undo/redo命令。 我试图捕获 wm_undo ,但是 ctrl …
Delphi风格的VCL TTrackBar:跟踪时隐藏焦点虚线矩形
使用 VCL 样式时,如何在选择/跟踪时隐藏 VCL TTrackBar 周围的焦点?使用 Delphi 11.1 这不起作用: SendMessage(tb1.Handle, WM_UPDATEUISTATE, UIS…
如何在 VCL TMemo 控件的按键事件处理程序中检测 Ctrl+Alt+x?
我创建了一个带有单个 TMemo 控件的 Delphi VCL 应用程序,这是我的代码。 我用它来检测 Ctrl+somekey。例如,当我按下 Ctrl+x 时,会弹出警报 ctrl …
显示/打开新表单时收到通知
当模式 TForm 打开时,TApplication 会触发 OnModalBegin 事件。 当非模态 TForm 以与 TApplication.OnModalBegin 相同的方式显示/打开时,有没有办法…
如何将 16x16 图标与 TPopupMenu 中的菜单项正确对齐?
在 Delphi 11 Alexandria 的 Windows 10 中的 32 位 VCL 应用程序中,我在 TPopupMenu 中使用 16x16 像素图标。 不幸的是,这些图标没有与 TMenuItem …
拖动 TPaintBox 同时保持其内容静态
我们有一个用于显示视频的 VCL TPaintBox。它的父级是 TScrollbox。 缩放时,PaintBox 变得比滚动框大,因此部分图像被隐藏。 我们已经实现了使用鼠标…
如何自定义VCL组件的Caption属性
(C++Builder 11) 由于我需要使用带有标题的 TSpeedButton 字形(不在字形的顶部、底部、左侧或右侧),我遵循特德·林莫 (Ted Lyngmo) 建议 (TSpeedB…
在状态栏中显示 TRichEdit 行和列
我们正在向应用程序添加一个 ASCII 编辑器,并在 Delphi XE7 中使用 TRichEdit。我们需要在状态栏中显示行和列,但尚未找到任何与 Key down 功能配合…
在 Delphi 6 中为动态创建的 VCL 组件实例显式调用 Loaded 方法的替代方法?
我有几个自定义 VCL 组件,它们在重写 TComponent Loaded() 方法时执行重要任务。这在动态创建实例时会产生麻烦,因为 Delphi 全局加载器在运行时不会…
Delphi XE2 新服务 - 为什么它包含这些 VCL 单元?
我有点困惑,为什么当你在Delphi XE2中创建一个新的服务应用程序时,它包含这3个视觉组件单元? Vcl.Controls Vcl.Dialogs Vcl.Graphics 据我所知,这…