OSErr err;
FSSpec importFile, outputFile;
GraphicsImportComponent importer;
GraphicsExportComponent exporter;
Handle profHandle = NULL;
unsigned long actualSizeWritten;

err = GetGraphicsImporterForFile(&importFile, &importer);
if (err == noErr)
{
        /* 埋め込まれているプロファイルを保存する */
    err = GraphicsImportGetColorSyncProfile(importer, &profHandle);
        /* エクスポータを取得し、画像の操作を行う */
    err = OpenADefaultComponent(GraphicsExporterComponentType,
                                        kQTFileTypeTIFF, &exporter);
    if (err == noErr)
    {
        err = GraphicsExportSetInputGraphicsImporter(exporter, importer);
        err = GraphicsExportSetDepth (exporter, 24);
              .
              .
              .
        if (profHandle)
        {
            /* エクスポートを行う前に、プロファイルを元に戻す */
            err = GraphicsExportSetColorSyncProfile(exporter, profHandle);
        }
            /* エクスポート操作を行う */
        err = GraphicsExportSetOutputFile(exporter, &outputFile);
        err = GraphicsExportDoExport(exporter, &actualSizeWritten);
    }
    .
    .
    .
    if (profHandle)
    {
        DisposeHandle(profHandle);
    }
}

リスト 1 QuickTime グラフィックスインポータ/エクスポータのルーチン使用時に、文書に埋め込まれた ICC プロファイルを保存する方法を示すコード