photovideo
Ну много наверняка приблуд есть. Например в ACDSee Pro 2.5 так: Выделяем нужные пикчи. Меню Tools > Batch Processor > ставим галку Text Overlay. В поле Text убираем "Sample text", нажимаем кнопку со стрелкой вниз и выбираем Insert Metadata. Далее раскрываем File Properties и ставим галку Filename(w/o extension). Контролируем процесс в окне Preview. Декорируем текст на свой вкус.
Нифигасе тутор получился...
Yacc
Сценарий Powershell, который можно взять за основу:
Код:
param ($path)
[Void][System.Reflection.Assembly]::LoadWithPartialName("System.Drawing")
try
{
ls $path | %{
$bitmap=[System.Drawing.Bitmap]::FromFile($_.FullName)
$graphics=[System.Drawing.Graphics]::FromImage($bitmap)
$graphics.DrawString($_.BaseName,
(New-Object System.Drawing.Font("Arial",60,[System.Drawing.GraphicsUnit]::Pixel)),
(New-Object System.Drawing.SolidBrush([System.Drawing.Color]::Red)),
20,
$bitmap.Height-80)
$bitmap.Save([String]::Concat([System.IO.Path]::Combine($path,$_.BaseName),'.jpeg'),
[System.Drawing.Imaging.ImageFormat]::Jpeg)
}
}
catch
{
$error[0]
}
finally
{
$graphics.Dispose()
}