Technology Learning

摘要： var SbarWh,SbarHt:integer;begin SbarHt:=getsystemmetrics(SM_CXHSCROLL);//水平滚动条的高度 SbarWh:=getsystemmetrics(SM_CYHSCROLL);//垂直滚动条的宽度 lblWidth.Caption:='宽度:'+ inttostr(sbarwh)+ 'Pixels ' + ' 高度:' + intt... 阅读全文

摘要： 使用Delphi编写游戏，唯一没有C++方便的就是不支持运算符重载。当你编写有关向量或者矩阵计算的程序时，不支持运算符重载的Delphi使用起来是很费劲的。但是Delphi 2006改变了这种局面，新的Delphi内核已经支持运算符重载了！本文将介绍如何使用Delphi的运算符重载功能 注意：只有Delphi 2006 和 免费版的 Turbo Delphi 支持这一功能！Delphi for W... 阅读全文

摘要： 当form的border style为bsnone时，form页面不可以移动即鼠标禁用。以下可以解除禁用.procedure TForm5.FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);begin ReleaseCapture; Perform(WM_SYSCOMMAN... 阅读全文

摘要： unit Unit5;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, RzButton;type TForm5 = class(TForm) btn1: TRzButton; HotKey1: THotKey; procedure ... 阅读全文

摘要： 进行这个工作也有两种方法，其一是利用界面上的工具进行：在“控制面板”的“区域”下找到“日期”改变其类型即可；另一种是通过注册表进行：在HKEY_CURRENT_USER\Control Panel\International\sShortDate下直接加入M/d/yyyy值即可。 阅读全文

摘要： 关闭所有数据库控件直接拷贝copyfile(pchar('file.mdb'),PAnsiChar('f_to.mdb'),false); 恢复再拷贝回来copyfile(pchar('f_to.mdb'),PAnsiChar('file.mdb'),false); 阅读全文

摘要： Delphi中的用于表示时间的类型： 首先，看一看在delphi中用于描述时间的几种数据结构，对时间的操作，其实就是对这些结构的操作。 TDateTime类型： Delphi中最常用的表示日期时间的数据类型TDateTime类型，和普通的整形数一样，你可以给日期定义一个日期型变量以便在程序中进行操作。TdateTime类型实质上是一个Double型的数，在Delphi中是这样定义TdateTime... 阅读全文

摘要： procedure TForm1.Button1Click(Sender: TObject);var reg: TRegistry;begin reg := TRegistry.Create; reg.RootKey := HKEY_CLASSES_ROOT; {在注册表中添加我们虚拟的 .tst 格式, 并指定默认项的值是 TestFile} reg.OpenKey('.tst', True);... 阅读全文

摘要： 例：btnTest按钮btnTest按钮的onkeydown 里写 if Key=VK_RETURN then begin　　btnTestClick(nil); end; 阅读全文

摘要： function TfrmTest.ParseDssFilesName(const strParam: string; strSplit: string): TStringList;var tmpDssFileName: string; i: integer;begin Result := TStringList.Create; if strParam = '' then begin exit; ... 阅读全文