问题标签 [tcustomcontrol]
For questions regarding programming in ECMAScript (JavaScript/JS) and its various dialects/implementations (excluding ActionScript). Note JavaScript is NOT the same as Java! Please include all relevant tags on your question; e.g., [node.js], [jquery], [json], [reactjs], [angular], [ember.js], [vue.js], [typescript], [svelte], etc.
delphi - TCustomControl 如何接收输入焦点?
我正在编写一个基于 TCustomControl 的网格控件,因此我可以自己处理所有结构、绘画和导航。我似乎无法弄清楚的一点是:
在我的构造函数中,我将 ControlStyle 设置为:
这个想法是,如果控件处理鼠标事件,我可以做一些事情,比如设置选择等。我注意到虽然控件永远不会获得焦点。我碰巧在表单上有一个 TComboBox,并且在创建表单时它显然是集中的。无论我在网格中单击多少次,焦点都停留在组合框上。
这当然对我处理键盘事件也有影响。
那么问题来了,当你点击它时,如何确定焦点应该转移到一个控件上呢?
delphi - 如何调整滚动条的缩略图大小
如果您打开记事本,添加十行并将编辑器调整为仅显示九行,则拇指轨道(滚动条上的可拖动块)几乎是垂直滚动条的全长。如果添加几千行,拇指轨道只有几个像素高。
我想在实现水平滚动条的 TCustomControl 后代中复制这种行为。所以我将 WS_HSCROLL 添加到我的窗口样式(在 CreateParams 中)并为 WM_HSCROLL 实现了一个处理程序。在此过程中,我使用 SetScrollRange 和 SetScrollPos 来管理拇指轨道的范围和位置 - 但这个小家伙仍然是一个近乎完美的正方形。
我错过了什么?
delphi - 如何创建一个行为类似于 Tpanel 的 TCustomControl?
如何创建一个行为类似于 Tpanel 的 TCustomControl?例如 MyCustomComponent,我可以将组件放入标签、图像等中。
delphi - 如何在 TCustomControls 中添加 TAboutBox?
我想在我的自定义组件上添加关于框/对话框。如何使小按钮 [...] 出现在对象检查器上?就像在 Timage 组件上分配图片一样。
delphi - 使用 TControlBar,如何将波段的移动限制为单行?
我在当前项目中使用了 TControlBar 组件,但是当我移动乐队时,我遇到了控件绘制额外行的问题,
基本上我想要的是 ControlBar 总是只有 1 行,它的高度是固定的,并且在拖动时乐队无法逃脱它。
我怎样才能做到这一点?
delphi - 如何在delphi设计时在我的自定义控件中选择子控件
我正在尝试创建一个控件,它在设计时和运行时创建 3 个标准 TPanel。一切都很好:控制完美地创建了面板。但我遇到了一个问题:在设计时,我希望能够选择其中一个面板。
我希望重现 TPageControl 的标准行为:当用户在屏幕上单击 TabSheet 时,TabSheet 可以通过对象检查器进行编辑。
下面附上我的控制代码:
有没有人可以向我展示一种为我的任务找到解决方案的方法?
提前致谢。
delphi - Delphi tcustomcontrol/双控
有人可以解释一下哪个控件更适合创建自定义组件吗?twincontrol 和 tcustomcontrol 有什么区别?
先感谢您