writegmgraphic

procedure writegmgraphic(

  const dest: TStream;

  const source: tbitmap;

  const format: string;

  const aquality: Integer = - 1;

  const awidth: Integer = 0;

  const aheight: Integer = 0;

  const arotation: real = 0;

  const abackgroundcolor: colorty = cl_transparent;

  const apixelpermm: real = 0;

  const aoptions: gmoptionsty = [];

  const afilter: filtertypes = undefinedfilter;

  const ablur: real = defaultblur

);