精华区文章阅读

发信人: bloom (├┝┞┟┠┢┣�), 信区: VB
标题: CreateSemaphore(进程与线程)(转载)
发信站: 哈工大紫丁香 (2000年09月07日18:35:54 星期四), 转信

【以下文字转载自 cnTemp 讨论区】
【原文由 catchy 所发表】
发信人: yucheng (无话可说), 信区: VisualBasic
发信站: BBS 水木清华站 (Sat Apr 8 00:44:42 2000) WWW-POST

CreateSemaphore

VB声明
Declare Function CreateSemaphore Lib "kernel32" Alias "CreateSemaphoreA"
(lpSemaphoreAttributes As SECURITY_ATTRIBUTES, ByVal lInitialCount As Long,
ByVal lMaximumCount As Long, ByVal lpName As String) As Long
说明
创建一个新的信号机
返回值
Long，如执行成功，返回信号机对象的句柄；零表示出错。会设置GetLastError。即使返
回一个有效的句柄，但倘若它指出同名的一个信号机已经存在，那么GetLastError也会返
回ERROR_ALREADY_EXISTS
参数表
参数类型及说明
lpSemaphoreAttributes SECURITY_ATTRIBUTES，指定一个SECURITY_ATTRIBUTES结构，或
传递零值（将参数声明为ByVal As Long，并传递零值）——表示采用不允许继承的默认
描述符。该参数定义了信号机的安全特性
lInitialCount Long，设置信号机的初始计数。可设置零到lMaximumCount之间的一个值

lMaximumCount Long，设置信号机的最大计数
lpName String，指定信号机对象的名称。用vbNullString可创建一个未命名的信号机对
象。如果已经存在拥有这个名字的一个信号机，就直接打开现成的信号机。这个名字可能
不与一个现有的互斥体、事件、可等待计时器或文件映射的名称相符
注解
一旦不再需要，一定记住用CloseHandle关闭信号机的句柄。它的所有句柄都关闭以后，
对象自己也会删除
一旦值大于零，信号机就会触发（发出信号）。ReleaseSemaphore函数的作用是增加信号
机的计数。如果成功，就调用信号机上的一个等待函数来减少它的计数

--

--
☆ 来源:．哈工大紫丁香 bbs.hit.edu.cn．[FROM: casi.bbs@smth.org]
--
※ 转载:．哈工大紫丁香 bbs.hit.edu.cn．[FROM: 202.118.247.254]

VB 版 (精华区)