creategcinfoty

type creategcinfoty = record

  paintdevice: paintdevicety;

  kind: gckindty;

  printernamepo: pmsestring;

  contextinfopo: pointer;

  gcpo: pgcty;

  windowrect: prectty;

  parent: winidty;

  createpaintdevice: Boolean;

  error: gdierrorty;

end;