ConvertXfmFile

procedure ConvertXfmFile(

  const XfmFileName: string;

  UsedUnits: TStrings;

  Output: TStrings;

  AsUnit: Boolean = True;

  const Src: TStrings = Nil;

  const TitanLanguage: string = 'TitanPascal'

);