Batcher

回复 2# locoman


    我没有用过这个工具

Batcher

回复 4# locoman


    我找不到使用说明和详细用法

Batcher

回复 1# locoman


BeePhoto 用法：
http://bbs.bathome.net/thread-7755-1-1.html#pid51205

Batcher

批处理调用 BeePhoto 在屏幕上居中显示一个图片（手工设置图片宽度和高度）

@echo off
set "PictureName=屏幕水印001.bmp"
set "PictureWidth=800"
set "PictureHeight=700"
cd /d "%~dp0"
for /f "tokens=1-2" %%a in ('mshta VBScript:Execute("CreateObject(""Scripting.Filesystemobject"").GetStandardStream(1).Write(screen.width&"" ""&screen.height)"^)(close^)') do (
    set "ScreenWidth=%%a"
    set "ScreenHeight=%%b"
)
set /a PositionX=(ScreenWidth-PictureWidth)/2
set /a PositionY=(ScreenHeight-PictureHeight)/2
BeePhoto /p:"%PictureName%" /x:%PositionX% /y:%PositionY%
复制代码

Batcher

批处理调用 BeePhoto 在屏幕上居中显示一个图片（调用 nconvert 获取图片的宽度和高度）

@echo off
set "PictureName=屏幕水印001.bmp"
cd /d "%~dp0"
for /f "tokens=1,3" %%a in ('nconvert -info "%PictureName%"') do (
    set "str=%%a"
    if "%%a" equ "Width" (
        set "PictureWidth=%%b"
    ) else if "%%a" equ "Height" (
        set "PictureHeight=%%b"
    )
)
for /f "tokens=1-2" %%a in ('mshta VBScript:Execute("CreateObject(""Scripting.Filesystemobject"").GetStandardStream(1).Write(screen.width&"" ""&screen.height)"^)(close^)') do (
    set "ScreenWidth=%%a"
    set "ScreenHeight=%%b"
)
set /a PositionX=(ScreenWidth-PictureWidth)/2
set /a PositionY=(ScreenHeight-PictureHeight)/2
BeePhoto /p:"%PictureName%" /x:%PositionX% /y:%PositionY%
复制代码

Batcher

回复 10# 0475

@echo off
set "PictureName1=img\209.png"
set "PictureName2=img\201.jpg"
set "PictureName3=img\202.jpg"
cd /d "%~dp0"
for /f "tokens=1-2" %%a in ('mshta VBScript:Execute("CreateObject(""Scripting.Filesystemobject"").GetStandardStream(1).Write(screen.width&"" ""&screen.height)"^)(close^)') do (
    set "ScreenWidth=%%a"
    set "ScreenHeight=%%b"
)
for %%i in (%PictureName1% %PictureName2% %PictureName3% ) do (
    call :GetPicSize "%%i"
)
goto :eof

:GetPicSize
for /f "tokens=1,3" %%a in ('nconvert -info "%~1"') do (
    set "str=%%a"
    if "%%a" equ "Width" (
        set "PictureWidth=%%b"
    ) else if "%%a" equ "Height" (
        set "PictureHeight=%%b"
    )
)
set /a PositionX=(ScreenWidth-PictureWidth)/2
set /a PositionY=(ScreenHeight-PictureHeight)/2
BeePhoto /p:"%~1" /x:%PositionX% /y:%PositionY%
复制代码