zoukankan
html css js c++ java
TBalloonHint 提示
代码文件:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ImgList;
type
TForm1 = class(TForm)
BalloonHint1: TBalloonHint;
Button1: TButton;
Edit1: TEdit;
ImageList1: TImageList;
procedure FormCreate(Sender: TObject);
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
Button1.CustomHint := BalloonHint1;
Edit1.CustomHint := BalloonHint1;
BalloonHint1.Images := ImageList1;
Button1.ShowHint := True;
Edit1.ShowHint := True;
Button1.Hint := '提示:|这是 Button1 的 Hint|0';
{标题|内容|ImageList 中的图像序号}
Edit1.Hint := '敬告:|这是 Edit1 的 Hint|1';
end;
end.
窗体文件:
object Form1: TForm1
Left = 0
Top = 0
Caption = 'Form1'
ClientHeight = 127
ClientWidth = 215
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Button1: TButton
Left = 32
Top = 32
Width = 75
Height = 25
Caption = 'Button1'
TabOrder = 0
end
object Edit1: TEdit
Left = 32
Top = 80
Width = 121
Height = 21
TabOrder = 1
Text = 'Edit1'
end
object BalloonHint1: TBalloonHint
Left = 161
Top = 24
end
object ImageList1: TImageList
Left = 161
Top = 72
Bitmap = {
}
end
end
查看全文
相关阅读:
去除 CSDN “官方免费去广告 + 万能工具”
github 搜索技巧常用
Python 使用 __doc__ 查看文档
油猴脚本编写自己的脚本来去除知乎 "我们检测到你可能使用了 AdBlock 或 Adblock Plus"
Unity 中的 C# Instantiate() 方法解析
《流畅的 Python 》第 2 章笔记
html 中 a 标签中 href 的路径相关问题
VScode 复制代码到博客园编辑器自动带上代码标签问题
Vue在Ubuntu上的部署
在ubuntu上编译方式安装nginx
原文地址:https://www.cnblogs.com/luckForever/p/7254671.html
最新文章
mysql卡顿问题查找和解决方法
慢查询日志
'javac' 不是内部或外部命令,也不是可运行的程序或批处理文件
MySQL 8.0安装以及初始化错误解决方法
CentOS 7.5关闭FireWall 和SELinux图文详解
Navicat连接不上MySQL 8.0
centeros7 定时任务
centeros 命令
《基于地面平面拟合的激光雷达地面分割方法和ROS实现》 笔记
git 常用指令
热门文章
ubuntu shell 提示 source : not found 原因及解决办法
Ubuntu18.04安装ROS Melodic(详细,亲测安装完成,有清晰的截图步骤)
<基于欧几里德聚类的激光雷达点云分割及ROS实现> 笔记
激光雷达的点云降采样
【ROS学习】rviz使用笔记
Ubuntu安装nvidia驱动
windows安装Ubuntu双系统
Jetson tx2 安装 ROS
《代码的未来》第 2 章笔记
《流畅的 Python 》第 5 章笔记
Copyright © 2011-2022 走看看