home *** CD-ROM | disk | FTP | other *** search
/ Computer Buyer 1998 May / dpcb0598.iso / Business / Draw8 / Draw / Fill_out / Outlines / Arrows / fillhead.csc < prev    next >
Text File  |  1997-08-19  |  700b  |  22 lines
  1. REM Favorite : Outline Arrow Head,Outline Arrow Tail
  2.  
  3. WITHOBJECT "CorelDraw.Automation.8"
  4.     .StartOfRecording 
  5.     .SuppressPainting 
  6.     .RecorderStorePreselectedObjects FALSE
  7.     .SetOutlineArrow 0
  8.     .BeginDrawArrow FALSE, 446786, 6
  9.     .AddArrowPoint 0, 0, FALSE, FALSE, TRUE, TRUE, 0, 0
  10.     .AddArrowPoint -889000, 381000, FALSE, FALSE, TRUE, FALSE, 0, 1
  11.     .AddArrowPoint -762000, 127000, TRUE, FALSE, TRUE, FALSE, 0, 3
  12.     .AddArrowPoint -762000, -127000, TRUE, FALSE, TRUE, FALSE, 0, 3
  13.     .AddArrowPoint -889000, -381000, TRUE, FALSE, TRUE, FALSE, 0, 2
  14.     .AddArrowPoint 0, 0, FALSE, FALSE, FALSE, TRUE, 0, 1
  15.     .EndDrawArrow 
  16.     .SetOutlineArrow 1
  17.     .ResumePainting 
  18.     .EndOfRecording 
  19. END WITHOBJECT
  20.  
  21.  
  22.