我有功能functionbgSetDisableOverlappedContent(CAA:BOOL;varErrorCode:DWORD;ErrorText:string):Boolean;beginerrorCode:=ERROR_SUCCESS;ErrorText:='';ifnotGetOSVersion>=60thenExit;Result:=SystemParametersInfo(SPI_SETDISABLEOVERLAPPEDCONTENT,0,@CAA,0);ifnotResultthenbeginErrorCode:=GetLastError;ErrorText:=