【原创】Delphi7下的TFlowPanel

最新推荐文章于 2023-11-06 08:59:49 发布
原创 最新推荐文章于 2023-11-06 08:59:49 发布 · 401 阅读 · 0 ·
CC 4.0 BY-SA版权
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。

本文介绍如何将D2007中的TFlowPanel控件移植到D7中，并分享了移植过程遇到的问题及解决办法。该控件支持紧凑排版，适用于多种布局需求。
TFlowPanel是一个很好的排版容器控件，支持上下左右的紧凑排版。但TFlowPanel是基于D2005之后的控件，D7并没有自带这个控件。我开始以为从D2007将这个控件扒下来很容易，但在编写过程中，发现TComponent这个基类，D7和D2007发生了很大不同，看来D2007的底层RTL发生了不少变化。后来边修改边测试，还是改成了D7版下的TFlowPanel。在设计期可能有点停滞感，但在运行期，和D2007一样的。
      现在上传代码，有需要的同学请享用吧。
http://atkins.5d6d.com/attachment.php?aid=1297&k=97ee74ad18e6a4884465b25507904e17&t=1227605808

        
        



        







        
          
            
            评论这张
          
        


          
            
               【原创】Delphi7下的TFlowPanel - yyimen - yyimen的博客
            
            转发至微博
          
        
Delphi XE2 新控件 布局Panel TGridPanel TFlowPanel
GuoGuoABC
11-06 1292
TGridLayou:表格，自动排列容器里的控件，控件大小相同可自定义大小，设定后全部控件大小相同且不变，x行y列，行数列列数根据控件大小变动。TFlowPanel的效果图，里边是panel，左侧是TCategoryButtons，搜索框是TButtonedEdit。堆栈Panel，一行只有一个控件(不能多列），或一列只有一个控件（不能多行）不需要些代码计算左边，自动水平居中 垂直居中 ，横向纵向居中！
PythonStudio 控件使用常用方式（二十二）TFlowPanel
gxchai的博客
08-13 704
PythonStudio是一个极强的开发Python的IDE工具，官网地址是：https://glsite.com/ ，在官网可以下载最新版的PythonStudio，同时，在使用PythonStudio时，它也能及时为用户升到最新版本。它使用的是Delphi的控件，常用的内容是与Delphi一致的。但是相关文档并一定完整。现在我试试能否逐步把它的控件常用用法写一点点，也作为PythonStudio的参考。从1.2.1版开始，PythonStudio又增加了很多新的控件。
DELPHI 用PANEL当窗体标签
02-01
相信现在太多数DELPHI的程序员在做窗体标签时都是在用PAGECONTROL一类的控件，但此类控件有一个不足之处是：没有一个“关闭”的按钮。要实现关闭一般是右键关闭或双击关闭。 所以我做了一个稍为另类一点的，不用PAGECONTROL或TABCONTROL，而是用PANEL，另外再加一个IMAGE控件（用它来加载一个“关闭”按钮的图片） 效果如下： http://hi.youkuaiyun.com/attachment/201202/1/0_1328096680pBO0.gif 只要你的“关闭”图片做漂亮一点，那么就可以假乱真了。 但遗憾的是，本人技术水平有限，并未能将其写成控件，还望高的们将它写成控件，让其他的DELPHI爱好者更好便的使用（如果有需要用到的话）。
可卷动的DELPHI panel 控件
10-03
很好用的Delphi可卷动 panel控件
\t\t【原创】Delphi7下的TFlowPanel
08-28 394
TFlowPanel是一个很好的排版容器控件，支持上下左右的紧凑排版。但TFlowPanel是基于D2005之后的控件，D7并没有自带这个控件。我开始以为从D2007将这个控件扒下来很容易，但在编写过程中，发现TComponent这个基类，D7和D2007发生了很大不同，看来D2007的底层RTL发生了不少变化。后来边修改边测试，还是改成了D7版下的TFlowPanel。在设计期可能有点停滞感，但
delphi 使用TFlowPanel容器,实现对内含控件进行自动排版
GuoGuoABC
11-06 763
还有一点需要注意的是，当改变tflowpanel的大小时，其中的控件不能自动重排。2,在其中添加一个tflowpanel,设置align为altop,autosize为true,autowrap为true。1，先添加一个Tscrollbox,设置其align为alclient。autosize默认为false,不用改动。然后往下找到Margins属性,进行设置.设置好后,复制粘贴这个TscGPEdit任意次,然后就可以看到效果了。1.TFlowPanel设置好合适的对齐,其他基本上不用怎么设置,默认即可。
精选资源
Delphi7tts.rar_Delphi TTS 下载_Delphi7语音控件_delphi7 TTS_delphi7 spV
07-14
Delphi7中英文语音朗读程序，含控件及源码、执行程序，需要安装安装Microsoft Speech SDK 5.1。
精选资源
delphi7 Comport控件
06-04
a. 将 下载的文件中的Source 文件夹复制到delphi安装目录中的source文件夹中 ...c. Delphi打开source文件夹中的CPortLib7.dpk文件，选择编译 d. Delphi打开source文件夹中的DsgnCPort7.dpk，选择编译，选择安装，完成！
精选资源
QRCode识别解码代码 Delphi7 D7QRCode.zip_QRCode delphi7_delphi qrcode_m
07-14
Delphi7 写的 QRCode识别的源代码，可直接编译运行。 能识别中文，附带2张测试的二维码图片可测试。 识别率很低，学习下还可以的。 包含了图像处理的一些东西如：灰度化、二值化、定位等。 支持UTF8格式的中文。
精选资源
DevExpress控件For Delphi7自动安装包
最新发布
11-18
DevExpress控件For Delphi7自动安装包 简介 本仓库提供了一个用于在Delphi 7环境下自动安装DevExpress控件的资源文件。该安装包能够依据说明自动完成安装过程，使用方便，适合需要快速部署DevExpress控件的开发者。 ...
DELPHI最简洁的伸缩窗口
04-12
最简洁的伸缩窗口 DELPHI源代码 很有借鉴意义
一个画流程图的Delphi控件 v2.90
08-10
delphi编写的一个画流程图的工具,目前最新版本是2.90.这是个带全部源码的可视化Delphi控件，可以很方便地添加很多另外的图元。
精选资源
Delphi7 在WIN7下显示为大字体125%，150%时窗体不正常演示的解决办法-Good.txt
08-11
Delphi7 在WIN7下显示为大字体125%，150%时窗体不正常演示的解决办法-Good
Delphi中TFlowPanel实现滚动条效果
diligentcat的专栏
12-13 5221
由于TFlowPanel中没有设置滚动条的相关属性。所以我们只好另辟溪径。再加一个tscrollbox来实现。 具体操作如下： 1，先添加一个Tscrollbox,设置其align为alclient。autosize默认为false,不用改动。 2,在其中添加一个tflowpanel,设置align为altop,autosize为true,autowrap为true。在这其中一定要将alig
TGridPanel TFlowPanel
ksrsoft的专栏
05-07 3268
http://edn.embarcadero.com/article/33421
delphi在panel上画图
hutao1101175783的专栏
08-14 1661
1.画线procedure TForm1.DrawImg(path: string);var PanelCanvs:TControlCanvas;ex:string;jpeg:Tjpegimage;bmp:TBitmap;begin if(FileExists(path))then begin ex:=LowerCase(ExtractFileExt(path));...
delphi 工作流 流程图
qq_18932003的博客
12-28 2357
我直接用的tms的Workflow 这个是Dev里面的一个flowchar控件做的，，按钮是通过设计器自己画的。 上下两块都是pagecontrol 和中间是tile 控件 DEV tile控件支持渐变 Devexpress TileNavPane 控件的使用 ...
Delphi中运行时改变panel的位置及大小
diligentcat的专栏
07-26 3660
procedure TForm1.pnl1MouseDown(Sender: TObject; Button: TMouseButton;   Shift: TShiftState; X, Y: Integer); begin   ReleaseCapture; SendMessage(pnl1.Handle,wm_SysCommand,$F012,0);//改变位置 //Release
Delphi7下的QuickReport4.5版本介绍
文件名称“QuickReport[1].v4.5.for.Delphi7”指示了这是一个特定的软件包，专为Delphi 7环境定制。方括号中的数字可能表示该软件包包含了一系列与报表相关的文件或者组件集，而文件扩展名通常为zip或rar，表明这是...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值