易截截图软件、单文件、免安装、纯绿色、仅160KB

Delphi中三种方法获取Windows任务栏的高度

第一种:需要引用Windows单元
ShowMessage(IntToStr(GetSystemMetrics(SM_CYSCREEN)-GetSystemMetrics(SM_CYFULLSCREEN)-GetSystemMetrics(SM_CYCAPTION)));
第二种:需要引用Windows单元
function GetSystemTaskBarHeight:Integer;
var
R:TRect;
begin
SystemParametersInfo(SPI_GETWORKAREA,0,@R,0);
Result:=Screen.Height-R.Bottom;
end;
第三种:要引用ShellAPI单元
function GetTaskBarRect: Integer;
var
TBData: TAPPBARDATA;
begin
TBData.cbSize := SizeOf(TAPPBARDATA);
SHAppBarMessage(ABM_GETTASKBARPOS, TBData);
Result :=Screen.Height-TBData.rc.Top;
end;


相关文档:

delphi中exit,abort,break,continue 的区别

exit: 退出函数体
abort: 遇到异常,安静处理,就是不显示不提示
break: 退出当前循环体,包括for ,while, repeat等循环体
continue: 结束循环内的本次处理,继续从循环体的开始位置继续执行
Exit 是跳出当前代码块,也就是当前函数,跳出后是要继续向下执行的(如果有后续代码)。
Abort 是从 EAbort 过来的,可以激发 ex ......

Delphi bookmark使用

关于书签(BookMark)操作;    
  书签操作主要用于在表中快速地定位记录指针,在应用程序中常常要保存记录指针所在的位置,在进行其他处理之后,希望能快速地返回到先前指针所在的位置,此时,使用书签将显得特别有用。有关书签操作,Delphi提供了三个方法,它们是:  
  ●&n ......

Delphi TStream 详细介绍

Delphi TStream 详细介绍
Stream对象,又称流式对象,是TStream、THandleStream、TFileStream、TMemoryStream、TResourceStream和TBlobStream等的统称。它们分别代表了在各种媒介上存储数据的能力,它们将各种数据类型(包括对象和部件) 
在内存、外存和数据库字段中的管理操作抽象为对象方法,并且充分利用了面向对 ......

Delphi 中 FindWindow 和 FindWindowEx 的语法和用法

 Delphi 中 FindWindow 和 FindWindowEx 的语法和用法
FindWindow(
lpClassName,        {窗口的类名}
lpWindowName: PChar {窗口的标题}
): HWND;              {返回窗口的句柄; 失败返回 0}
//FindWin ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号