BOOL GradientFill(
  HDC hdc,                   // handle to DC
  PTRIVERTEX pVertex,        // array of vertices
  ULONG dwNumVertex,         // number of vertices
  PVOID pMesh,               // array of gradients
  ULONG dwNumMesh,           // size of gradient array
  ULONG dwMode               // gradient fill mode
);
 

 
DECLARE INTEGER GradientFill IN Msimg32;
    INTEGER  hdc,;
    STRING @ pVertex,;
    LONG     dwNumVertex,;
    STRING @ pMesh,;
    LONG     dwNumMesh,;
    LONG     dwMode