|
|
导航: |
论坛 -> DELPHI技术
斑竹:liumazi,sephil |
|
作者: |
|
2003/9/6 11:49:39 |
标题: |
|
加入我的收藏 |
楼主: |
都谁有句柄 如何获得句柄?
----------------------------------------------
it's me |
作者: |
|
2003/9/6 12:43:04 |
1楼: |
handle就是句柄。知道什么是把柄吗?呵呵!程序中能让windows检测到的某些 参数就叫handle!!明白??? 获得句柄的方法很多。自己找书看啦。
----------------------------------------------
-
|
作者: |
|
2003/9/6 13:04:35 |
2楼: |
能给个例子吗
----------------------------------------------
it's me
|
作者: |
amer (amer) |
★☆☆☆☆ |
-
|
盒子活跃会员 |
|
2003/9/6 13:09:15 |
3楼: |
MessageBox(handle,........);
----------------------------------------------
-
|
作者: |
|
2003/9/6 13:10:50 |
3楼: |
有好例子我马上发上来。挖哈哈!
----------------------------------------------
-
|
作者: |
|
2003/9/6 13:28:42 |
4楼: |
调出文件属性对话框
uses ShellAPI;
function ShowFileProperties(FileName: String; Wnd: HWND):Boolean;
var
sfi: TSHELLEXECUTEINFO;
begin
with sfi do
begin
cbSize := SizeOf(sfi);
lpFile := PAnsiChar(FileName);
Wnd := Wnd;
fMask := SEE_MASK_NOCLOSEPROCESS or SEE_MASK_INVOKEIDLIST or SEE_MASK_FLAG_NO_UI;
lpVerb := PAnsiChar('properties');
lpIDList := nil;
lpDirectory := nil;
nShow := 0;
hInstApp := 0;
lpParameters := nil;
dwHotKey := 0;
hIcon := 0;
hkeyClass := 0;
hProcess := 0;
lpClass := nil;
end;
Result := ShellExecuteEX(@sfi);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowFileProperties('c:\AA.txt', Handle);//这就是handle。它指向ShellAPI(ShellAPI{系统api}是调出文件属性的类,ShowFileProperties是调文件属性方法)使之(handle)获得足够的参数,最后实现调出文件属性的目的!handle我认为就是指针!
end;
----------------------------------------------
-
|
作者: |
|
2003/9/6 17:43:27 |
5楼: |
太谢谢你了,但我还是对什么时候用句柄搞不清楚,你能讲讲这个吗?
----------------------------------------------
it's me
|
作者: |
|
2003/9/8 14:31:23 |
6楼: |
我顶吧,希望有人回答我。
----------------------------------------------
it's me
|
作者: |
|
2003/9/9 9:43:22 |
7楼: |
顶吧,没人应呀
----------------------------------------------
it's me
|
作者: |
|
2003/9/9 16:43:19 |
8楼: |
如果你常调用Win32 API的话应该 就会常用到Handle
----------------------------------------------
|
|