delphi的TRTLCriticalSection在程序代码中只需要声明一个变量就可以了吗?
这个全局变量可以在线程不同过程方法代码中用?不需要声明多个TRTLCriticalSection?比方:varMyCs:TRTLCriticalSection;在程序开始...
这个全局变量可以在线程不同过程方法代码中用?不需要声明多个TRTLCriticalSection?
比方:
var
MyCs:TRTLCriticalSection;
在程序开始或建立线程之前,初始化
InitializeCriticalSection(MyCs);//初始化临界区
procedure pro1
begin
EnterCriticalSection(MyCs); //进入临界区
try
//程序代码
finally
LeaveCriticalSection(MyCs); //离开临界区
end;
end;
procedure pro2
begin
EnterCriticalSection(MyCs); //进入临界区
try
//程序代码
finally
LeaveCriticalSection(MyCs); //离开临界区
end;
end; 展开
比方:
var
MyCs:TRTLCriticalSection;
在程序开始或建立线程之前,初始化
InitializeCriticalSection(MyCs);//初始化临界区
procedure pro1
begin
EnterCriticalSection(MyCs); //进入临界区
try
//程序代码
finally
LeaveCriticalSection(MyCs); //离开临界区
end;
end;
procedure pro2
begin
EnterCriticalSection(MyCs); //进入临界区
try
//程序代码
finally
LeaveCriticalSection(MyCs); //离开临界区
end;
end; 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询