IGxICMManager.GetProfiles

Syntax

GetProfiles(Printer: IGxPrinter): IGxDeviceICMProfiles;

Parameters

Printer - printer, for which it is necessary to get the list of matched color profiles.

Description

The GetProfiles method returns the list of color profiles matched with the specified printer.

Example

Sub UserProc;
Var
    ICMMan: IGxICMManager;
    DeviceProf: IGxDeviceICMProfiles;
    Printers: IGxPrinters;
    Printer: IGxPrinter;
    i, j: Integer;
Begin
    ICMMan := New GxICMManager.Create;
    Printers := New GxPrinters.Create;
    For i := 0 To Printers.Count - 1 Do
        Printer := Printers.Item(i);
        Debug.WriteLine(Printer  + Printer.Name);
        DeviceProf := ICMMan.GetProfiles(Printer);
        Debug.WriteLine(Matched color profiles:  + DeviceProf.Count.ToString);
        Debug.Indent;
        For j := 0 To DeviceProf.Count - 1 Do
                Debug.WriteLine(DeviceProf.Item(j));
        End For;
        Debug.Unindent;
    End For;
End Sub UserProc;

After executing the example the list of all printers installed on the computer is displayed in the development environment console. The list of matched color profiles is displayed for each printer.