RegisterVTClipboardFormat

procedure RegisterVTClipboardFormat(

  AFormat: TClipboardFormat;

  TreeClass: TTreeGridClass;

  Priority: Cardinal

); overload;

function RegisterVTClipboardFormat(

  Description: string;

  TreeClass: TTreeGridClass;

  Priority: Cardinal;

  tymed: Integer = TYMED_HGLOBAL;

  ptd: PDVTARGETDEVICE = Nil;

  dwAspect: Integer = DVASPECT_CONTENT;

  lindex: Integer = - 1

):Word; overload;