Delphi
Delphi学习研究
乔峰的音响
倚剑证道心通明,青衫磊落长歌行。
展开
-
003-如何将窗体置入任务栏
问题来源最近在写一个播放器,想到以前其他平台的播放器,在隐藏主界面后,如最小化为MiniBox或隐藏到托盘后,切换歌曲操作很麻烦,快捷键经常被这个那个软件占有,不方便,而且MiniBox又在我本就不大的屏幕上晃来晃去,碍眼,于是有了这样的想法。经过搜索一番,发现实现起来很简单,于是写了一些代码,实现了这个功能,以下为效果图:任务栏分析本次要操作的,是将包含了一些控件的窗体置入任务栏,实际...原创 2019-10-27 19:38:24 · 478 阅读 · 0 评论 -
002-窗体拖入Panel与内部拖动重排
问题来源群里一位朋友,在开发的过程中,遇到一个产品需求。产品为在线教育,远程教育等操作时,会有多个视频窗口。产品需求希望将视频窗口单独显示出来。也可以根据用户需求,将所有窗口拖动到一个Panel里进行排序显示。并且在Panel内部时,也可以通过拖动进行重新排序。思考与解决首先对窗体进行拖动,找到窗体拖动结束的事件。窗体拖动接受后,判断鼠标当前位置是否在目标Panel上,如果是,...原创 2019-10-27 19:29:38 · 2896 阅读 · 0 评论 -
001-图像的裁切与放大
问题来源群友提问,如何将一定区域内图像进行放大。特定区域图像放大思路为:使用StretchBlt函数进行图像缩放,这里函数结构为:function StretchBlt(DestDC: HDC; X, Y, Width, Height: Integer; SrcDC: HDC; XSrc, YSrc, SrcWidth, SrcHeight: Integer; Rop: DWORD): ...原创 2019-10-27 18:50:19 · 286 阅读 · 0 评论