How to Retrieve the Index of an ICC-Based Colorspace
Delphi
[copy to clipboard]
{ PDF object is supposed to be created }
PDF.BeginDoc;
profile := PDF.LoadICCProfile('EuropeISOCoatedFOGRA27.icc');
PDF.PDFPAGE_SetColorSpace(profile);
retrieved := PDF.PDFPAGE_GetColorSpace();
{ retrieved should be equal to profile }
PDF.EndDoc;
C/C++
[copy to clipboard]
// PDF object is supposed to be created
PDF->BeginDoc();
LONG profile = PDF->LoadICCProfile("EuropeISOCoatedFOGRA27.icc");
PDF->PDFPAGE_SetColorSpace(profile);
LONG retrieved = PDF->PDFPAGE_GetColorSpace();
// retrieved should be equal to profile
PDF.EndDoc;
PDF.BeginDoc();
long profile = PDF.LoadICCProfile("EuropeISOCoatedFOGRA27.icc");
PDF.PDFPAGE_SetColorSpace(profile);
long retrieved = PDF.PDFPAGE_GetColorSpace();
// retrieved should be equal to profile
PDF.EndDoc;
Visual Basic
[copy to clipboard]
PDF.BeginDoc
profile = PDF.LoadICCProfile("EuropeISOCoatedFOGRA27.icc")
PDF.PDFPAGE_SetColorSpace profile
retrieved = PDF.PDFPAGE_GetColorSpace()
' retrieved should be equal to profile
PDF.EndDoc
