Z
zfine
Unregistered / Unconfirmed
GUEST, unregistred user!
在三层结构中(Midas)中定义了许多完成企业逻辑的类。其中TCtrlObj是控制协调类。
程序初始化中定义:
ServerCtl:TCtrlObj;
ServerCtl:=TCtrlObj.Create;
在三层结构中(Midas)有这样一个功能调用借口:
procedure FlashData(aData:OleVariant;IndexID:Integer);SafeCall;
begin
SercerCtl.BData:=aData;
ServerCtl.FlashClientData(BData,.....);
;
;
end;
问题:当多用户调用此接口时会不会造成SercerCtl.BData不知道是谁的了。。?
也就是说可不可以这样做:
procedure FlashData(aData:OleVariant;IndexID:Integer);SafeCall;
var
ServerCtl:TCtrlObj;
begin
ServerCtl:=TCtrlObj.Create;
ServerCtl.FlashClientData(BData,.....);
;
;
end;
这样每个用户调用都只执行各自的ServerCtl,从而避免数据混乱等问题。。。
望专家,大虾指点。。。谢谢
程序初始化中定义:
ServerCtl:TCtrlObj;
ServerCtl:=TCtrlObj.Create;
在三层结构中(Midas)有这样一个功能调用借口:
procedure FlashData(aData:OleVariant;IndexID:Integer);SafeCall;
begin
SercerCtl.BData:=aData;
ServerCtl.FlashClientData(BData,.....);
;
;
end;
问题:当多用户调用此接口时会不会造成SercerCtl.BData不知道是谁的了。。?
也就是说可不可以这样做:
procedure FlashData(aData:OleVariant;IndexID:Integer);SafeCall;
var
ServerCtl:TCtrlObj;
begin
ServerCtl:=TCtrlObj.Create;
ServerCtl.FlashClientData(BData,.....);
;
;
end;
这样每个用户调用都只执行各自的ServerCtl,从而避免数据混乱等问题。。。
望专家,大虾指点。。。谢谢