Lockdown mode for old catalog
This commit is contained in:
parent
922315061d
commit
3d1f92321e
19 changed files with 1309 additions and 731 deletions
|
|
@ -193,6 +193,12 @@ Catch ex As Exception
|
|||
testoFirmaV = PicSettings.TestoFirmaStartV
|
||||
|
||||
End If
|
||||
If (PicSettings.LockDownMode)
|
||||
|
||||
testoFirma += Environment.NewLine + PicSettings.BuiltInText
|
||||
testoFirmaV += Environment.NewLine + PicSettings.BuiltInText
|
||||
|
||||
End If
|
||||
End Sub
|
||||
|
||||
''' <summary>
|
||||
|
|
@ -560,7 +566,13 @@ Catch ex As Exception
|
|||
'imgOutputBig
|
||||
If PicSettings.LogoAggiungi = True And File.Exists(PicSettings.LogoNomeFile) Then
|
||||
|
||||
Dim ImmagineLogo As Image = Image.FromFile(PicSettings.LogoNomeFile)
|
||||
Dim ImmagineLogo As Image
|
||||
|
||||
If (PicSettings.LockDownMode)
|
||||
ImmagineLogo = PicSettings.BuiltInImage
|
||||
Else
|
||||
ImmagineLogo = Image.FromFile(PicSettings.LogoNomeFile)
|
||||
End If
|
||||
|
||||
Dim LogoColoreTrasparente As Color = Color.White
|
||||
'Dim bmWatermark As Bitmap
|
||||
|
|
@ -571,7 +583,7 @@ Catch ex As Exception
|
|||
|
||||
'* Load this Bitmap into a new Graphic Object
|
||||
Dim grWatermark As Graphics = Graphics.FromImage(imgOutputBig)
|
||||
|
||||
|
||||
'* To achieve a translucent watermark we will apply (2) color manipulations
|
||||
Dim imageAttributes As Imaging.ImageAttributes = New Imaging.ImageAttributes
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue