DELPHI - 如何更改 VCL 表单应用程序中的 TButton 背景颜色?

2024-01-08

在我的 Delphi VCL 表单应用程序中,我必须更改 TButton 的背景颜色。 有没有办法在不使用第三方组件的情况下应用此更改?

Thanks.


你不能改变 a 的颜色TButton http://docwiki.embarcadero.com/Libraries/XE3/en/Vcl.StdCtrls.TButton直接使用组件,而必须使用第三方组件或所有者绘制按钮(BS_OWNERDRAW http://msdn.microsoft.com/en-us/library/windows/desktop/bb775951%28v=vs.85%29.aspx).

本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

DELPHI - 如何更改 VCL 表单应用程序中的 TButton 背景颜色? 的相关文章

  • 如何追踪手柄泄漏?

    在我的一个应用程序中 我观察到句柄数量不断增加 在不使用应用程序的情况下 该数字大约每秒增加一次 因此后台处理代码的某些部分一定存在句柄泄漏 我如何追踪此类泄漏 有什么工具可以帮助解决这个问题吗 跟踪句柄泄漏时要寻找哪些模式 导致手柄泄漏的
  • 以 png 格式剪辑幻灯片 (Delphi 2010)

    I have a filmstrip of images in png format like this 我想知道如何剪辑每个图像并将这些图像放入 TImageList 控件中 并始终保留透明度 EDIT 是的 在设计时 RRUZ 提到的技
  • 在 Delphi 2007 中将具有透明度的位图保存为 PNG

    我有一个包含透明度信息的 Delphi 位图 32 位 我需要将其转换并保存为 PNG 文件 同时保留透明度 我目前拥有的工具是graphics32 Library GR32 PNG 由Christian Budde 提供 和PNGImag
  • 自定义 colorRampPalette 中的颜色条

    我定义了一个 colorRampPalette my colors colorRampPalette c light green yellow orange red 如何为其绘制颜色条 图例 项目 最好仅使用基本包 我正在寻找一个充满该颜色
  • 在TImageViewer中,如何获取用户点击图片的位置?

    在TImageViewer控件中 用户可以缩放或平移图片 我的问题是 当用户点击图片时 如何获取用户在图片上的点击位置 尤其是用户可以对图片进行放大 缩小或平移之后 如何获取对应的图片点击位置呢 As shown below How to
  • 生成 n 色彩虹调色板

    我正在尝试用 可运行的代码在这里 http sketchpad cc XEXd5II9nC size 360 100 colorMode HSB 360 100 100 Hue in degrees in 0 360 saturation
  • 在Delphi 7中,为什么我可以给const赋值?

    我将一些 Delphi 代码从一个项目复制到另一个项目 发现它在新项目中无法编译 但在旧项目中可以编译 代码看起来像这样 procedure TForm1 CalculateGP const Price money 0 begin Pric
  • 调试器异常错误和内存超调

    我尝试运行以下代码 但它显示有关内存地址的错误 并显示一条消息 循环后 n 可能未定义 请看一看 var n max integer n integer r R1 f h0 Array of Real const h 0 00889 nip
  • 用于创建动画渐变按钮背景的 CSS

    我正在寻找一个CSS规则可以创建一个CSS动画按钮的彩色渐变背景 https i stack imgur com NHqf8 gif 我只是想玩它并这样做 https codepen io prashant nadsoftdev pen b
  • 是否可以声明长度受限且不从 0/1 开始的字符串类型?

    在 Delphi 中 可以声明整数值的子范围 例如 type myInt 2 150 它将 myInt 类型的值限制为 2 到 150 之间的值 但是如果我想限制字符串的长度怎么办 如果我写 type myString string 150
  • 对象的引用计数

    在我的代码中 我使用一个小的数据存储类 它是在不同的地方创建的 为了避免内存泄漏并简化事情 我想使用引用计数 所以我这样做了 type TFileInfo class TInterfacedObject IInterface 并删除了我对
  • Discord.py 嵌入中禁用按钮/冻结按钮

    I m trying to make a replica of this bot in which when I press any of the buttons below it shows a dropdown menu and you
  • 如何在Delphi中显示Vista风格的气球提示?

    在输入验证时 我使用气球提示而不是消息框 我的问题是 在 Vista 上 它们具有带圆角的旧 XP 样式 而不是较新的矩形外观 我尝试使用 CreateWindowEx 创建它们并且tooltips class32或使用 SendMessa
  • 通过套接字发送动态数组(在记录内)?

    我正在尝试直接使用 SendBuf 将记录从服务器传输到客户端 但是 该记录有一个动态数组的成员 并且我在某处 在 SOF 中 读到 发送记录时 成员必须是静态的 固定长度 但问题是 我无法确定如何我会 将来 发送许多论点 我怎么解决这个问
  • 如何比较枚举类型集

    从某个时刻开始 我厌倦了编写设定条件 and or 因为对于更多的条件或更长的变量名 重新编写会变得笨拙且烦人 所以我开始写助手这样我就可以写ASet ContainsOne ceValue1 ceValue2 代替 ceValue1 in
  • logback的“谨慎模式”是如何实现的?

    The 审慎模式 http logback qos ch manual appenders html prudentlogback 中的序列化所有 JVM 之间的 IO 操作 写入同一文件 可能运行在不同的主机上 在其他日志记录框架中 如果
  • 如何从该 JAVA 文件中提取 Delphi 类以与 Android 一起使用?

    我的Delphi XE7项目需要与FTDI FT311 Android 配件芯片 http www ftdichip com Products ICs FT311D html 他们帮助提供了一个 Android 演示 其中包括他们的 JAV
  • 需要使用手机后退按钮返回 Web 视图的帮助

    这是我的代码 package com testappmobile import android app Activity import android os Bundle import android view KeyEvent impor
  • Kivy - 单击按钮时编辑标签

    我希望 Button1 在单击时编辑标签 etykietka 但我不知道如何操作 你有什么想法吗 class Zastepstwa App def build self lista WebOps getList layout BoxLayo
  • 从其可执行文件的路径获取服务名称

    我有一个可执行文件的路径 它是一个正在运行的服务应用程序 例如 C Program Files x86 Someapp somesvc exe 我想停止并启动它 为此我想我需要获取服务的名称 如下所示 this https stackove

随机推荐

  • 使用 Objective-C 的传递和访问结构

    我想知道如何将结构传递给另一个函数 然后在被调用函数中访问该结构 我正在为 iPhone 进行开发 我使用结构的原因是这样我最终可以将数据作为结构传递到用 C 构建的服务器 结构如下 struct userInfo NSString fir
  • 如何在PHP中比较两个日期[重复]

    这个问题在这里已经有答案了 如果日期格式正确 如何在 php 中比较两个日期 03 01 12 and 31 12 11 我正在使用这段代码 date1 date d m y date2 31 12 11 if strtotime date
  • 为什么 boost 示例再次调用“shared_from_this()”而不是使用闭包变量

    在连接对象中boost asio HTTP 服务器示例 http www boost org doc libs 1 57 0 doc html boost asio example cpp11 http server connection
  • knockoutjs 提交时出现 ko.utils.postJson 问题

    我跟着http blog stevensanderson com 2010 07 12 editing a variable length list knockout style http blog stevensanderson com
  • Meteor:对电子邮件验证确认执行某些操作

    在我的服务器上 我设置帐户需要电子邮件验证并发送验证电子邮件 Accounts config sendVerificationEmail true forbidClientAccountCreation false 我在网上的某个地方读到
  • python:不可变的私有类变量?

    有没有办法把这个Java代码翻译成Python class Foo final static private List
  • 使用 Spring 设计 Java 库

    我正在将现有程序中的一些功能提取到一个单独的库中 该程序使用 Spring 进行依赖注入和其他任务 我也想继续在库中使用它 该库需要监视文件系统的更改 因此它将启动某种单独的线程来执行此操作 我真的不知道我的库初始化选项是什么 如何初始化库
  • 如何使用 selenium webdriver 自动化基于 Flash 的页面

    我是一名测试员 我们使用一种工具 其中包含使用 Flash 开发的页面 我需要自动化一些出于测试目的而重复的任务 我了解 Selenium Web 驱动程序 但我无法检查这些闪存页面上的任何元素 请帮助我解决这个问题 我玩过闪存硒 http
  • 如何使用 Socket 获取 Asterisk 服务器的状态 - Python

    我试图使用 python 套接字获取 Asterisk 服务器的状态 但没有任何反应 这是我的代码 import socket s socket socket socket AF INET socket SOCK STREAM HOST 1
  • 输出文件时使用Powershell环境变量作为字符串

    我在用获取 WindowsAutopilotInfo https www powershellgallery com packages Get WindowsAutoPilotInfo 3 5生成计算机的序列号和哈希代码并将该信息导出为 C
  • 在 CI/CD 中如何管理前端和后端之间的依赖关系?

    我将描述我的设置 以使问题不那么抽象 但它们似乎并不针对我的情况 Context 我们有 Python Django 后端和 VueJS 前端 每个都位于存储库中 并使用 Portainer 使用堆栈 配置和部署 Gitlab CI 每个存
  • F#:let mutable 与 ref

    首先 我承认这个问题可能是重复的 请告诉我 我很好奇当需要可变性时 一般的 最佳实践 是什么 F 似乎为此提供了两种工具 let mutable绑定 它的工作方式似乎类似于 大多数 语言中的变量 以及引用单元格 使用ref函数 需要显式解除
  • 在 Idris 中证明如果 n = m 且 m = o,则 n + m = m + o?

    我正在尝试通过查看一些练习来提高我的伊德里斯技能软件基础 https softwarefoundations cis upenn edu lf current toc html 最初是为 Coq 设计的 但我希望对 Idris 的翻译不会太
  • 为什么 QToolTips 不会出现在 QMenu 内的 QActions 上

    我正在用 GUI 编写一个应用程序PySide 我设置了一个QMenu on a QPushButton 添加了几个QActions via QMenu addAction 为了进一步向我添加的用户解释这些操作QToolTip与这些QAct
  • 64 位应用程序启动 32 位进程

    我正在开发一个使用 Net 4 0 C 编码的 64 位应用程序 在此应用程序中 在某些时候 我需要启动另一个exe使用以下代码创建文件 l process StartInfo FileName sFullFilePath l proces
  • iOS WKWebView 服务工作者

    从 iOS 15 开始 appCache 被禁用 所以我正在寻找替代方案 是否有启用 WKWebView Service Workers 的官方方法 我知道你可以添加 info plist 键WKAppBoundDomains然后通过实例化
  • 离子选项卡和侧面菜单历史记录

    我想在侧面菜单应用程序内放置一个选项卡式视图 但只是在应用程序的某些视图中 在应用程序中有以下状态结构 Login login menuContent Orders list app orders menuContent Descripti
  • 更改 Qt QML 中按钮的字体大小

    如何在 QML 中设置 Button 控件中文本的字体大小 设计者没有选择 并且 font 不是 Button 的有效属性 Button id cmdQuit text qsTr Quit width 64 height 32 您设置按钮的
  • Firebase v9 上传图片仅显示 9 个字节

    我使用 React Native 和 Firebase v9 将图像上传到 Firebase 在 firebase 存储中 文件已上传 但大小只有 9 个字节 因此无法正常打开 我不知道如何解决这个问题 S const uploadFile
  • DELPHI - 如何更改 VCL 表单应用程序中的 TButton 背景颜色?

    在我的 Delphi VCL 表单应用程序中 我必须更改 TButton 的背景颜色 有没有办法在不使用第三方组件的情况下应用此更改 Thanks 你不能改变 a 的颜色TButton http docwiki embarcadero co