Shameless Cynic
С нами с 09.07.04
Сообщения: 1767
Рейтинг: 558
|
Добавлено: 07/03/10 в 20:37 |
Лучше в фотошопе
|
|
|
|
С нами с 13.10.09
Сообщения: 385
Рейтинг: 49
|
Добавлено: 08/03/10 в 02:29 |
в фотошопе такое сделать как раз не просто - надо специальный скрипт писать
|
|
|
|
Shameless Cynic
С нами с 09.07.04
Сообщения: 1767
Рейтинг: 558
|
Добавлено: 10/03/10 в 11:20 |
А не в фотошопе?
|
|
|
|
С нами с 13.10.09
Сообщения: 385
Рейтинг: 49
|
Добавлено: 10/03/10 в 20:50 |
Ну много наверняка приблуд есть. Например в ACDSee Pro 2.5 так: Выделяем нужные пикчи. Меню Tools > Batch Processor > ставим галку Text Overlay. В поле Text убираем "Sample text", нажимаем кнопку со стрелкой вниз и выбираем Insert Metadata. Далее раскрываем File Properties и ставим галку Filename(w/o extension). Контролируем процесс в окне Preview. Декорируем текст на свой вкус.
Нифигасе тутор получился...
|
|
|
|
С нами с 09.03.09
Сообщения: 6053
Рейтинг: 3538
|
Добавлено: 10/03/10 в 22:14 |
Сценарий 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()
} |
|
|
|
|
Текстовая реклама в форме ответа Заголовок и до четырех строчек текста Длина текста до 350 символов Купить рекламу в этом месте! |