自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(10)
  • 资源 (9)
  • 收藏
  • 关注

原创 如何使 win + D快捷鍵對本應用程序無效

今天看到 一個帖子征集此問題的解法,原帖:http://topic.csdn.net/u/20100331/10/5ba44808-15a7-444c-a659-7f7d00c39f98.html?44566 其中列出的解法如下://方法1procedure TForm1.Createparams(var params: TCreateParams); begin inher

2010-03-31 17:36:00 1358

原创 【Exe結構分析】

_IMAGE_DOS_HEADER = packed record { DOS .EXE header } e_magic: Word; { Magic number } e_cblp: Word; {

2010-03-26 14:08:00 1036

原创 add system menu

procedure AddToSystemMenu(SysMenu : hMenu; Caption : string; CmdId : Integer);var MenuItemInfo : TMenuItemInfo;    Index        : Integer;begin FillChar(MenuItemInfo, SizeOf(MenuItemInfo), 0); Index:=

2010-03-15 18:04:00 780

转载 精确判断vista版本

Under Windows Vista (and only Windows Vista, remerber my previous article  http://www.delphi3000.com/articles/article_5145.asp), I can call the GetProductInfo Windows Vista API function that inform me

2010-03-10 20:39:00 884

转载 检测操作系统的4种方法

这是原帖的链接 Pop quiz. How do you detect Windows version? Simple, call the GetVersionEx API.And now for a bonus question. How do you detect Windows version without a doubt? Well, thats not

2010-03-10 20:01:00 1569

转载 几个判断OS版本的函数

IsWin9x Returns true if the operating system is on the Windows 9x platform or false if not. function IsWin9x: Boolean;begin Result := SysUtils.Win32Platform = Windows.VER_PLATFORM_WIN32_WIN

2010-03-10 19:46:00 1268

原创 理解VCL中窗体的释放过程

關閉應用程序的過程:WM_CLOSE,调用DestroyWindow() DestroyWindow()又发送WM_DESTROY 响应WM_DESTROY,调用WM_QUIT GetMessage()发现WM_QUIT,退出程序delphi:關閉-發出wm_close,響應消息,調用close,判斷是否為主窗,是:則調用application.terminate,而這個方法則會發送PostQ

2010-03-02 16:16:00 2046

原创 cxGrid使用经验记录(本来放在blogspot,无奈现在不能访问)

1、在我參與的一個項目中,有使用cxGrid搭配TMS的officePager。踫到這樣的狀況:1)、cxGrid.View.OptionBehavior中的alwaysShowEditor設為True;2)、cxGrid的欄位足夠多,使得可以產生ScrollBar;3)、將焦點focused到最右邊的一欄,此時左右拉動scrollbar,會出現畫面殘留的狀況;此問題,後來查出,是因爲TMS的關係

2010-03-02 16:13:00 4381 4

原创 InterBase 與 FireBird 語法兼容問題記錄

序號語法錯訊解法1select max(adr1001) from gp0adr1 order by adr1001Invalid expression in the ORDER BY clause (not contained in either an aggregate function or th

2010-03-02 14:01:00 2282

原创 一些常見的SQL效能問題

1.      對查詢進行優化,應儘量避免全表掃描,首先應考慮在 where 及 order by 涉及的列上建立索引。  2.      應儘量避免在 where 子句中對欄位進行 null 值判斷,否則將導致引擎放棄使用索引而進行全表掃描,如:  select id from t where num is null  可以在num上設置預設值0,確保表中num列沒有null值,然後這樣

2010-03-02 11:26:00 4188

运行时Object Inspector

在运行期显示控件设计属性,且提供编辑。适合开发版本:Delphi 5.x, Delphi 6.x, Delphi 7.x, Delphi 2005, Delphi 2006。

2014-06-26

TAPPBar任务栏

make you application look like the TaskBar in windows Converting a normal application in to an AppBar is a tre step rocket : 1 Add AppBar to the uses clausule in the TOP of the unit containing the form you want to convert to an TAppBar 2 Change the forms parent class from TForm to TAppBar 3 If y

2014-06-16

delphi 钩子类

delphi 钩子类

2014-05-23

VC写的Pascal编译器

支持三种文件 *.rez——这是源码解析后的文件 *.asm *.pas 开发环境VC 6

2010-07-14

dephi編寫的一個類似msn中的提示窗

自己看代碼吧12345678901234567890

2010-03-15

可靠地判断系统版本的函数

来源于 Slovenian Delphi community

2010-03-10

TQRMultiExport - PDF and Image exporter

For Delphi7 By Akos Toth. This component allows you to save your QuickReport output in different graphics formats. Supported formats are: PDF, JPEG, GIF, BMP, EMF, WMF and TIFF Events implemented: OnBeginExport, OnFinishExport, OnPrepare (after calling the prepare method of the report) and OnPage (before exporting each page).

2010-03-10

监视文件夹程序(delphi)

SHILCreatefromPath SHChangeNotifyRegister SHGetPathFromIDList

2010-03-09

ADO連接Excel

Connecting an Excel Spreadsheet to Delphi using ADO

2010-01-21

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除