首先我們要明白想出去照片上滴水印是需要一番功夫和工具滴,因?yàn)槭謾C(jī)上是不可能自帶除去照片水印滴軟件跟功能。所以這個(gè)時(shí)候我們就需要借用到一些必備滴軟件之類。
目前創(chuàng)新互聯(lián)已為上千余家的企業(yè)提供了網(wǎng)站建設(shè)、域名、網(wǎng)絡(luò)空間、網(wǎng)站托管、企業(yè)網(wǎng)站設(shè)計(jì)、馬鞍山網(wǎng)站維護(hù)等服務(wù),公司將堅(jiān)持客戶導(dǎo)向、應(yīng)用為本的策略,正道將秉承"和諧、參與、激情"的文化,與客戶和合作伙伴齊心協(xié)力一起成長(zhǎng),共同發(fā)展。
現(xiàn)在我就為大家推薦一款我之前常用滴軟件,那就是“retouch”;這款軟件總滴來說還是不錯(cuò)滴,第一步就是我們先要下載這個(gè)軟件,之后才能用它進(jìn)行相應(yīng)操作。
下載完成后打開相冊(cè)里面的照片,然后進(jìn)入選項(xiàng),點(diǎn)擊選擇“刪除物件”,選擇“索套”。
進(jìn)入最后一步,點(diǎn)擊屏幕水印進(jìn)行去除,點(diǎn)擊右上角的圖標(biāo)“Go”進(jìn)行保存
使用專業(yè)的圖像處理軟件Photoshop,以下提供使用PS去除水印、文字的多種方法(根據(jù)圖片水印特點(diǎn),酌情選擇):
1、使用仿制圖章工具去水印
這是比較常用的方法。具體的操作是,選取仿制圖章工具,按住Alt鍵,在無文字區(qū)域點(diǎn)擊相似的色彩或圖案采樣, 然后在水印區(qū)域拖動(dòng)鼠標(biāo)復(fù)制以復(fù)蓋水印
2、使用修補(bǔ)工具去水印
如果圖片的背景色彩或圖案比較一致,使用修補(bǔ)工具就比較方便。具體的操作是,選取修補(bǔ)工具,在公共欄中選擇修補(bǔ)項(xiàng)為“源”,關(guān)閉“透明”選項(xiàng)
3、相似圖形(或圖案)
某些情況下,框選無文字區(qū)域的相似圖形(或圖案),按Ctrl+j鍵將其復(fù)制成新的圖層,再利用變形工具將其變形,直接用以覆蓋水印會(huì)更為快捷
4、填充的內(nèi)容識(shí)別(智能填充)等工具來修補(bǔ)
可以使用虛擬打印機(jī)來處理:
方法一:使用虛擬打印機(jī)pdf factory即可,而且其他格式文件只要是能夠打印,選擇這個(gè)虛擬打印機(jī),都可以做成PDF文件,很簡(jiǎn)單實(shí)用;
最簡(jiǎn)單而且實(shí)用的使用虛擬打印機(jī)pdf factory即可,可以把任意只要能夠打印的格式文件都可以做成PDF文件,并且可以把多個(gè)文件通過打印之后合成一個(gè)PDF文件。
pdfFactory Pro(虛擬打印機(jī))是一個(gè)無須 Acrobat 創(chuàng)建 Adobe PDF 文件的打印機(jī)驅(qū)動(dòng)程序。pdfFactory Pro(虛擬打印機(jī))提供的創(chuàng)建 PDF 文件的方法比其他方法更方便和高效。 功能包括: 多個(gè)文檔整合到一個(gè) PDF 文件中; 內(nèi)嵌字體; 通過 E-mail 發(fā)送; 預(yù)覽; 自動(dòng)壓縮優(yōu)化。
PDF Factory是pdf虛擬打印機(jī)軟件,下載安裝好PDF Factory后,在打印機(jī)控制面板中就可以找到一臺(tái)由pdf Factory虛擬出來的打印機(jī),可以把任何可以打印的文件轉(zhuǎn)換成pdf文件。用任何可以支持打印輸出的軟件,把需要處理的文件逐個(gè)打印到這個(gè)虛擬打印機(jī),全部打印完成后可把結(jié)果保存成一個(gè)pdf文件。甚至可以把不同軟件格式的文件,如word、excel、photoshop等任何可以支持打印的文件,打印到同一個(gè)pdf文件。
在打印之前,在PDF Factory Pro里面設(shè)置一下PDF的打開、打印等權(quán)限即可實(shí)現(xiàn)加密等目的;
在打印之前,在設(shè)置里面,就把加載所有的系統(tǒng)字體選中。
在打印界面出來后,可以在左側(cè)設(shè)置水印。然后再保存PDF文件。
打印完畢后,下載一個(gè)Adobe Reader,然后安裝,可以很流暢的閱讀PDF文件。
方法二:用其他虛擬打印機(jī)轉(zhuǎn)成PDF文件。
方法三:使用專門的轉(zhuǎn)換軟件,把文件轉(zhuǎn)成PDF文件。
沒有選擇另存為水印,mastergo中如果想要保存為無畫布圖片的話,需要在圖片完成時(shí)選擇另存為水印或者選擇無畫布模式保存。
1.
平鋪水印圖像 一般來說,水印圖會(huì)比要加載的圖片要小很多,所以我們采用的方式一般是把水印圖片平鋪在現(xiàn)有圖像上。 將水印圖片鋪滿整個(gè)屏幕,每個(gè)水印之間保留一些像素點(diǎn)。 具體思路為 1.獲取原圖尺寸
2.
獲取水印圖尺寸
3.
遍歷原圖尺寸,給出第一個(gè)偏移量,初始化第一個(gè)水印圖的位置
4.
設(shè)定每個(gè)水印圖的x軸偏移量,在寫入水印+偏移量之后,判斷第一行是否寫入完成
%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%
!--#include file="upsave.inc"--
%
Server.ScriptTimeOut=999999
dim formName,formPath,filename,file_name,fileExt,Filesize,F_Type
call upload()
'===========================無組件上傳============================
sub upload()
dim upload,file
set upload=new UpFile_Class ''建立上傳對(duì)象
upload.GetDate (1000*1024) '取得上傳數(shù)據(jù),不限大小
if upload.err 0 then
select case upload.err
case 1
Response.Write "tabletrtd bgcolor=#E9F5F5請(qǐng)先選擇你要上傳的文件 [ a href=# onclick=history.go(-1)重新上傳/a ]/td/tr/table"
case 2
Response.Write "tabletrtd bgcolor=#E9F5F5文件大小超過了限制 [ a href=# onclick=history.go(-1)重新上傳/a ]/td/tr/table"
end select
exit sub
else
formPath="../../images/uploadimg/"'upload.form("filepath")
'在目錄后加(/)
'if right(formPath,1)"/" then formPath=formPath"/"
for each formName in upload.file ''列出所有上傳了的文件
set file=upload.file(formName) ''生成一個(gè)文件對(duì)象
fileExt=lcase(file.FileExt)
'判斷文件類型
if lcase(fileEXT)="asp" and lcase(fileEXT)="asa" and lcase(fileEXT)="aspx" then
CheckFileExt(fileEXT)=false
end if
if CheckFileExt(fileEXT)=false then
response.write "tabletrtd bgcolor=#E9F5F5文件格式不正確 [ a href=# onclick=history.go(-1)重新上傳/a ]/td/tr/table"
response.end
end if
'付值變量
randomize
ranNum=int(90000*rnd)+10000
file_name=year(now)month(now)day(now)hour(now)minute(now)second(now)ranNum
filename=file_name"."fileExt
rename=filename"|"
filename1=formPathfilename
Filesize=file.FileSize
'記錄文件
if Filesize0 then '如果 FileSize 0 說明有文件數(shù)據(jù)
file.SaveToFile Server.mappath(FileName1) ''執(zhí)行上傳文件
call ImgWriter(FileName1)'添加水印
call checksave() '記錄文件
end if
set file=nothing
next
end if
set upload=nothing
response.write "tabletrtd bgcolor=#E9F5F5"FileName"上傳成功![ a href=# onclick=history.go(-1)重新上傳/a ]/td/tr/table"
end sub
'判斷文件類型是否合格
Private Function CheckFileExt (fileEXT)
dim Forumupload
Forumupload=split("jpg|gif|png","|")
for i=0 to ubound(Forumupload)
if lcase(fileEXT)=lcase(trim(Forumupload(i))) then
CheckFileExt=true
exit Function
else
CheckFileExt=false
end if
next
End Function
Private sub checksave()
'插入上傳表并獲得ID
response.write "scriptparent.form2.N_image.value='images/uploadimg/"FileName"'/script"
end Sub
Sub ImgWriter(SaveImgPath) '添加水印
dim jpeg
Set Jpeg = Server.CreateObject("Persits.Jpeg")
Jpeg.Open Server.MapPath(SaveImgPath)
Jpeg.Canvas.Font.Color = Hffffff
Jpeg.Canvas.Font.Family = "Tahoma"
Jpeg.Canvas.Font.Size = 16
Jpeg.Canvas.Font.ShadowColor = H000000
Jpeg.Canvas.Font.ShadowXoffset = -1
Jpeg.Canvas.Font.ShadowYoffset = 1
Jpeg.Canvas.Font.Bold = true
Jpeg.Canvas.Print 10, 10, "imediacn.com"
Jpeg.Canvas.Pen.Color = Heeeeee
Jpeg.Canvas.Pen.Width = 1
Jpeg.Canvas.Brush.Solid = False
Jpeg.Canvas.Bar 0, 0, Jpeg.Width, Jpeg.Height
Jpeg.Save Server.MapPath(SaveImgPath)
End Sub