Controls.pas单元中有一个FindControl函数,通过句柄获得对应的TWinControl对象. function FindControl(Handle: HWnd): TWinControl;begin Result := nil; if (Handle <> 0) then begin if GlobalFindAtom(PChar(ControlAtomString)) = ControlAtom then Result := Pointer(GetProp(Handle,
#undef DEBUG using Microsoft.Win32; using Newtonsoft.Json; using System; using System.Collections.Generic; using System.Collections.Specialized; using System.Diagnostics; using System.Diagnostics.Contracts; using System.Drawing; using System.IO; usin