- 博客(41)
- 收藏
- 关注
RSS订阅原创 解决vclskin可能存在的bug
该bug尤其在使用了FastReport预览，退出程序时可能出现。bug表现为退出时弹出地址错误：Access violation at address 00000000. Read of address 00000000。vclskin版本：4.93.11.13有疑问请与我联系[email protected]解决方法：将WinSkinForm.pas单元中，如下代码的第26行注释。procedu
2008-12-26 16:51:00
2672
1
原创 不显示Mantis LOGO
1、在config_inc.php中增加$g_show_mantis_logo = OFF;2、修改html_api.php，在html_top_banner函数开始添加以下两行代码 function html_top_banner() { if ("OFF" == config_get(show_mantis_logo)) return false;3
2008-12-01 23:19:00
1771
原创 关于Mantis变更日志（Changelog）和路线图（Roadmap）的说明
变更日志（Changelog）：是已经修改好了问题的日志，需要给项目添加版本号，并且在添加/解决问题时都指定了相应的版本号，才会显示。路线图（Roadmap）：是计划在某个版本修改某些问题的日志，需要给问题指定“目标版本”才能显示。（提示：指定“目标版本”，应该进入“高级更新”功能修改，或者在报关问题时，进入“高级报告”功能）。初用Mantis，Roadmap功能也是刚摸索出来，如果你有更好的理解
2008-11-27 09:10:00
4270
2
原创 Delphi2009相关文章收集
1、浅谈Delphi2009控件移植2、现有 Delphi 项目迁移到 Tiburon 中的注意事项 3、Delphi 2009 新功能
2008-11-25 11:19:00
1317
原创 改正Mantis在Firefox下字体问题
修改css/default.css span.small { font-size: 9pt; font-weight: normal; }2008-11-27补充：将所有small的style的font-size改为9pt。
2008-11-24 12:07:00
945
原创 Mantis 1.2.0a1 不能给自己的私有项目添加问题注释
问题的提出： 将项目A设置为私有项目，添加用户A作为报告人员，用户B为开发人员。用户A对自己报告的问题，不能添加问题注释，开发人员也无权添加。解决方法： 修改bugnote_add_inc.php第一句如下：#if ( ( !bug_is_readonly( $f_bug_id ) ) && ( access_has_bug_level( config_get( add_bugn
2008-11-23 12:02:00
1838
原创 获取USB设备插拔消息的备忘
获取USB设备插拔消息的备忘coolslob([email protected])先记录要点，有空再整理成文。1、可根据dbch_devicetype（DBT_DEVTYP_DEVICEINTERFACE和DBT_DEVTYP_VOLUME），分别得到PID/VID/SN和盘符号。2、当USB设备不是存储设备时，只出发一次WM_DEVICECHANGE，devicetype是DBT_DEVTYP_D
2008-11-21 23:37:00
7746
4
原创 dcc32.exe命令行编译工程搜索路径的问题
dcc32.exe命令行编译工程搜索路径的问题作者：CoolSlob([email protected])时间到了23点，说这么一句，是因为时间紧迫，还有很多工作没有做完，但还是坚持花半个小时写这么一篇文章，总是找别人帮忙解决问题，不出点绵薄之力，都不好意思再混下去。OK，长话短说废话少说，进入正题。相信对dcc32.exe动过念头的人，都碰到搜索路径的问题：在编辑器中设置好了Search Path
2008-11-07 22:42:00
3935
4
原创 IShellIconOverlayIdentifier接口的外壳程序
IShellIconOverlayIdentifier接口的外壳程序，不能使用ASPack压缩，否则可能引起图标不显示。
2008-11-04 18:56:00
2323
1
原创 批处理中实现数字累加
传说中的goto程序：）echo offset i=0:loopset /a i=%i%+1if %i% GEQ 100 goto endgoto loop:endecho %i%关于批处理比较符号的说明：EQU - 等于NEQ - 不等于LSS - 小于LEQ - 小于或等于GTR - 大于GEQ - 大于或等于
2008-11-04 17:24:00
6720
转载 Getting the System Version（获取操作系统版本）
http://msdn.microsoft.com/en-us/library/ms724429(VS.85).aspxThe following example uses the GetVersionEx, GetSystemMetrics, GetProductInfo, and GetNativeSystemInfofunctions to determine
2008-11-04 14:34:00
1682
原创 根据盘符获取硬件编号
unit USBLib;//----------------------------------------------------------------------------// //
2008-11-03 00:40:00
5565
6
原创 用D币兑换基本《程序员》杂志的时间表
CSDN不放好货，没了的东西也不补，看着D币发霉，兑了基本过期的《程序员》杂志。几乎忘了这档子事，今天邮局寄来通知单才猛地回想起来。也不能怪人家，慢就慢点，书没收钱，还贴邮递费呢！看他们信封上的广告比较有意思：dearbook第二书店，第三服务，第四速度。
2008-10-31 14:22:00
1007
1
原创 Delphi两则：1、PDT时间转北京时间，2、条件编译
1、PDT时间转北京时间 做了个小东西，时间是PDT，而且月份也是英文的。写了个小函数，有用得着的直接copy去:) 有更好的实现方法，请回复。 uses DateUtils;function ConvertPDTDateTime(Str: string): TDateTime;const EngMonthName: array[1..12] of string = (Jan, Feb
2008-10-22 11:00:00
5318
原创 监视资源管理器的文件复制/删除/移动操作，不要太过寄望于Hook SHFileOperation
google了一圈，发现Hook Explorer的SHFileOperation没几个成功的，如果想监视Explorer的文件复制/删除/移动操作，应该Hook CopyFileExA/CopyFileExW, MoveFileA/MoveFileW。
2008-04-11 15:39:00
3494
6
原创 在Frame上使用THotkey必须注意的一点
问题的出现: 某日使用THotkey控件, 设置使用Ctrl+Alt+?作为快捷键, InvalidKeys设置值为[hcNone,hcShift,hcCtrl,hcAlt,hcShiftCtrl,hcShiftAlt,hcShiftCtrlAlt]; Modifiers设置值为[hkCtrl,hkAlt]; 将Hotkey控件放置在Frame, 然后在Form上添加该Frame. 运行结果:
2007-10-30 10:27:00
1252
原创 VCLSkin可能存在的一个bug隐患
产生bug的情况: 1, 使用Tab键切换焦点在Button上,按空格键执行按钮事件时 2, 焦点在RadioButton上,按任意字母时 bug错误现像:地址错误 环境: VCLSkin 4.9.1, Win 2003 Ent Sp2, Delphi 7.0 WinSkinForm.pas中代码段: //fixed by Brian Lowe
2007-10-26 09:19:00
1784
原创 Gina、Delphi、最有钱途及其他
1、Gina 早在2002年时，看到一份关于Gina的文章（当时好像就唯一的一份关于Gina的文章，也许很多人都看过），就希望能自己写个Gina，再自己接个IC卡读卡器，登陆系统刷卡就OK，帅呆了岁月如梭，转眼5年过去。也是造化弄人，5年后还有机会给我再了结这个希望。这次再写Gina也不顺利。我的需求是：希望显示自己的登陆界面，供输入用户名和密码，其他全部使用Windows默认界面。问题在
2007-08-16 17:47:00
2278
2
原创 使用Vista的一些问题[持续更新]
问题１：不能往Access数据库中写入数据．解决方法： 程序以管理员身份运行．问题２：不能向其他程序发送消息SendMessage解决方法：如果程序Ａ要向程序Ｂ发送消息，那么程序Ａ的权限必须大于或等于程序Ｂ：当程序Ｂ以非管理员身份运行时，程序Ａ以管理员或非管理员身份运行都可以；当程序Ｂ以管理员身份运行时，程序Ａ必须也以管理员身份运行．问题３：写在注册表中自动运行（Run）的以管理员身份运行的程序被
2007-06-07 16:26:00
1374
原创 这些天求教有感---求人不如求己
不止一次萌生要写以这个主题的文章，也希望借此提醒大家。这几天在写Vista环境凭据提供（Credential Provider）的登录（Windows XP/2000 GINA的替代品），一番Google+baidu之后，没有找到太多关于这方面的资料。而使用Delphi实现的资料一点都没有（截止到2007-4-27）。只好将Windows SDKs的例程翻译。但是翻译的过程并不顺利，许多C++
2007-04-27 23:34:00
1822
1
原创 使用insert into openrowset剩下的问题
一、解决：“它已经被别的用户以独占方式打开，或没有查看数据的权限”错误1、 设置SQLServer服务器：打开“服务 ”，找到MSSQLSERVER服务，双击弹出属属对话框。选择“此帐户”，输入windows在administrator用户名和密码。重新启动SQL Server。2、设置mdb文件所在目录为共享，并允许everyone写入权限。二、突破insert into op
2007-03-17 22:20:00
3221
原创 使用insert into openrowset语句必须明白的一点
例如执行语句：select * from openrowset(Microsoft.Jet.OLEDB.4.0, D:/testMDAC/mydb.mdb;admin;, table_name)如果程序是运行在数据库连接（ADOConnection）所在的服务器（即本机运行），上面这个代码没有任何问题。如果程序拿到局域网中的其它机器运行，将一直提示：[OLE
2007-03-17 20:56:00
8014
原创 使用BDS2006&Turbo Delphi后有话说
凡人终于还是避免不了对新鲜事物的追棒，我也不例外。Borland Delphi如火如荼地从Delphi7.0发展到8.0，9.0，2005，2006，到现在纯真的Turbo系列。－－－就在我一直抱着Delphi7.0的时候。用了这么多年的Delphi，出门都不好意思跟人家打招呼。朋友们（包括网友）在满口唾沫讨论Delphi的高版本时，我总是嗤之以鼻地回应：怎么也不用Delphi 2005(6)，
2006-11-10 23:46:00
1957
1
原创 VCLSkin 4.12 FullSource的bug修正
1、修正ComboBox列表无边框的bug将WinSubClass.pas中TComboxScrollBar.WMNCPaint函数中的注释取消。2、修正系统菜单(Sysmenu)无边框的bug将WinSkinMenu.pas中TWinSkinPopMenu.NcPaint函数中作如下修改：Dc := GetWindowDC(hwnd); //Dc := GetDCEx(hwnd, msg.WPa
2006-08-24 18:04:00
1825
2
原创 突破LoadStr 1024个字符的限制
(源自：http://community.csdn.net/expert/Topicview1.asp?id=4950441)function LoadStr(Ident: Integer): string;begin Result := FindStringResource(Ident);end;->function FindStringResource(Ident: Integer): st
2006-08-23 16:44:00
1939
1
原创 中国的程序员咋就这么保守呢？
刚才在QQ群里有人问到有没有使用过这个控件（http://www.51delphi.com/delphi/showtl?ID=59746），好奇之于，Down了一个，查看发现并没有源代码，而文档之整齐真是令我折服。作者在文档中详细说明了联系方式，取得联系之后，并不如网页中所说的“该控件未包括代码，需要代码的朋友请下载后与我联系”，在一阵口水盘旋之后，作者声称“仍在修改之中”而告终。去年在c
2006-08-15 10:22:00
1500
原创 为什么还有人在dll函数声明头中使用export指示字？---说export的用法
这里摘抄Delphi7帮助文档中的一段：Calling conventionsWhen you declare a procedure or function, you can specify a calling convention using one of the directives register, pascal, cdecl, stdcall, and safecall. Fo
2006-07-31 09:42:00
1902
2
原创 关于使用SQLDMO.Backup和SQLDMO.Restore的一点经验
作者：CoolSlob时下许多人都希望备份SQL Server数据库时实现进度条，以增加美观。但是，在使用SQLDMO.Backup进行备份时，路径含有空格(space)将导致备份失败，如：Backup.Files = "D:/Program files/my program/backup/test.bak"含有空格时，应该使用中括号将期包括，正确的写法应该为：Backup.Files = "[D
2006-04-23 10:23:00
3149
1
原创 用DrawDibDraw显示BMP文件
作者：CoolSlob功能：码用于完成在Panel上显示一个BMP文件（现多信息请参阅BMP文件结构相关文章）var dc:HDC; hdd:HDRAWDIB; Stream: TStream; hdr: BITMAPFILEHEADER; m_pbmih: TBITMAPINFOHEADER; BITMAP_TYPE: WORD; S: string; len: Inte
2006-04-22 13:12:00
8795
1
原创 Delphi程序慎用XPManifest
Delphi开发程序使用XPManifest控件，将导致在删除（使用Backspace健）ComboBox内容时出现乱码。经跟踪发现，在执行以下过程的HasSelectedText函数部分（附文章结尾），通过SendMessage发送CB_GETEDITSEL消息返回的StartPos、EndPos值发生错误。问题的重现：1、新建一工具，在窗口上分别放置一个XPManifest和一个Com
2006-04-07 14:12:00
5804
2
原创 导出StringGrid内容到Excel
function ExportStrGridToExcel(Args: array of const): Boolean;var iCount, jCount: Integer; XLApp: Variant; Sheet: Variant; I: Integer;begin Result := False; if not VarIsEmpty(XLApp) then begin
2005-10-23 20:37:00
3631
1
原创 使用Delphi开发多媒体播放音轨问题的FAQ(原创)
最近一段时间，在CSDN和DFW上常看见问于切换音轨和切换声道的问题。在这做一个小结。大家可以转载。让菜鸟收益! 转载时，作者希望在最大程度上保持原有信息!1、什么是声(音)轨、声道？ 在早先的VCD时代，一个媒体文件只有一个音轨。故“音轨”一词不常被人们提及。VCD媒体文件中的伴唱或原唱，只有通过切换左右声道来实现。 音轨是随着DVD而来的“产物”。在DVD（MPEG2格式）媒体文件中，一个
2005-09-15 02:04:00
2777
原创 Delphi中DCOM的调试
自己在调试时忘记了第3步，结果总是调试不成功，写到blog上，记录一下1、设置host为%system32%/hostdll.exe (注意把system32替换成实际的路径)2. 把parameters设置成/processID:{4181FE23-F8E7-4B43-BC12-0B771711EB9E} (注意后面的是应程程序ID)3. 选中"Include TD32 Debug Info"和
2005-08-02 08:55:00
3266
原创 Delphi与DirectShow&DSPack/在Delphi7.0下安装DSPack
一、废话几句从去年年底起，有幸也转到了DirectShow方面开发。在论坛中也可以为一些初学者解答一些初级问题了见论坛中有人分不清DirectShow为何物，在这，说明一下：DirectShow是DirectX中的一员。Dspack是Delphi用于做DirectShow开发的一套(免费)控件。下载地址：http://www.progdigy.com/如果是Win2k, 安装之前，必须先安装Dir
2005-07-17 19:46:00
5043
1
原创 使TStringGrid自适应宽度
procedure AutoFitable(AGrids: TStringGrid);//传入TStringGrid对像即可, 2004/10/28,CoolSlobvar I, J: Integer; MaxLenRow: Integer; CurRowLen: Integer;begin inherited; for J := 0 to AGrids.ColCount - 1 do
2004-12-16 18:45:00
2197
2
原创 模拟Nokia手机输入的编辑框
{功能：模拟Nokia手机的输入法控件，继承自TCustomEdit作者：CoolSlob支持：CoolSlob # 163.com 最后更新：2004/12/11}unit NokiaEdit;interfaceuses SysUtils, Classes, Controls, StdCtrls, ExtCtrls, Dialogs;type KeysetInt = -1..9;
2004-12-16 18:33:00
1477
转载 XviD的历史与特点
作者：沈晟 2002年，TDX2002的规则中，除了允许使用旧有的DivX3.11编码之外，新加入了第二种核准使用的编码--也就是本文标题中的XivD编码。作为每年在网上放出数千部最新影片的网上高品质影音组织，他们所遵循的规则对于整个MPEG-4编码的应用市场来说，都有决定性的重要意义。XviD在TDX2002中，以DivX3.11的替代者的姿态出现，还有人戏称：XviD是继承DivX3.
2004-12-14 23:37:00
6771
5
转载 小知识：MPEG音频压缩规格一览
http://www.sina.com.cn 2002/03/11 09:29 赛迪网-中国计算机报 文/陈桄 MPEG(Moving Pict
2004-12-14 23:21:00
2872
原创 手工清除ShareQQ木马
前言： 这是我去年的心得，在打开以前收集的资料中，发现了那次让我心痛的夜晚。最近OICQ也用得少，也不知道现在是否还有这种木马，现在发表出来，希望对骑上了木马的人能尽快下马：） 1、打开注册表，删除以下键值：[HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Windows/CurrentVersion/Run]"NetConfig"="C://WIN
2002-12-20 09:20:00
2498
原创 如何将几个DBGRID里的内容导入同一个EXCEL表中？
前言： 在软件实际制作中，为节省开发成本和开发周期，一些软件人员通常会吧DBGrid中的数据直接导出到Excel表中，而先前能看到的函数仅仅只能在WorkBook的一个Sheet中导入数据，不支持多Sheet！。单元应用： Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dial
2002-11-04 13:10:00
1868
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人