随笔分类 -  Delphi控件

PrintDbGrideh 打印数据
摘要：PrintDbGrideh1.BeforeGridText.Clear;//添加 PrintDbGrideh1.BeforeGridText.Add( '订单 '); PrintDBGridEh1.PageFooter.CenterText.Text:='第 &[Page] 页/共 &[Pages] 页'; PrinterPreview.Orientation:= poLandscape; ... 阅读全文
posted @ 2016-08-31 16:19 aBung 阅读(785) 评论(0) 推荐(0)
Delphi 2005 以上版本GIF动画播放设置
摘要：关于 GIF 的相关类是 TGIFImage，在 GIFImg 单元中，看下面的代码，窗体中的 GIF 就动起来了：1 uses GIFImg;1 procedure TForm1.FormCreate(Sender: TObject);2 begin3 // 先在窗体上放一个 TImage 组件：Image1；4 Image1.Picture.LoadFromFile('C:\Example.gif');5 // AnimationSpeed 设定动画速度，值越大，速度越快；6 TGIFImage(Image1.Picture.Graphic).AnimationSpeed 阅读全文
posted @ 2013-04-30 21:31 aBung 阅读(360) 评论(0) 推荐(0)
DELPHI2010安装Comport4
摘要：在DELPHI2010中安装Comport控件，安装好久，都编译不过，好不容易摸索出来了。安装步骤如下：1、将 Source 文件夹复制到您的源码文件中；2、在DELPHI 中的Library Path 目录文件中添加刚才Source 文件夹的目录地址；3、打开 CPortLibXXX.dpk文件，选择编译(如：CPortLibD2010.dpk)；4、找到编译的文件，CPortLibD2010.bpl，CPortLibD2010.dcp，复制到 Source 文件夹的目录中；5、打开 DsgnCPortXXXX.dpk 文件，选择安装即可。注:第4步是关键，一定要复制到 Source 文件夹 阅读全文
posted @ 2013-04-29 22:01 aBung 阅读(2867) 评论(0) 推荐(0)
三菱FX控件，多线程的应用。
该文被密码保护。
posted @ 2013-02-25 08:08 aBung 阅读(5) 评论(0) 推荐(0)
BusinessSkinForm汉化文件“bsconst.pas”
摘要：{*******************************************************************}{ }{ Almediadev Visual Component Library }{ BusinessSkinForm }{ Version 10.06 ... 阅读全文
posted @ 2013-01-15 12:46 aBung 阅读(718) 评论(0) 推荐(0)
FastReport 不预览直接打印的语句
摘要：摘录至：http://topic.csdn.net/u/20080406/23/61bc9e82-a136-4d12-8f56-a8f474ee10d0.htmlfrxReport1.PrepareReport();frxReport1.PrintOptions.ShowDialog:=false;frxReport1.print;我开始曾试过设置属性ShowDialog为false 只是还是没达到效果 搞不清为什么 英语忘光了 不知道具体什么意思 感觉像 但是不敢肯定没想到用代码可以实现 不过还是感谢楼上的提醒frxReport1.PrepareReport; frxReport1.Prin 阅读全文
posted @ 2011-11-22 15:43 aBung 阅读(4791) 评论(0) 推荐(0)
DELPHI 动态 创建和释放 多个 EDIT 控件
摘要：unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls;type TForm1 = class(TForm) pnl1: TPanel; btn1: TButton; btn2: TButton; procedure btn1Click(Sender: TObject); procedure btn2Click(Sender: TObject); privat... 阅读全文
posted @ 2011-09-17 10:45 aBung 阅读(8925) 评论(0) 推荐(0)