api集.htm

介绍VB里的各种控件的使用方法,窗口控制,图像编程以及OCX等内容,还提供了一个API集供参考.

);<BR>if(TotalIcon$#@62;0)<BR>{<BR><BR>if(TotalIcon$#@60;2)<BR><BR>ScrollBar1-$#@62;Enabled=false;<BR><BR>else<BR><BR>ScrollBar1-$#@62;Max=TotalIcon-1;<BR><BR>Button2-$#@62;Enabled=true;<BR>Button3-$#@62;Enabled=true;<BR>FileName 
= OpenDialog1-$#@62;FileName;<BR>Edit1-$#@62;Text 
=TotalIcon;<BR>Icon-$#@62;Handle = ExtractIcon( Form1-$#@62;Handle, 
FileName.c_str(), 
0);<BR>Image1-$#@62;Picture-$#@62;Icon=Icon;<BR>Edit2-$#@62;Text=1;<BR><BR>}<BR>else<BR>{<BR><BR>ShowMessage("该文件没有图标");<BR><BR>}<BR><BR>}<BR><BR>}<BR>//----------------------------------------------------------------<BR>void 
__fastcall TForm1::Button2Click(TObject 
*Sender)<BR>{<BR><BR>if(SaveDialog1-$#@62;Execute())<BR>{<BR><BR>//保存图标<BR>Icon-$#@62;SaveToFile( 
SaveDialog1-$#@62;FileName);<BR><BR>}<BR><BR>}<BR>//----------------------------------------------------------------<BR>void 
__fastcall TForm1::Button3Click(TObject 
*Sender)<BR>{<BR><BR>if(SaveDialog1-$#@62;Execute())<BR>//提取所有的图标<BR>for(int 
i=0;i$#@60;TotalIcon-1;i++)<BR>{<BR><BR>Icon-$#@62;Handle = ExtractIcon( 
Form1-$#@62;Handle, FileName.c_str(), 
i);<BR>Icon-$#@62;SaveToFile(SaveDialog1-$#@62;FileName+(AnsiString)i+".ico");<BR><BR>}<BR><BR>}<BR>//----------------------------------------------------------------<BR>void 
__fastcall TForm1::Button4Click(TObject 
*Sender)<BR>{<BR><BR>Close();<BR><BR>}<BR>//----------------------------------------------------------------<BR>void 
__fastcall TForm1::ScrollBar1Change(TObject 
*Sender)<BR>{<BR><BR>Edit2-$#@62;Text=ScrollBar1-$#@62;Position+1;<BR>Icon-$#@62;Handle 
= ExtractIcon(Form1-$#@62;Handle, 
FileName.c_str(),ScrollBar1-$#@62;Position);<BR>Image1-$#@62;Picture-$#@62;Icon=Icon;<BR><BR>}<BR>//----------------------------------------------------------------</P>
<P>判断驱动器的类型<BR><BR><BR>　　使用API函数GetDriveType能判断一个驱动器的类型，该函数返回一个int型的值，当返回值为2时，是软盘；为3时，是硬盘；为4时，是网络映射盘；为5时，是光驱；为6时，是 
RAM 磁盘；为其它值时，是非法的盘符。这个API函数包含在winbase.h头文件中，首先在程序头部加上语句：<BR><BR>include 
$#@60;winbase.h$#@62;<BR><BR>包含头文件，然后在程序中加入以下代码就可以判断驱动器的类型：<BR><BR>int 
drv;<BR>//这里的"C:\\"为要判断的盘符<BR>drv=GetDriveType("C:\\");<BR>switch (drv) 
//判断drv的值<BR>{<BR>case 2 : 
//DRIVE_REMOVABLE<BR><BR>ShowMessage("软盘");<BR>break;<BR><BR>case 3 : 
//DRIVE_FIXED<BR><BR>ShowMessage("硬盘");<BR>break;<BR><BR>case 4 : 
//DRIVE_REMOTE<BR><BR>ShowMessage("网络映射盘");<BR>break;<BR><BR>case 5 : 
//DRIVE_CDROM<BR><BR>ShowMessage("光驱");<BR>break;<BR><BR>case 6 : 
//DRIVE_RAMDISK<BR><BR>ShowMessage("RAM 磁盘");<BR>break;<BR><BR>default 
:<BR><BR>ShowMessage("这个磁盘不存在！");<BR>break;<BR><BR>}<BR><BR>注：case语句后的数值也可以用注释后的常数替换。如2可用常数 
DRIVE_REMOVABLE 来替换。<BR></P>
<P><FONT color=#ff0000>api技巧集（七） <BR></FONT></P>
<P>窗口最小化、最大化和恢复<BR><BR>　　通过调用API函数ShowWindow可以控制指定窗口的状态，如将窗口最小化、最大化或者是恢复原来的状态，等等。<BR><BR>　　虽然通过窗口标题栏上的控制按钮也可以将窗口最小化、最大化或者是恢复，但ShowWindow函数能实现更多的功能，又如隐藏窗口、将窗口最小化到桌面等，这些是标准的控制按钮所做不到的。<BR><BR>　　下面介绍一个ShowWindow函数的例子。这个例子演示了如何将一个窗口最小化到桌面或最小化到任务栏和最大化、恢复窗口原始状态。<BR><BR>　　首先，在C++ 
Builder中新建一个工程，为了方便演示，工程需要两个窗口。添加第二个窗口Form2的方法是：选择“File”菜单下的“New 
Form”。添加了新窗口后，选择“File”菜单下的“Include Unit 
Hdr...”包含窗口Form2的头文件“Unit2.h”，或是直接在Form1的代码编辑窗口的头部加上“#include 
"Unit2.h"”语句。然后在Form1上放上四个按钮，它们的Caption属性分别为“最大化”、“最小化到桌面”、“恢复”和“最小化到任务栏并恢复”。<BR><BR>　　接着，双击窗件Form1，在它的OnCreate事件中加入：<BR><BR>void 
__fastcall TForm1::FormCreate(TObject 
*Sender)<BR><BR>{<BR><BR>　　//设置Form1为顶层窗口<BR><BR>Form1-$#@62;FormStyle=fsStayOnTop;<BR><BR>}<BR><BR>　　双击按钮Button1，在它的OnClick事件中加入：<BR><BR>void 
__fastcall TForm1::Button1Click(TObject 
*Sender)<BR><BR>{<BR><BR>　　//最大化<BR><BR>ShowWindow(Form2-$#@62;Handle, 
SW_MAXIMIZE);<BR><BR>}<BR><BR>双击按钮Button2，在它的OnClick事件中加入：<BR><BR><BR>void 
__fastcall TForm1::Button2Click(TObject 
*Sender)<BR><BR>{　//最小化到桌面<BR><BR>ShowWindow(Form2-$#@62;Handle, 
SW_MINIMIZE);<BR><BR>}<BR><BR>双击按钮Button3，在它的OnClick事件中加入：<BR><BR>void 
__fastcall TForm1::Button3Click(TObject 
*Sender)<BR><BR>{<BR><BR>　　//恢复最小化<BR><BR>ShowWindow(Form2-$#@62;Handle, 
SW_RESTORE);<BR><BR>}<BR><BR>｛｛秪峈最唗郔苤赵恄魊蛹鞶 酸傿蒚鰽蔑棠奴 埶朒锸◆ 芼硌斯譬 賱拨霾蝌阭棠 
utton4腔OnClick岈璃笢〔峈賸?虴别载陇珆ㄛ笢洁楼?珨跺晊奀腔测钨ㄩ<BR><BR>void __fastcall 
TForm1::Button4Click(TObject 
*Sender)<BR><BR>{<BR><BR>　　//最小化到任务栏<BR><BR>ShowWindow(Application-$#@62;Handle, 
SW_MINIMIZE);<BR><BR>　　//延时1秒<BR><BR>Sleep(1000);<BR><BR>　　//恢复最小化<BR><BR>ShowWindow(Application-$#@62;Handle, 
SW_RESTORE);<BR><BR>}<BR><BR>　　最后，编译运行程序。<BR><BR>　　获取磁盘序列号、卷标和文件系统类型<BR><BR>　　使用API函数GetVolumeInformation，可以获取一个磁盘的有关信息，如磁盘的序列号、卷标、文件系统类型。有些软件就是利用磁盘的序列号来加密的。<BR><BR>　　需要获取磁盘信息的时候，加入下面的代码就可以了：<BR><BR>　　//定义长度为255的卷标字符串变量缓冲区：<BR><BR>AnsiString 
VolumeName=AnsiString::StringOfChar(" ", 255);<BR><BR>　　//序列号<BR><BR>unsigned 
long SerialNumber;<BR><BR>　　//定义长度为20的文件系统类型字符串缓冲区<BR><BR>AnsiString SystemName 
= AnsiString::StringOfChar(" 
",20);<BR><BR>　　//获取磁盘信息<BR><BR>GetVolumeInformation("C:\\", VolumeName.c_str(), 
255, &amp;SerialNumber, 0, 0, SystemName.c_str(), 
20);<BR><BR>ShowMessage("C盘的卷标：" + 
Trim(VolumeName));<BR><BR>ShowMessage("C盘的序列号：" + 
IntToStr(SerialNumber));<BR><BR>ShowMessage("C盘的文件系统类型：" + 
Trim(SystemName));<BR>　　屏幕放大镜<BR><BR>　　你一定用过Windows98自带的那个屏幕放大镜吧，你想不想自已做一个呢？其它，这个程序的关键是使用了API函数StretchBlt。<BR><BR>　　调用API函数StretchBlt可以把一个设备中指定大小的位图从拷贝到另一个设备，在拷贝的过程中，还可以根据需要来缩放位图。<BR><BR>　　下面是它的原型和参数说明：<BR><BR>BOOL 
StretchBlt<BR><BR>(<BR><BR>HDC hdcDest, //目标设备句柄<BR><BR>int nXOriginDest, 
//目标矩形左上角的X坐标<BR><BR>int nYOriginDest, //目标矩形左上角的Y坐标<BR><BR>int nWidthDest, 
//目标矩形的宽度<BR><BR>int nHeightDest, //目标矩形的高度<BR><BR>HDC hdcSrc, 
//源设备句柄<BR><BR>int nXOriginSrc, //源矩形左上角的X坐标<BR><BR>int nYOriginSrc, 
//源矩形左上角的Y坐标<BR><BR>int nWidthSrc, //源矩形的宽度<BR><BR>int nHeightSrc, 
//源矩形的高度<BR><BR>DWORD dwRop 
//光栅运算操作<BR><BR>);<BR><BR>　　StretchBlt函数的头文件为“wingdi.h”。其中，它的dwRop参数有15种操作，最常用的就是拷贝运算SRCCOPY了。当源设备和目标设备指定的矩形大小不相等时，函数会根据源矩形和目标矩形的大小比例对位图进行放大或缩小操作后，拷贝到目标设备中。<BR><BR>　　下面就是一个把屏幕上左上角坐标为0x0、宽和高都为100的矩形位图缩小2倍后拷贝到图片控件Image1中的例子：<BR><BR>StretchBlt(Image1-$#@62;Canvas-$#@62;Handle, 
0, 0, 50, 50, GetDC(0), 0, 0, 100, 100, 
SRCCOPY);<BR><BR>　　这句代码的GetDC(0)语句为取得桌面设备的句柄。<BR><BR>　　如果不断地使用上面那句代码，把屏幕缩小放到Image1中，这就成一个“屏幕缩小镜”了。当然，缩小屏幕并没有什么实际的用处，我们只要把它改一下就可以做成“屏幕放大镜”了。<BR><BR>　　要做这个“屏幕放大镜”，首先要运行Borland 
C 
Builder，在窗体Form1上放上一个图片控件Image1和一个时间控件Timer1。<BR><BR>双击窗体Form1，在它的OnCreate事件中加入代码：<BR><BR>void 
__fastcall TForm1::FormCreate(TObject 
*Sender)<BR><BR>{<BR><BR>Image1-$#@62;Width=200;<BR><BR>Image1-$#@62;Height=200;<BR><BR>Timer1-$#@62;Interval=10;<BR>　　//设置顶层窗口<BR><BR>SetWindowPos( 
Handle, HWND_TOPMOST, 0, 0, 0, 0, 
SWP_NOMOVE||SWP_NOSIZE);<BR><BR>}<BR><BR>　　双击时间控件Timer1，在它的OnTimer事件中加入以下代码：<BR><BR>void 
__fastcall TForm1::Timer1Timer(TObject *Sender)<BR><BR>{<BR><BR>int 
x,y;<BR><BR>POINT 
CurPos;<BR><BR>　　//取得鼠标当前坐标<BR><BR>GetCursorPos(&amp;CurPos);<BR><BR>　　//保证拷贝的图象不在屏幕外<BR><BR>if(CurPos.x 
$#@62;Screen-$#@62;Width - 100)<BR><BR>x=Screen-$#@62;Width - 100;<BR><BR>else 
if(CurPos.x 
$#@60;50)<BR><BR>x=0;<BR><BR>else<BR><BR>x=CurPos.x-50;<BR><BR>if(CurPos.y 
$#@62;Screen-$#@62;Height-100)<BR><BR>y=Screen-$#@62;Height-100;<BR><BR>else 
if(CurPos.y 
$#@60;50)<BR><BR>y=0;<BR><BR>else<BR><BR>y=CurPos.y-50;<BR><BR>Caption="坐标：" + 
IntToStr(CurPos.x) + "," + 
IntToStr(CurPos.y);<BR><BR>Image1-$#@62;Canvas-$#@62;FillRect(Rect(0,0,200,200));<BR>　　//拷贝放大图象<BR><BR>StretchBlt(Image1-$#@62;Canvas-$#@62;Handle, 
0, 0, 200, 200, GetDC(0), x, y, 100, 100, 
SRCCOPY);<BR><BR>}<BR><BR>　　代码输入完了，按F9或点击运行按钮运行程序。怎么样？和Windows自带的那个差不多吧！<BR><BR>　　需要注意的是：C++ 
Builder并象VB那样图片控件可以是非持久性的，在C++ 
Builder中，并不能直接不断地调用StretchBlt函数来得到连贯的图象，而是要先使用图片控件的FillRect方法填充图片框（相当于清空图片框），再调用StretchBlt函数才行。<BR><BR>　　时间的延迟<BR><BR>　　延迟在程序设计中非常有意义！比如，程序启动时的等待画面，又或者你需要等待一个过程的完成才能运行程序下面的代码，这时就要使用到时间的延迟了。<BR><BR>　　但是在很多编程语言中一般都没有现成的延迟函数。在Dos的C时代，当程序需要延迟时，有不少人使用的是for循环：<BR><BR>for(int 
i=0;i$#@60;10000;i++);<BR><BR>　　到现在也可能还有人在用吧。到了Win32时代，在系统的API函数库里已经提供有时间延迟的函数了，它就是Sleep函数。当然，在Windows编程中，你也可以使用Timer控件，但使用Sleep函数更方便、快捷。我们只需简单的调用一下Sleep函数，就可以实现时间的延迟。<BR><BR>　　Sleep函数只有一个参数cMilliseconds，用来指定需要延迟的时间，它的单位是毫秒。让我们看下面的例子，请在一个按钮的单击(OnClick）事件中加入下面的代码：<BR><BR>Sleep(3000);//延迟三秒<BR><BR>ShowMessage("本对话框已经延迟了三秒！");<BR><BR>　　这个例子演示了一个延时的对话框，单击了该按钮，本应立即弹出的对话框延迟了三秒钟的时间才弹出。</P>
<P>　</P>
<P>转自 <A href="http://www.xici.net/">http://www.xici.net/</A> 西祠胡同</P>
<P><A href="http://www.npc6.com/"><FONT size=2>返回主页</FONT></A></P></BODY></HTML>