324

CheckTech · Apr 7, 2017 · f049936 · f049936
1 parent 025e0e7
commit f049936
Show file tree

Hide file tree

Showing 3 changed files with 2 additions and 2 deletions.
diff --git a/PrintMarksR5.frm b/PrintMarksR5.frm
@@ -435,7 +435,7 @@ Public Function parserStringToExtColorBar(pStr As Variant) As Color
             If tintClr.Type = cdrColorCMYK Then
                 tintClr.BlendWith whiteColor, 20
             ElseIf tintClr.Type = cdrColorSpot Or tintClr.Type = cdrColorPantone Then
-                Set tintClr = CreateSpotColor(tintClr.PaletteIdentifier, tintClr.SpotColorID, 20)
+                Set tintClr = CreateSpotColor(tintClr.PaletteIdentifier, tintClr.SpotColorID, 80)
             End If
             icClrOnly = icClrOnly + 1
             'return value
@@ -447,7 +447,7 @@ Public Function parserStringToExtColorBar(pStr As Variant) As Color
             If tintClr.Type = cdrColorCMYK Then
                 tintClr.BlendWith whiteColor, 60
             ElseIf tintClr.Type = cdrColorSpot Or tintClr.Type = cdrColorPantone Then
-                Set tintClr = CreateSpotColor(tintClr.PaletteIdentifier, tintClr.SpotColorID, 60)
+                Set tintClr = CreateSpotColor(tintClr.PaletteIdentifier, tintClr.SpotColorID, 40)
             End If
             icClrOnly = icClrOnly + 1
             'return value

diff --git a/PrintMarksR5.frx b/PrintMarksR5.frx
diff --git a/gms/InfUtilits.gms b/gms/InfUtilits.gms