文档章节

WinAPI: SetRectEmpty、IsRectEmpty

涂孟超
 涂孟超
发布于 2014/09/26 15:35
字数 183
阅读 3
收藏 0
SetRectEmpty: 使矩形为空;

IsRectEmpty: 判断矩形是否为空;

所谓矩形为空就是矩形是无区域的, 或者说是 Right <= Left 或 Bottom <= Top 情形下的矩形.
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
var
  R: TRect;
  buf: array[Byte] of Char;
begin
  R := Rect(10,20,-30,-40);
  ShowMessage(BoolToStr(IsRectEmpty(R), True)); {True; 是空矩形}

  R := Rect(10,20,30,40);
  ShowMessage(BoolToStr(IsRectEmpty(R), True)); {False}

  wvsprintf(buf, 'L:%d, T:%d, R:%d, B:%d', @R);
  ShowMessage(buf); {L:10, T:20, R:30, B:40}

  SetRectEmpty(R);

  ShowMessage(BoolToStr(IsRectEmpty(R), True)); {True}

  wvsprintf(buf, 'L:%d, T:%d, R:%d, B:%d', @R);
  ShowMessage(buf); {L:0, T:0, R:0, B:0}
end;

end.

 
 
 
 
 

 

 

  
关于 wvsprintf 函数请参见: http://www.cnblogs.com/del/archive/2008/04/18/1159045.html

本文转载自:http://www.cnblogs.com/del/archive/2008/05/23/1205693.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
私信 提问
Go语言Windows程序设计(1)--简单弹出消息窗口

这几天公司比较空,又开始玩Go语言,发现它可以通过一个https://github.com/lxn/go-winapi go-winapi的库写windows程序,于是就开始玩了,当然,也已经有了很多基于它而进一步封装便于开发的...

卧雪Sirk
2016/03/19
39
0
如何调用WINAPI声明的动态库?

一个库的函数以 WINAPI声明 然后调的时侯就有问题 以WINAPI声明的函数 比如 long dlltest(); 就会变成long _dlltest@0() 试着用 typef long (__stdcall *_pdlltest)(); 这样去导 结果导不出来...

我是你
2014/04/29
94
0
PNotes 这软件不错

这软件是纯C的WINAPI写的 支持换肤等功能 学习WINAPI的,可以好好研究一下源代码

Appcrashes
2011/04/24
1K
20
int WINAPI WinMain()函数

int WINAPI WinMain( HINSTANCE hInstance,//当前实例句柄 HINSTANCE hPrevInstance,//先前实例句柄 LPSTR lpCmdLine,//命令行参数 int nCmdShow //显示状态(最大化、最小化、隐藏) ); WIN...

我是一只鱼
2011/12/05
0
0
多线程同步:互斥对象、事件对象、关键代码段

互斥对象、事件对象、关键代码段 一、互斥对象和事件对象属于内核对象,利用内核对象进行线程同步,速度较慢,但可以实现在多个进程中各线程间进行同步。 二、关键代码段式工作在用户方式下,...

Git_Android
2012/09/12
0
0

没有更多内容

加载失败,请刷新页面

加载更多

大数据教程(11.9)hive操作基础知识

上一篇博客分享了hive的简介和初体验,本节博主将继续分享一些hive的操作的基础知识。 DDL操作 (1)创建表 #建表语法CREATE [EXTERNAL] TABLE [IF NOT EXISTS] table_name [(col_name ...

em_aaron
今天
4
0
OSChina 周四乱弹 —— 我家猫真会后空翻

Osc乱弹歌单(2019)请戳(这里) 【今日歌曲】 @我没有抓狂 :#今天听这个# 我艇牛逼,百听不厌,太好听辣 分享 Led Zeppelin 的歌曲《Stairway To Heaven》 《Stairway To Heaven》- Led Z...

小小编辑
今天
55
3
node调用dll

先安装python2.7 安装node-gyp cnpm install node-gyp -g 新建一个Electron-vue项目(案例用Electron-vue) vue init simulatedgreg/electron-vue my-project 安装electron-rebuild cnpm ins......

Chason-洪
今天
3
0
scala学习(一)

学习Spark之前需要学习Scala。 参考学习的书籍:快学Scala

柠檬果过
今天
3
0
通俗易懂解释网络工程中的技术,如STP,HSRP等

导读 在面试时,比如被问到HSRP的主备切换时间时多久,STP几个状态的停留时间,自己知道有这些东西,但在工作中不会经常用到,就老是记不住,觉得可能还是自己基础不够牢固,知识掌握不够全面...

问题终结者
昨天
4
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部