wind_get

function wind_get(

  wi_ghandle: SmallInt;

  wi_gfield: SmallInt;

  wi_gw1: psmallint;

  wi_gw2: psmallint;

  wi_gw3: psmallint;

  wi_gw4: psmallint

):SmallInt;

function wind_get(

  wi_ghandle: SmallInt;

  wi_gfield: SmallInt;

  out wi_gw1: SmallInt;

  out wi_gw2: SmallInt;

  out wi_gw3: SmallInt;

  out wi_gw4: SmallInt

):SmallInt;

function wind_get(

  wi_ghandle: SmallInt;

  wi_gfield: SmallInt;

  gr: PGRECT

):SmallInt;