Re: tinting rule belows? (AS)

Article View: adobe.scripting.indesign

Article #18991

Back to adobe.scripting.indesign Previous Next

#18991

From: Olav Kvern
Date: Fri, 24 Jan 2003 00:22

27 lines
1619 bytes

Reinhardt--

Here's an example:

Dim myInDesign As InDesign.Application
Set myInDesign = CreateObject("InDesign.Application.2.0")
Set myDocument = myInDesign.Documents.Add
Set myBaseColor = myDocument.Colors.Add
myBaseColor.ColorValue = Array(100, 80, 0, 0)
Set myTint = myInDesign.Tints.Add(myBaseColor)
myTint.TintValue = 30
Set myTextFrame = myDocument.Pages.Item(1).TextFrames.Add
myTextFrame.GeometricBounds = Array("6p", "6p", "24p", "24p")
myTextFrame.TextContents = "This should have a rule below."
Set myParagraph = myTextFrame.Paragraphs.Item(1)
myParagraph.RuleBelow = True
Rem For some reason, the following fails:
Rem myParagraph.RuleBelowColor = myTint
Rem ...but this works
myParagraph.RuleBelowColor = myDocument.Tints.Item(1)




Thanks,

Ole

Technical Details

Message-ID: <1de7851f.4@WebX.la2eafNXanI>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-03!sn-xit-01!sn-xit-08!supernews.com!newsswitch.lcs.mit.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed.freenet.de!eusc.inter.net!newsfeed01.sul.t-online.de!t-online.de!WebX

References: <BBC37EBCE6DF42D9863F0F00D7DAF9C4@in.WebX.la2eafNXanI>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: f939a,c9df4e910328bdde
X-Google-Attributes: gidf939a,public
X-Google-ArrivalTime: 2003-01-23 16:37:47 PST
From: "Olav Kvern" <okvern@adobe.com>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-03!sn-xit-01!sn-xit-08!supernews.com!newsswitch.lcs.mit.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed.freenet.de!eusc.inter.net!newsfeed01.sul.t-online.de!t-online.de!WebX
Newsgroups: adobe.scripting.indesign
Subject: Re: tinting rule belows? (AS)
Message-ID: <1de7851f.4@WebX.la2eafNXanI>
Date: Thu, 23 Jan 2003 16:22:46 -0800
References: <BBC37EBCE6DF42D9863F0F00D7DAF9C4@in.WebX.la2eafNXanI>
Lines: 25
MIME-Version: 1.0
Content-Type: text/plain; charset="ISO-8859-1"
Content-Transfer-Encoding: 8bit

Reply to Parent Message