Jump to content
Developer Wiki and Function Reference Links ×

Error in v11, okay in v10


Ken

Recommended Posts

Procedure ChangeAttr;

VAR

h :HANDLE;

BEGIN

h:=FINGROUP(FSACTLAYER);

WHILE h<>NIL DO BEGIN

SetFillBack(h,0,0,0);

SetLS(h,2);

SetFPat(h,0);

SetPenFore(h,189);

SetLW(h,14);

SetClass(h,'None');

h:=NEXTOBJ(h);

END;

ReDraw;

SetPref(10,false);

SetPref(11,false);

END;

RUN(ChangeAttr);

[ 12-18-2004, 01:54 PM: Message edited by: Archken ]

Link to comment

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Restore formatting

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...