www.pudn.com > QQ_FACE.rar > Var_Share.pas

unit Var_Share; 
 
interface 
 
uses 
   dxsbar,msg,ExtCtrls; 
 
type 
  TWndRec=record //自定义的类 
//    Hnd:THandle; 
    QQNum:string; 
    PForm:TFrmMsg; 
    MyTimer:TTimer; 
  end; 
 
 
var 
   bLogined:Boolean; 
   sUserName:string; 
   sQQNumber:string; 
   sPassword:string; 
   g_sIP:string; 
   iFaceID:integer; 
   bIsReg:boolean; 
   aAddFndLst:array[0..255,0..2] of string; 
   ActiveItem:TdxSideBarItem; 
   sSenderQQNum:string;//用于收到消息时SideBar头像的跳动 
   bLeave:boolean;//是否设置为离开 
   sLeaveMsg:string;//离开信息 
 
   WndRecArr:array of TWndRec; 
//////////////////////////////////////////////////// 
   bAutoShowMsg:boolean;//是否自动弹出消息框？ 
   bOnlineInfo:boolean;//上下线通知 
   bAskClose:boolean;//取出时确认 
 
implementation 
 
end.