| 技术论坛 |
|
|
| ≡技术区≡ ① |
| DELPHI技术 |
| lazarus/fpc/Free Pascal |
| 移动应用开发 |
| Web应用开发 |
| 数据库专区 |
| 报表专区 |
| 网络通讯 |
| 开源项目 |
| 论坛精华贴 |
| ≡发布区≡ ② |
| 发布代码 |
| 发布控件 |
| 文档资料 |
| 经典工具 |
| ≡事务区≡ ③ |
| 网站意见 |
| 盒子之家 |
| 招聘应聘 |
| 信息交换 |
| 论坛信息 |
|||
|
| 导航： | 论坛 -> DELPHI技术 斑竹:liumazi,sephil | |||||
| 作者： |
|
2021/5/17 14:45:16 | ||||
| 标题： |
|
加入我的收藏 | ||||
| 楼主： | 虽然比不上专业的object Dock 但是平时弄个快捷工具栏也凑合用用 源码地址 https://github.com/msfm2018/win_mac_tool
- |
|||||
| 作者： |
|
2021/5/17 15:06:03 | ||||
| 1楼： | 必须点赞。TMS也实现过一个，效果不错，不过只要底下图标多了，就卡的很，不知道你这个怎么样。稍后试试。 ---------------------------------------------- 只有偏执狂才能生存！ |
|||||
| 作者： |
|
2021/5/17 15:08:29 | ||||
| 2楼： | 点赞！ ---------------------------------------------- - |
|||||
| 作者： |
|
2021/5/17 19:55:07 | ||||
| 3楼： | 顶一下，支持开源 ---------------------------------------------- - |
|||||
| 作者： |
|
2021/5/17 22:01:03 | ||||
| 4楼： | 支持楼主开源分享！ ---------------------------------------------- - |
|||||
| 作者： |
|
2021/5/18 18:15:36 | ||||
| 5楼： | 支持楼主开源分享！，已用上 ---------------------------------------------- http://www.cnblogs.com/tulater/ |
|||||
| 作者： |
|
2021/5/18 18:53:49 | ||||
| 6楼： | 不错 ---------------------------------------------- - |
|||||
| 作者： |
|
2021/5/18 22:35:00 | ||||
| 7楼： | 漂亮！ ---------------------------------------------- ========== |
|||||
| 作者： |
|
2021/5/19 16:09:54 | ||||
| 8楼： | github下不了！下载了一部分后报错 ---------------------------------------------- - |
|||||
| 作者： |
|
2021/5/19 17:14:04 | ||||
| 9楼： | https://hub.fastgit.org/msfm2018/win_mac_tool https://github.com.cnpmjs.org/msfm2018/win_mac_tool https://github.bajins.com/msfm2018/win_mac_tool https://github.rc1844.workers.dev/msfm2018/win_mac_tool https://gh.haval.gq/msfm2018/win_mac_tool https://github.wuyanzheshui.workers.dev/msfm2018/win_mac_tool 一堆镜子 随意造 ---------------------------------------------- [alias] co = clone --recurse-submodules up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速  https://www.cctry.com/>http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
|
|||||
| 作者： |
|
2021/5/19 18:16:25 | ||||
| 10楼： | 支持楼主开源 ---------------------------------------------- - |
|||||
| 作者： |
|
2021/5/19 21:17:33 | ||||
| 11楼： | 报告楼主，我从 github clone 源代码后，在虚拟机的 WIN7 底下的 D10.3.3 上面，编译运行成功，但看不到任何东西。 跟踪了一下，if not DwmCompositionEnabled then 这个是 False 虽然我已经把 WIN7 桌面设置为可以毛玻璃半透明显示了。 屏蔽掉这个 if not DwmCompositionEnabled then 让它执行底下的代码，跟踪发现： BitBlt(Form1.Canvas.Handle, 0, 0, ClientWidth, ClientHeight, h, self.Left, self.Top, SRCCOPY); 这句，Self.Left 的值是 1248；Self.TOp 的值是：-115 因此我怀疑它跑屏幕外面去了。 查代码， form1.Left := g_core.db.syspara.GetInteger('left'); form1.Top := g_core.db.syspara.GetInteger('top'); 这两个值来自 SQLITE 数据库。我检查 git 拉下来的代码里面没有数据库文件，但程序编译运行的目录下有一个 DestTopdb.db 库文件，看起来是程序运行时自动生成的？ 因为看不到任何界面，也没法去操控它。 ---------------------------------------------- - |
|||||
| 作者： |
|
2021/5/20 9:49:40 | ||||
| 12楼： | @keymark (嬲) 谢谢你的镜像，可以下载了 ---------------------------------------------- - |
|||||
| 作者： |
|
2021/5/20 19:46:55 | ||||
| 13楼： | @11楼 其实我写的这个 并不理想 ，严格意义上上 人家的应该不是这样写的， 你们可以自己任意修改 代码理解也不难 或者另起炉灶 数据库是自动生成的 初始化你可以自己赋值 窗体位置form1.Left form1.top form1.Left := g_core.db.syspara.GetInteger('left'); form1.Top := g_core.db.syspara.GetInteger('top'); 这个是下一次启动的时候 窗体的位置。 只win10试了试 win7系统没测过 ---------------------------------------------- - |
|||||
| 作者： |
|
2021/5/21 21:11:24 | ||||
| 14楼： | 多谢楼主指教 ---------------------------------------------- - |
|||||
| 作者： |
|
2021/6/5 20:49:52 | ||||
| 15楼： | 厉害 ---------------------------------------------- 声明：本人不在论坛询问任何编程问题，请不要将我的帖子当成问题来回答。炒股一天，编程三年，不浪费时间了。 经常在外面,没空,不要找我.. |
|||||
| 作者： |
|
2021/6/5 21:58:05 | ||||
| 16楼： | 这种异型的动画效果窗体，用 Delphi 来做，的确不是合适的工具。 FlashAS 曾经是一个不错的工具。 很多年前用 Authorware 做过类似的界面。那效果够炫、够酷。 ---------------------------------------------- 武汉天气不好 |
|||||
| 信息 |
| 登陆以后才能回复 |
