XSendEvent

function XSendEvent(

  para1: PDisplay;

  para2: TWindow;

  para3: TBool;

  para4: clong;

  para5: PXEvent

):TStatus;

function XSendEvent(

  para1: PDisplay;

  para2: TWindow;

  para3: Boolean;

  para4: clong;

  para5: PXEvent

):TStatus;