XCopyArea

function XCopyArea(

  para1: PDisplay;

  para2: TDrawable;

  para3: TDrawable;

  para4: TGC;

  para5: cint;

  para6: cint;

  para7: cuint;

  para8: cuint;

  para9: cint;

  para10: cint

):cint;