社区
Delphi
帖子详情
为何窗体的属性borderStyle设为bsNone,窗体的弹出菜单(PopupMenu)就实效了?
Monkeycn
2003-08-30 01:56:00
为何窗体的属性borderStyle设为bsNone,窗体的弹出菜单(PopupMenu)就实效了?寻求解决方法!
...全文
102
4
打赏
收藏
为何窗体的属性borderStyle设为bsNone,窗体的弹出菜单(PopupMenu)就实效了?
为何窗体的属性borderStyle设为bsNone,窗体的弹出菜单(PopupMenu)就实效了?寻求解决方法!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
4 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
sailer_shi
2003-08-30
打赏
举报
回复
你最好在代码里写上Popupmemu的显示位置
Drate
2003-08-30
打赏
举报
回复
呵呵,楼上说的清楚,如果想用菜单的话,那最好把你的borderstyle设置为bsDialog
FrameSniper
2003-08-30
打赏
举报
回复
设置窗体的borderstyle属性为bsNone表示不显示窗体的非客户区,而菜单属于非客户区的一部分,所以自然就不显示了!
cnhgj
2003-08-30
打赏
举报
回复
我不会啊!
delphi 无标题
窗体
加边框可拖拽调整大小及移动
窗体
delphi无标题
窗体
(
border
style
=
bs
none)默认没有边框,无法移动,也无法拖拽必变
窗体
大小,本资源为无标题
窗体
加边框并可拖拽调整大小以及移动
窗体
位置。
delphi 无标题
窗体
加边框可拖拽调整大小
delphi无标题
窗体
(
border
style
=
bs
none)默认没有边框,也无法拖拽必变
窗体
大小,本资源为无标题
窗体
加边框并可拖拽调整大小
BCB6中无标题栏可拖动的窗口的四种方法
在BCB6中,无标题栏的窗口,即
Border
Style
设为
bs
None。 如何实现,无标题栏可拖动。 四种方法介绍.(转载)
AlphaControls 2017 version 12.16 for D5-XE10.2
更新:AlphaControls v12.16稳定发布07.09.2017 在调整大小的TsComboBox组件中删除了闪烁 改进了TsTitleBar项目中的箭头绘图 使用
Border
Style
属性
=
bs
None改进了表单的行为 指定了HeaderSkin
属性
时,改进了TsCheckListBox头文件的绘图 改进了TsListView中水平滚动的工作 支持Delphi 5/6/7 Delphi 2005-2010/XE-XE8 (x32/x64) C++ Builder 6/2006-2010/XE-XE8 RAD Studio 10 Seattle (x32/x64) RAD Studio 10.1 Berlin (x32/x64) RAD Studio 10.2 Tokyo (x32/x64) 官网http://www.alphaskins.com/ 提供丰富的皮肤,范例和说明
Delphi添加图层蒙版.rar
Delphi添加图层蒙版,运行本程序后,在屏幕上添加一层阴影,透明度大概在70%左右,可看作是在屏幕上方蒙了一层薄膜的感觉,代码简单:procedure TForm1.FormCreate(Sender: TObject); var bTrans: Byte; Old
Style
: Integer; begin form1.Color := clGradientActiveCaption; WindowState := wsMaximized;
Border
Style
:=
bs
None; Form
Style
:= fsStayOnTop; Old
Style
:= GetWindowLong(Handle, GWL_EX
STYLE
); SetWindowLong(Handle, GWL_EX
STYLE
, Old
Style
or WS_EX_LAYERED Or WS_EX_TRANSPARENT); bTrans := 128; SetLayeredWindowAttributes(Handle, 0, bTrans, LWA_ALPHA); end;
Delphi
5,379
社区成员
262,722
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章