- 博客(87)
- 资源 (17)
- 收藏
- 关注
RSS订阅原创 FASTREPORT 预览 编辑页
希望在FASTREPORT预览界面对报表项进行调整，并对调整结果再次打印，已开发“编辑页功能”，但点开“编辑页”，进行修改后无法再次预览，只有“保存”按钮可用，预览按钮为灰色的，保存是把结果保存为一个报表文件，与我的想法不一致。解决方法如下：直接修改后点右上角的关闭的那个叉，提示“保存变更至预览界面？”，选“是”即可实现功能很简单，但是会容易忽略，会用的人请勿笑，我是一直没有注意到
2015-07-19 20:17:20
2209
原创 fastreport 转PDF 中文 乱码 ARIAL
fastreport 转PDF中文乱码，百度绝大部分方法是：把字体设为宋体，设为中文字体等这的确可以解决，但是为了解决这个问题，牺牲字体，牺牲美观，宋体实在是太丑了，这个问题困扰了很久，今天终于找到最佳的解决方法，要用ARIAL字体（其它字体方法类似），解决方法：百度并下载：“Arial Unicode MS” 字体，安装此字体，并在报表中选择该字体导出PDF时，选择“嵌入字体”，
2015-07-19 20:10:25
5035
2
原创 CXGRID 定位行，列，取值
CustomDrawCell事件中取行: AViewInfo.RecordViewInfo.Index取列: AViewInfo.Item.ID取值: AViewInfo.RecordViewInfo.GridRecord.Values[4]
2015-07-04 13:38:43
1677
原创 CXGRID增加选择列
在CXGRID中增加一列做选择列，且不绑定字段，关键代码cxGrid1DBTableView1.Columns[0].DataBinding.ValueType := 'Boolean';cxGrid1DBTableView1.DataController.DataModeController.SmartRefresh := True;cxGrid1DBTableView1.Dat
2015-03-22 21:53:43
1123
原创 INNO SETUP-批处理
CD/D i:\Program Files\Inno Setup 5Compile32 /cc I:\Install\setup_tmp.iss
2012-08-16 15:04:15
1085
原创 Delphi自动编译-批处理
1、切换到项目文件路径下CD/D I:\源码\Source\PrjMain2、编译"F:\Program Files\Borland\Delphi7\Bin\delphi32.exe DCC32.exe" "prjMain.dpr" -D -B 注意：项目文件的cfg文件，将里面的相对路径全部换为绝对路径，并将 -U -O -I -D中加入所使用控件的路径 常用批
2012-08-16 14:49:32
1406
原创 VSS取源码-批处理命令
1、切换到源码路径CD/D I:\源码\Source 2、变量加入环境变量PATH=%PATH%;I:\program files\vss\win323、设置变量SET SSUSER=VSS用户名SET SSPWD=VSS密码SET SSDIR=登录VSS的路径，即Open SourceSafe DataBase中的Path4、取源码，%VSSSOUR%：为VS
2012-08-16 14:12:48
682
转载 设置透明QQ头像
准备一张白色的图片，然后进入http://imgcache.qq.com/club/face/webface/uploadface.html，上传白色的头像，就会变透明，是透明不是白色
2012-08-03 15:44:40
2741
1
原创 Win7 SQL DBNETLIB连不上
Win7装SQL后，Win7可以访问XP，XP不能访问Win7，问题：[DBNETLIB][ConnectionOpen (Connect()).]SQL Server 不存在或拒绝访问。解决方案：Win7设置共享，即XP能够输入"\\IP"访问Win7即可。
2012-07-07 19:14:01
774
原创 delphi-cxgrid-cxtreelist加行序号
OptionsView.Indicator = TrueOptionsView.IndicatorWidth = 40//宽度procedure cxGridCustomDrawIndicatorCell( Sender: TcxGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxCustomGridIndicatorItemViewI
2012-06-27 22:29:19
1877
转载 彻底删除微软拼音输入法
1、运行msconfig，在“启动”处去掉CTFMON的钩，重启电脑。2、“控制面板”-“添加或删除程序”-“Microsoft Office Professional Edition 2003”-“更改”-“添加或删除功能”-“选择应用程序的高级自定义”-“下一步”-“Office 共享功能”-“中文可选用户输入方式”-右击“微软拼音输入法2003”选择不安装-“更新”。3、运行Regs
2011-06-09 20:21:00
1328
原创 dxBarManager
ToolBars - IsMainMenu ：是否主菜单dxBarLargerButton - AutoGrayScare ：自动灰白按钮右键 - Begin a Group ：分组按钮按下状态 ：ButtonStyle - > bsChecked
2010-12-26 14:54:00
1730
原创 delphi自动编译（Vss自动下载）
<br />批处理文件： <br />@echo off<br />Echo 正在打包，请稍候。。。<br />rem 变量设置<br />set CompPath = <br />set DelphiPath =<br />set SourcePath = <br />set ExePath =<br />set VssPath =<br />set VssDir =<br />set VssSourcePath =<br />set VssUser =<br />set VssPassword = <b
2010-12-26 14:46:00
656
转载 XP去掉快捷方式图标的小箭头
<br />运行注册表<br />删除“HKEY_CLASSES_ROOT/Lnkfile/IsShortcut”<br />和“HKEY_CLASSES_ROOT/piffile/IsShortcut”<br />重启后生效
2010-11-04 23:36:00
542
原创 delphi 选择文件夹
uses ...ShlObj, ActiveX;function BrowseCallbackProc(Wnd: HWND; uMsg: UINT; lParam, lpData: LPARAM): Integer; stdcall;begin if uMsg = BFFM_INITIALIZED then begin SendMessage(Wnd, BFFM_
2010-04-17 22:30:00
806
原创 SQL自定义快捷键
if exists(select 1 from SysObjects where xtype = P and name = sp_Insert)drop proc sp_InsertGo--Ctl + 4CREATE proc sp_Insert @table varchar(100) as declare @str varchar(8000)
2010-03-21 09:08:00
568
转载 软件保护技术（软件注册机制）
1 序列号保护 数学算法一项都是密码加密的核心，但在一般的软件加密中，它似乎并不太为人们关心，因为大多数时候软件加密本身实现的都是一种编程的技巧。但近几年来随着序列号加密程序的普及，数学算法在软件加密中的比重似乎是越来越大了。 看看在网络上大行其道的序列号加密的工作原理。当用户从网络上下载某个shareware——共享软件后，一般都有使用时间上的限制，当过了共享软件的试用期后，你必须
2010-02-02 17:44:00
1322
转载 在Delphi程序中操作注册表(转)
32位Delphi程序中可利用TRegistry对象来存取注册表文件中的信息。 一、创建和释放TRegistry对象 1.创建TRegistry对象。为了操作注册表，要创建一个TRegistry对象：ARegistry := TRegistry.Create； 2.释放TRegistry对象。对注册表操作结束后，应释放TRe
2010-02-02 17:35:00
466
原创 SQL－查询所有触发器
----查看所有角本Create table #y (txt text)select name, iid = identity(int,1,1) into #x from SysObjects where xtype = TRdeclare @i int, @max intdeclare @name varchar(40)set @i = 1select @max = max(ii
2010-01-18 15:10:00
908
转载 SQL删除有默认值字段（转）
declare @dfname varchar(50) select @dfname=a.name from sysobjects a inner join syscomments b on a.id=b.id inner join sysconstraints c on c.constid=a.id inner join s
2010-01-18 12:25:00
496
原创 SQL跨服务器查询
--在查询分析器中,在Server服务器中创建链接服务器exec sp_addlinkedserver srv_lnk,,SQLOLEDB,服务器名exec sp_addlinkedsrvlogin srv_lnk,false,null,用户名,密码Go --使用select * from srv_lnk.数据库名.dbo.表名--断开exec
2010-01-12 13:44:00
341
转载 括号匹配（delphi）－转
type TCharStack = class(TStack) private function GetTop: Char; public function Pop: Char; function Push(Item: Char): Char; property Top: Char read GetTop;
2010-01-08 11:34:00
735
转载 在WIN XP系统上安装SQL Server服务器版（转）
方法1：一、找一张SQL server服务器版光盘，在光盘上找到目录“MSDE”并进入，运行SETUP.EXE文件，并按照程序要求进行安装。安装完成重新启动计算机。 二、运行光盘中的，AUTORUN.EXE文件，或让光盘自动运行，打开安装界面后，点击“安装SQL server 2000组件（C）”-->“安装数据库服务器（S）”这里程序将提示你“....服务器组件在此系统上不受支持
2010-01-07 16:45:00
635
原创 数据字典（SQL语句）
declare @tmp table(id int identity(1,1),TableName varchar(100),Column_name varchar(100),Type varchar(50),Lenght int,Scale int,Nullable varchar(1),Defaults varchar(4000),PrimaryKey varchar(1))select
2010-01-07 16:15:00
705
原创 delphi调用腾讯通发即时消息
1. 确认安装RTX Server SDK在开发的机器上必须确认已经安装了RTX Server SDK，并且与RTX Server的版本要一致。该计算机后面我们简称SDK计算机。2. 步骤2、放开IP地址的限制您的RTX Server SDK与 RTX Server安装在不同的机器上，必须保证两台机器网络是互通的。并且保证相应的端口是打开的，假如装有放火墙，COM方式调用SDK新接口需要打
2009-12-31 17:16:00
2589
转载 delphi实行ping功能
unit ping;interfaceuses Windows, SysUtils, Classes, Controls, Winsock, StdCtrls;type PIPOptionInformation = ^TIPOptionInformation; TIPOptionInformation = packed record
2009-12-31 13:54:00
808
原创 Delphi模拟键盘控制Caps Lock(keybd_event)
以Caps Lock键举例，其它(VK_NUMLOCK),类同： 判断状态： 方法1Level: integer; Level := GetKeyState(VK_CAPITAL);if Level = 0 then //没亮else//亮了(1) 方法2KeyState : TKeyBoardState; GetKeyboardS
2009-12-24 11:09:00
3431
1
转载 用Delphi实现网络驱动器的映射和断开(WNetAddConnection2)
大家在运用Delphi编写网络应用程序时可能会遇到这样一个问题：在一个由Windows NT和Novell Netware组成的网络环境中，应用程序需要使用Novell网上的某些数据，如果每次都手工在Windows资源管理器中映射，断开网络驱动器，不仅繁琐而且显得不够专业。本文将介绍在Delphi中使用Windows32 API函数解决这一问题。 一、 基本原理 在Microsoft
2009-12-23 10:30:00
3437
转载 自动删除开始菜单文档记录七种方法
1．修改注册表法只要进行下列操作就可以自动删除文档记录：单击“开始→运行”，输入“regedit．exe”打开系统注册表编辑器，进入主键“HKEY＿USERS/．DEFAULT/Software/Microsoft/Windows/CurrentVersion/Policies/Explorer”，在右边窗口新建一个名为“NoRecentDocsHistory”的DWORD值，并将其值设置为“
2009-11-10 17:09:00
10237
1
转载 dxDBGrid使用集锦
一、如何设定可以多列自动排序? 只能使用分组:如按a1,a2,a3,a4排序 先按a1分组,再a2,再a3 然后设置a4的排列(升/降)二、如何设定左边几列，不能滚动? 建立Band0,Band1 Band0的Fixed=tfLeft Band1的Fixed=tfnone 设置要锁定的字段的BandIndex=0,其它为1三、如何访问，显示字段的对象，控制
2009-11-10 16:54:00
1709
转载 Visual Source Safe(简称VSS项目文件的管理)
VSS 的全称为 Visual Source Safe 。作为 Microsoft Visual Studio 的一名成员，它主要任务就是负责项目文件的管理，几乎可以适用任何软件项目。 源代码版本控制机制是现代软件开发中必不可少的管理机制之一，通常借助版本控制软件即Source Code Management(SCM) systems或者Version Control systems来实现。版本控
2009-09-08 09:59:00
1126
转载 Delphi取局域网上所有的SQL服务器名称
unit GetSQLServerUnt;interfaceuses ADODB, OleDB, ActiveX, ComObj, ADOInt, ADOConst, Classes, Windows, SysUtils, DB;const CLSID_SQLOLEDB_ENUMERATOR: TGUID = {DFA22B8E-E68D-11d0-97E4-
2009-08-21 10:47:00
1688
2
原创 常用软件官网
360安全卫士：http://www.360.cn/千千静听：http://ttplayer.qianqian.com/迅雷：http://dl.xunlei.com/暴风影音：http://www.baofeng.com/Adobe Reader：http://get.adobe.com/cn/reader/MSN：http://messenger.live.cn/QQ：
2009-04-27 17:52:00
582
原创 IE收藏夹
1、IE收藏夹在哪个位置？能否挪位收藏夹位置？怎么挪？ 答：IE收藏夹位置：C:/Documents and Settings/用户名/Favorites 更改位置：打开注册表HKEY_CURRENT_USER/Software/Microsoft/Windows/CurrentVersion/Explorer/User Shell Folders，双击右侧窗口中的"Favorit
2009-04-02 17:53:00
454
原创 MSN表情管理
终所周知，MSN上表情单调、乏味，而在MSN所能提供的功能上看，增加表情非常费劲，一个一个在数量非常多的情况下是很无味的，而通过工具MSNShell，所有的一切都变的简单了。不信你看看：MSNShell下载地址：http://www.msnshell.net/ 下载安装后，启动MSN，在工具栏最后面会增加一个选项“Shell”，选择 Shell ->设置->头像.签名.表情
2009-04-02 17:29:00
862
原创 Delphi文件夹复制
Function DoCopyDir(sDirName:String;sToDirName:String;flag:boolean):Boolean;var F: TSearchRec; //hFindFile:Cardinal; t,tfile:String; sCurDir:String[255]; FindFileData:WIN32_FIND_
2008-11-05 17:14:00
1684
转载 SQL Server解锁步骤
1.创建一个临时Table CREATE TABLE #HarveyLock( SPID INT, DBID INT, OBJID INT, INDID INT, TYPE VARCHAR(100), RESOURCE VARCHAR(100), MODE VARCHAR(100), STATUS VARCHAR(100)) 2.将Lock信息存入该TableIN
2008-04-17 14:46:00
1562
转载 dxDBGrid一些设定
针对TdxDBGrid 仅仅设置一些属性，就可以到达很好的效果：前提：先设置DataSource、ADODataSet、以及TdxDBGrid 的属性后，设置ADODataSet 的Active＝true；然后才能在TdxDBGrid中的鼠标右键－>column-> Add all Fields； 注意：一定要设置TdxDBGrid 控件的属性keyField、并设置OptionsDB 中edgo
2008-03-10 12:06:00
1427
delphi jpeg.pas
2012-05-04
Pascal精要-delphi的基础
2009-02-20
井拾贰图片格式转换软件V1.1
2007-11-23
井拾贰自动关机软件V1.1
2007-11-23
井拾贰图片格式转换软件V1.0
2007-10-30
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人