topic StyleSheet Property! in VBA Forum

StyleSheet Property!

Anonymous — Wed, 19 Sep 2001 03:52:05 GMT

Hi,

Does anyone know if it's possible to specify Plot Style Tables located in a
different folder than the standard PlotStyle folder?

Have any experimented with this?

Regards,

Morten Andersen

Re: StyleSheet Property!

Anonymous — Wed, 19 Sep 2001 05:06:42 GMT

I haven't tried that specifically. However, I initially thought you were supposed to
provide a fully qualified path name to the stylesheet property. When I tried to do this
it made my program crash.

Chuck

"Morten Andersen" wrote in message
news:260B92C8BE8B13F8521804BC951DEFD5@in.WebX.maYIadrTaRb...
> Hi,
>
> Does anyone know if it's possible to specify Plot Style Tables located in a
> different folder than the standard PlotStyle folder?
>
> Have any experimented with this?
>
> Regards,
>
> Morten Andersen
>
>

Re:

Anonymous — Wed, 19 Sep 2001 05:41:16 GMT

Ok, let me tell you the exact problem.

I did this Plot Routine, which has been workin fine for the last 3 months.
By fine I mean that I had no problem i providing af full path to the
StyleSheet property. Then to day I wanted to make af few changes to the
routine, and suddenly the property will not accept a fullpath.

I realize that the help file doesn't say anything about a full path, but
since the routine has been workin fine so far, I'm in a situation where I
must choose whether or not to go with the full path or not. It's rather
critical to the routine, as it lets the user choose to save Plot Styles in
the same folder as the drawing, and then later retrieve it again. All this
without the ctb file having to reside in the Plot Style folder of Acad.

Any input from Autodesk, will be greatly appreciated.

/Morten Andersen
"Chuck Gabriel" wrote in message
news:56F801FCED8464EB1A494AD1827E48DE@in.WebX.maYIadrTaRb...
> I haven't tried that specifically. However, I initially thought you were
supposed to
> provide a fully qualified path name to the stylesheet property. When I
tried to do this
> it made my program crash.
>
> Chuck
>
>
> "Morten Andersen" wrote in message
> news:260B92C8BE8B13F8521804BC951DEFD5@in.WebX.maYIadrTaRb...
> > Hi,
> >
> > Does anyone know if it's possible to specify Plot Style Tables located
in a
> > different folder than the standard PlotStyle folder?
> >
> > Have any experimented with this?
> >
> > Regards,
> >
> > Morten Andersen
> >
> >
>
>

Re: StyleSheet Property!

Anonymous — Wed, 19 Sep 2001 06:51:45 GMT

Again, he who looks shall find answers.

Looking through my code, I found the answer, and let me just say that the
StyleSheet property is able to recieve a full path.

Here is a function I use to initialize plots:

Public Function InitPlot(hgPlotter As String, hgRotation As Integer,
hgPlotStyle As String, hgPlotPaper As String, Optional hgDenominator As
Double, Optional hgScaleToFit As Boolean) As String

Dim Numerator As Double

On Error GoTo Error:

InitPlot = ""

Numerator = 1

hgPlotter = hgPlotter & ".pc3"

If hgPlotCon.ConfigName = hgPlotter Then

Else
hgPlotCon.ConfigName = hgPlotter
End If

If hgPlotCon.CanonicalMediaName = hgPlotPaper Then
Else
hgPlotCon.CanonicalMediaName = hgPlotPaper
End If

If hgPlotCon.PaperUnits = acMillimeters Then
Else
hgPlotCon.PaperUnits = acMillimeters
End If

hgPlotCon.PlotRotation = hgRotation
hgPlotCon.StyleSheet = hgPlotStyle
hgPlotCon.SetWindowToPlot Point1, Point2
hgPlotCon.PlotType = acWindow

If hgScaleToFit = False Then
hgPlotCon.UseStandardScale = False
hgPlotCon.SetCustomScale Numerator, hgDenominator
ElseIf hgScaleToFit = True Then
hgPlotCon.UseStandardScale = True
hgPlotCon.StandardScale = acScaleToFit
End If

Exit Function

Error:

InitPlot = Err.Description

End Function

As it turned out, I had for some reason forgot an extra L in acMillimeters.
And strangely enough this caused StyleSheet to fail when given a full path.
Odd!!! But my problem is solved.

Chears.

Morten Andersen

"Morten Andersen" wrote in message
news:260B92C8BE8B13F8521804BC951DEFD5@in.WebX.maYIadrTaRb...
> Hi,
>
> Does anyone know if it's possible to specify Plot Style Tables located in
a
> different folder than the standard PlotStyle folder?
>
> Have any experimented with this?
>
> Regards,
>
> Morten Andersen
>
>