随笔分类

随笔分类 - 组件相关

摘要：有些时候，我们的窗体没有顶部栏，比如：窗体的borderstyle = bsNone; 我们想在顶部放置一个panel，来拖动窗体，方法如下，直接上代码了： unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.Sys 阅读全文

posted @ 2024-06-09 07:52 del88 阅读(32) 评论(0) 推荐(0) 编辑

保存组件的所有设置到ResFile（.dat）文件

摘要：procedure TfrmMain.N20Click(Sender: TObject); begin //判断是那个选项卡 if PrintTab_pc.ActivePageIndex = 0 then begin //打印订单 WriteComponentResFile(ExtractFileP 阅读全文

posted @ 2013-04-08 13:10 del88 阅读(14) 评论(0) 推荐(0) 编辑

FASTREPORT 动态创建动态增加函数(其它组建原理一样)

摘要：首先窗体类增加一个和这个事件一样参数的函数这个函数的实现代码如下： function TfrmFastPrint.MyMoneyToCnAddFrx(const MethodName: string; var Params: Variant): Variant;//这个函数的参数和要fr事件的参阅读全文

posted @ 2013-03-05 13:49 del88 阅读(61) 评论(0) 推荐(0) 编辑

循环一个组件上的组件

摘要：procedure TfrmTopItemLog.Button4Click(Sender: TObject); var top_canyu_col: string; I: Integer; begin // {获取参与聚合的列} for I := 0 to RuKuHuiZongGroupBy_pn 阅读全文

posted @ 2013-03-02 11:49 del88 阅读(9) 评论(0) 推荐(0) 编辑

progressbar positon 如果大于max 会自动改成max--终于体会到属性的作用了

摘要：阅读全文

posted @ 2012-04-13 22:30 del88 阅读(18) 评论(0) 推荐(0) 编辑

奇妙的tag属性delphi想的太周到了

摘要：官方的说法这样的我以后就不用定义多余的变量来判断是点击的修改按钮还是增加按钮了 Stores an integer value as part of a component. Tag has no predefined meaning. The Tag property is provided 阅读全文

posted @ 2012-01-31 14:25 del88 阅读(13) 评论(0) 推荐(0) 编辑

搜索

积分与排名

随笔分类

随笔分类 - 组件相关