那我会使用Pixels来做二者的转换，Pixels一个点便是一个点，所以X,Y轴的单位是相同

的，当然，使用Twips也可以，只是如果中间有用上API，人家大多以Pixels为单位

5.本地发布web项目到tomcat这个例子中的MoveCursor()所传入的POINTAPI也是相对於萤屏的座标，指的是从点FromP移动到ToP

Github->

高级约束数据网格控件(DBGrid)

高级约束数据网格控件显示并允许操作与其相连的记录集对象，DBGrid控件被称为“数据感知”的，即只要将其DataSource属性设置为Data控件(当然Data控件的DatabaseName和RecordSourse属性必须已经被正确设置)就能利用记录集来自动填充控件的网格，并且列头也由记录集对象自动设置

:指定JDK版本最低为多少抢票违法吗RebootsaWindows2000PC.ManyexamplesshelltothekernelandjustkillthePC.Thisdoesitproperlyandtakesintoaccountauserprivilages.

'APICallsusedforRebootPC

PrivateConstTOKEN_ADJUST_PRIVILEGES=&H20

PrivateConstTOKEN_QUERY=&H8

PrivateConstSE_PRIVILEGE_ENABLED=&H2

PrivateConstEWX_SHUTDOWNAsLong=1

PrivateConstEWX_FORCEAsLong=4

PrivateConstEWX_REBOOT=2

PrivateTypeLUID

UsedPartAsLong

IgnoredForNowHigh32BitPartAsLong

EndType

PrivateTypeTOKEN_PRIVILEGES

PrivilegeCountAsLong

TheLuidAsLUID

AttributesAsLong

EndType

PrivateDeclareFunctionExitWindowsExLib"user32"(ByValdwOptionsAsLong,ByValdwReservedAsLong)AsLong

PrivateDeclareFunctionGetCurrentProcessLib"kernel32"()AsLong

PrivateDeclareFunctionOpenProcessTokenLib"advapi32"(ByValProcessHandleAsLong,ByValDesiredAccessAsLong,TokenHandleAsLong)AsLong

PrivateDeclareFunctionLookupPrivilegeValueLib"advapi32"Alias"LookupPrivilegeValueA"(ByVallpSystemNameAsString,ByVallpNameAsString,lpLuidAsLUID)AsLong

PrivateDeclareFunctionAdjustTokenPrivilegesLib"advapi32"(ByValTokenHandleAsLong,ByValDisableAllPrivilegesAsLong,NewStateAsTOKEN_PRIVILEGES,ByValBufferLengthAsLong,PreviousStateAsTOKEN_PRIVILEGES,ReturnLengthAsLong)AsLong

SubRebootPC()

OnLocalErrorGoToRebootPC_ErrorHandler

ConstcsProcName="RebootPC"

DimhProcessHandleAsLong

DimhTokenHandleAsLong

DimtmpLuidAsLUID

DimtkpNewAsTOKEN_PRIVILEGES

DimtkpPreviousAsTOKEN_PRIVILEGES

DimlBufferNeededAsLong

hProcessHandle=GetCurrentProcess()

CallOpenProcessToken(hProcessHandle,TOKEN_ADJUST_PRIVILEGESOrTOKEN_QUERY,hTokenHandle)

'GettheLUIDfortheshutdownprivilege

CallLookupPrivilegeValue("","SeShutdownPrivilege",tmpLuid)

tkpNew.PrivilegeCount=1'Oneprivilegetoset

tkpNew.TheLuid=tmpLuid

tkpNew.Attributes=SE_PRIVILEGE_ENABLED

'Enabletheshutdownprivilegeintheaccesstokenofthisprocess.

lBufferNeeded=0

CallAdjustTokenPrivileges(hTokenHandle,False,tkpNew,Len(tkpPrevious),tkpPrevious,lBufferNeeded)

'ForceaReboot(nooptiontosavefilestocancelout)

CallExitWindowsEx(EWX_FORCEOrEWX_REBOOT,&HFFFF)

ExitSub

RebootPC_ErrorHandler:

CallRaiseError(csModName,csProcName,Err.Number,Err.Description)

EndSub->容量未达到最大值，扩大table空间，并将旧map数据添加到新map中。