I new to vector script. Trying to create some plug-in objects to expedite kitchen design.
I am having trouble figuring out how to assign a hatch fill to a rectangle drawn within the script of my plugin.
Here is a sample of a cabinet script:
PROCEDURE CabinetTest;
VAR
carc_w : REAL;
carc_d : REAL;
carc_h : REAL;
toe_h : REAL;
BEGIN
carc_w := PCarcase_Width;
carc_d := PCarcase_Depth;
NameClass('CarcaseMat');
PenPat(-5);
rect(0,carc_d,19mm,0);
rect(carc_w-19mm,carc_d,carc_w,0);
rect(0,0,carc_w,-20mm);
rect(19mm,carc_d-21mm,carc_w-19mm,carc_d-25mm);
Moveto(19mm,carc_d);
line(carc_w-19mm,0
);
END;
RUN(CabinetTest);
___________________
Do I need to use SetVectorFill to assign my hatch?
If so, I have no trouble accessing the hatches i have already defined in my document by name, but i can't seem to locate or define a handle for the rectangle i am trying to add a hatch to.
Can anyone help here? Seems like this should be very easy . . .
Thanks,
RoyDC