function setprocessdpiawareness(v);
begin
{**
    @explan(说明)设置dpi感知,目前仅支持windows
    @param(v) 0,1,2 
**}
    try //避免win7及一下版本错误
    SetProcessDpiAwareness_sub(v);
    except
    end;
end 
{$ifdef linux}
function SetProcessDpiAwareness_sub(v);
begin
    
end 
{$else}
function SetProcessDpiAwareness_sub(v:integer):pointer;stdcall; external "Shcore.dll" name "SetProcessDpiAwareness";
{$endif}