Technology Learning

导航

2010年8月2日

获取滚动条的高度和宽度

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

posted @ 2010-08-02 14:38 浔阳渔夫 阅读(1097) 评论(0) 推荐(0) 编辑

运算符重载

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

posted @ 2010-08-02 11:29 浔阳渔夫 阅读(371) 评论(0) 推荐(0) 编辑

form设置为可移动

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

posted @ 2010-08-02 10:03 浔阳渔夫 阅读(266) 评论(0) 推荐(0) 编辑

转：快捷键

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

posted @ 2010-08-02 09:34 浔阳渔夫 阅读(295) 评论(0) 推荐(0) 编辑