View previous topic :: View next topic |
Author |
Message |
Tol!k
Joined: 01 Apr 2008 Posts: 1727 Location: Арзамас
|
(Separately) Posted: Sat Apr 11, 2009 14:12 Post subject: |
|
|
DAntES wrote: | Да в том то и дело, что пейнт уменьшает размер без видимой на глаз (в данном случае) потери качества...
Но просто потом при сохранении в пейнте размер все равно уменьшится в 2-4 раза. | Вай, шайтан-программа.
Сохрани исходное и пожатое изображение в .bmp и сравни вот этим. |
|
Back to top |
|
|
DAntES
Joined: 10 Apr 2009 Posts: 3
|
(Separately) Posted: Sun Apr 12, 2009 13:17 Post subject: |
|
|
BMP имеет точно такой же размер и качество. Но хранить скрины в бмп имхо бред вообще. И я знаю что после пейнта качество упадет, это очевидно. Но это тема не о том как пожать изображенеи с минимальными потерями, по-этому сарказм про шайтан программу неуместен, ИМХО. Я специально написал Code: | без видимой на глаз (в данном случае) потери качества | . Имеется ввиду что когда у тебя есть скриншот размером с аватарку, то нет смысла париться по поводу его качества, разницу в котором ты увидишь только с помощью специальных утилит, а вот сократить размер базы в 4 раза, в ДАННОМ СЛУЧАЕ, будет более приоритетно. По-этому я и попросил помощи по автоматизации данного процесса посредством любимого файлового менеджера. |
|
Back to top |
|
|
Tol!k
Joined: 01 Apr 2008 Posts: 1727 Location: Арзамас
|
(Separately) Posted: Sun Apr 12, 2009 14:38 Post subject: |
|
|
DAntES wrote: | Но хранить скрины в бмп имхо бред вообще. | Я предлагал не хранить BMP-шки, а сравнить их в Video Quality Measurement Tool, который к сожалению, не умеет сравнивать JPEGи.
DAntES wrote: | По-этому я и попросил помощи по автоматизации данного процесса посредством любимого файлового менеджера. | Я поделился своим, работающим решением. Качество JPEGов настраивается параметром /jpgq=<в процентах>
Last edited by Tol!k on Sun Apr 12, 2009 19:20; edited 1 time in total |
|
Back to top |
|
|
Worros
Joined: 19 Jan 2007 Posts: 1123
|
(Separately) Posted: Sun Apr 12, 2009 18:45 Post subject: |
|
|
PavelSES wrote: | уважаемые, немог бы кто если не затруднит, сделать кнопочку для Daemon Tools Lite, в частности которая бы вызывала данное окошко "созданиЯ образа" | 1.Разве lite умеет создавать образы? Насколько я знаю, только pro.
2.У него же нет никаких ключей комстроки, которые бы позволили до этого диалога добраться. |
|
Back to top |
|
|
PavelSES
Joined: 11 Apr 2009 Posts: 2
|
(Separately) Posted: Sun Apr 12, 2009 22:56 Post subject: |
|
|
Worros wrote: | PavelSES wrote: | уважаемые, немог бы кто если не затруднит, сделать кнопочку для Daemon Tools Lite, в частности которая бы вызывала данное окошко "созданиЯ образа" | 1.Разве lite умеет создавать образы? Насколько я знаю, только pro.
2.У него же нет никаких ключей комстроки, которые бы позволили до этого диалога добраться. |
да лайт умеет - в демон тулс панели кнопка есть
думал может можно ее каким нить скриптом аля автоайти или еше что... |
|
Back to top |
|
|
bbcby
Joined: 05 Mar 2006 Posts: 58
|
(Separately) Posted: Mon Apr 13, 2009 01:42 Post subject: |
|
|
PavelSES
Может для создания образов вам подойдет ImgBurn?
Он также бесплатен, и там шикарная командная строка (ну практически). А с созданием всевозможных извращенных кнопок на все случаи жизни вам тут помогут. |
|
Back to top |
|
|
Worros
Joined: 19 Jan 2007 Posts: 1123
|
(Separately) Posted: Mon Apr 13, 2009 02:35 Post subject: |
|
|
Ну с ImgBurn то как раз всё более-менее просто, но он не работает с защищенными дисками.
Code: |
TOTALCMD#BAR#DATA
"c:\Program Files\ImgBurn\ImgBurn.exe"
/READ
c:\Program Files\ImgBurn\ImgBurn.exe
ImgBurn
c:\Program Files\ImgBurn\
-1
|
|
|
Back to top |
|
|
Andrey_A
Joined: 10 Apr 2009 Posts: 394 Location: Сочи
|
(Separately) Posted: Fri May 15, 2009 07:30 Post subject: Обмен кнопками |
|
|
Для создания образов я пользуюсь программой UltraISO
вот кнопка
TOTALCMD#BAR#DATA
UltraISO.exe
?-copy G:\\ -output D:\MyDiskIso_1 измените привод и путь сохранения
%COMMANDER_PATH%\Programs\UltraISO\UltraISO.exe
Быстро создать образ CD\DVD не открывая UltraISO (в появившимся окошке измените привод G: на свой и укажите свой путь сохранения образа)
%COMMANDER_PATH%\Programs\UltraISO\
-1
следует поменять свой путь к программе
после нажатия вылетает окно в котором можно поменять привод и путь сохранения
Кстати вопрос: Можно ли изменить имя файла в -output D:\MyDiskIso_1 , чтобы добавлялась дата к нему?
в инструкции к UltraISO я этого не нашёл, или что-то недопонял
Эта кнопка и так работает, но когда приходится создавать много образов, приходится постоянно переименовывать файл MyDiskIso_1.iso
С уважением Андрей А А |
|
Back to top |
|
|
Scorpkoms
Joined: 31 Mar 2008 Posts: 27 Location: Россия
|
(Separately) Posted: Sun May 17, 2009 00:48 Post subject: |
|
|
Доброго времени!
Пожалуйста подскажите код на кнопку создания каталога,
типа:"Каталог","Каталог2","Каталог3" и т.д.
Спасибо. |
|
Back to top |
|
|
LocKtaR-o-DarK
Joined: 12 Aug 2005 Posts: 349 Location: Москва
|
(Separately) Posted: Tue May 19, 2009 15:07 Post subject: |
|
|
Andrey_A
ну, если сильно надо, можно написать, но чисто кнопкой будет не очень серьёзно
итак, вариант сценарий+кнопка
пример сценария (create_iso.cmd)
Код:
@echo off
title Создание ISO-образа в папку "%1"
set label=MyDiskIso_%date:~6,4%.%date:~3,2%.%date:~0,2%-%time:~,-9%.%time:~3,2%.%time:~6,2%
set "pp=%commander_path%\programs\UltraISO.exe"
if not exist %pp% (echo Программа UltraISO не найдена&pause)
:dr
set /p "dr= Введите букву привода (пример: h): "
set dr=%dr:~,1%
if not defined dr (echo Вы не ввели букву диска&goto:dr)
"%pp%" -copy %dr%: -output "%1%label%"
сценарий сохранить в кодировке 866
концевые пробелы удалить
пример кнопки
Код:
TOTALCMD#BAR#DATA
%pp%\create_iso.cmd
%T
%pp%\UltraISO\UltraISO.exe
Быстро создать образ CD\DVD не открывая UltraISO
Scorpkoms
недостаточно точное описание задачи
создай необходимую структуру и в корневой папке структуры выполни
tree .>log.txt
структуру папок из файла log.txt запости сюда
или опиши задачу более подробно _________________ |
|
Back to top |
|
|
Scorpkoms
Joined: 31 Mar 2008 Posts: 27 Location: Россия
|
(Separately) Posted: Thu May 21, 2009 10:02 Post subject: |
|
|
Scorpkoms wrote: | Доброго времени!
Пожалуйста подскажите код на кнопку создания каталога,
типа:"Каталог","Каталог2","Каталог3" и т.д.
Спасибо. |
Как в Windows:
|
|
Back to top |
|
|
LocKtaR-o-DarK
Joined: 12 Aug 2005 Posts: 349 Location: Москва
|
(Separately) Posted: Thu May 21, 2009 22:52 Post subject: |
|
|
Scorpkoms
давно хотел написать, задача была достаточно сложна
однако решение оказалось очень простое
итак, сценарий
Код:
@echo off
if not exist "Каталог" (md "Каталог"&goto:eof)
for /l %%a in (2,1,999) do if /i not exist "Каталог%%a" (md "Каталог%%a"&goto:eof)
пример кнопки
Код:
TOTALCMD#BAR#DATA
%commander_path%\_CMD\crn_dir.cmd
TOTALCMD.EXE,1
Создание папки как в Windows
1 _________________ |
|
Back to top |
|
|
GGS
Joined: 02 May 2009 Posts: 322
|
(Separately) Posted: Fri May 22, 2009 10:23 Post subject: |
|
|
Scorpkoms, LocKtaR-o-DarK
Немного доработанный вариант и без внешнего .cmd (всё в кнопке)
Code: |
TOTALCMD#BAR#DATA
cmd /c if /i not exist "Новая папка" (md "Новая папка"&exit) else for /l %a in (2,1,999) do if /i not exist "Новая папка (%a)" (md "Новая папка (%a)"&exit)
shell32.dll,3
Новая папка
1
-1
|
|
|
Back to top |
|
|
Scorpkoms
Joined: 31 Mar 2008 Posts: 27 Location: Россия
|
(Separately) Posted: Fri May 22, 2009 12:11 Post subject: |
|
|
LocKtaR-o-DarK
Quote: | давно хотел написать, задача была достаточно сложна
однако решение оказалось очень простое
|
GGS
Quote: | Немного доработанный вариант и без внешнего .cmd (всё в кнопке)
|
Благодарю! |
|
Back to top |
|
|
Batya
Joined: 15 Dec 2004 Posts: 2218 Location: Москва, Россия
|
(Separately) Posted: Fri May 22, 2009 13:15 Post subject: |
|
|
GGS
Ну, если уж дорабатывать, то через %comspec%
Code: | TOTALCMD#BAR#DATA
%comspec% /c
if /i not exist "Новая папка" (md "Новая папка"&exit) else for /l %%a in (2,1,999) do if /i not exist "Новая папка (%%a)" (md "Новая папка (%%a)"&exit)
shell32.dll,3
Новая папка
1
-1
|
Ну и свои 5 копеек.
Создаем vbs-скрипт:
Code: | Option Explicit
Dim FSO
Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.CreateFolder(NextName(WScript.Arguments(0)))
Set FSO = Nothing
WScript.Quit
Function NextName(pName)
Dim lCurrentFolder, lPath, k
lCurrentFolder = CreateObject("WScript.Shell").CurrentDirectory & "\"
lPath = lCurrentFolder & pName
If Not FSO.FolderExists(lPath) Then
NextName = lPath
Exit Function
End If
k = 1
Do
lPath = lCurrentFolder & pName & " " & k
k = k + 1
Loop While FSO.FolderExists(lPath)
NextName = lPath
End Function | Кнопка:
Quote: | TOTALCMD#BAR#DATA
C:\Путь\до\скрипта.vbs
"Новая папка"
shell32.dll,3
Новая папка
1
-1 | Синим - собственный путь к скрипту.
Параметр выполнения скрипта (зеленый) - желаемое имя папки. _________________ Нет, я не сплю. Я просто медленно моргаю. |
|
Back to top |
|
|
|