Changing the color of a PIO

[PeterT]

How would I change the color of a Plug-In Object instance. Class color does not seem to work with inserted Plug-In Objects.

I can set up Parameters for the RGB color values in the Plug-In itself, but I do not want them to be available in the info palette. I can Hide them in the Info Palette easily enough, but I do not know how to access these parameters from an external script.

Can anyone shed light on this?

[PeterT]

O.K.

I think I figured it out.

PROCEDURE GrayPlugIn;

{-------------------------------------------}
PROCEDURE MakeItGray(pioh:HANDLE);

BEGIN
SetRField(pioh,'New Window','Pen ColorR','30584');
SetRField(pioh,'New Window','Pen ColorG','30584');
SetRField(pioh,'New Window','Pen ColorB','30584');
ResetObject(pioh);
END;
{-------------------------------------------}

BEGIN
ForEachObject(MakeItGray,((R IN ['New Window'])));?
END;

RUN(GrayPlugIn);