Страница 19 из 46

Добавлено: Сб апр 11, 2009 14:12
Tol!k
DAntES писал(а):Да в том то и дело, что пейнт уменьшает размер без видимой на глаз (в данном случае) потери качества...
Но просто потом при сохранении в пейнте размер все равно уменьшится в 2-4 раза.
Вай, шайтан-программа.
Сохрани исходное и пожатое изображение в .bmp и сравни вот этим.

Добавлено: Вс апр 12, 2009 13:17
DAntES
BMP имеет точно такой же размер и качество. Но хранить скрины в бмп имхо бред вообще. И я знаю что после пейнта качество упадет, это очевидно. Но это тема не о том как пожать изображенеи с минимальными потерями, по-этому сарказм про шайтан программу неуместен, ИМХО. Я специально написал

Код: Выделить всё

без видимой на глаз (в данном случае) потери качества
. Имеется ввиду что когда у тебя есть скриншот размером с аватарку, то нет смысла париться по поводу его качества, разницу в котором ты увидишь только с помощью специальных утилит, а вот сократить размер базы в 4 раза, в ДАННОМ СЛУЧАЕ, будет более приоритетно. По-этому я и попросил помощи по автоматизации данного процесса посредством любимого файлового менеджера.

Добавлено: Вс апр 12, 2009 14:38
Tol!k
DAntES писал(а):Но хранить скрины в бмп имхо бред вообще.
Я предлагал не хранить BMP-шки, а сравнить их в Video Quality Measurement Tool, который к сожалению, не умеет сравнивать JPEGи.
DAntES писал(а):По-этому я и попросил помощи по автоматизации данного процесса посредством любимого файлового менеджера.
Я поделился своим, работающим решением. Качество JPEGов настраивается параметром /jpgq=<в процентах>

Добавлено: Вс апр 12, 2009 18:45
Worros
PavelSES писал(а):уважаемые, немог бы кто если не затруднит, сделать кнопочку для Daemon Tools Lite, в частности которая бы вызывала данное окошко "созданиЯ образа"
1.Разве lite умеет создавать образы? Насколько я знаю, только pro.
2.У него же нет никаких ключей комстроки, которые бы позволили до этого диалога добраться.

Добавлено: Вс апр 12, 2009 22:56
PavelSES
Worros писал(а):
PavelSES писал(а):уважаемые, немог бы кто если не затруднит, сделать кнопочку для Daemon Tools Lite, в частности которая бы вызывала данное окошко "созданиЯ образа"
1.Разве lite умеет создавать образы? Насколько я знаю, только pro.
2.У него же нет никаких ключей комстроки, которые бы позволили до этого диалога добраться.
да лайт умеет - в демон тулс панели кнопка есть
думал может можно ее каким нить скриптом аля автоайти или еше что...

Добавлено: Пн апр 13, 2009 01:42
bbcby
PavelSES
Может для создания образов вам подойдет ImgBurn?
Он также бесплатен, и там шикарная командная строка (ну практически). А с созданием всевозможных извращенных кнопок на все случаи жизни вам тут помогут.

Добавлено: Пн апр 13, 2009 02:35
Worros
Ну с ImgBurn то как раз всё более-менее просто, но он не работает с защищенными дисками.

Код: Выделить всё

TOTALCMD#BAR#DATA
"c:\Program Files\ImgBurn\ImgBurn.exe"
/READ
c:\Program Files\ImgBurn\ImgBurn.exe
ImgBurn
c:\Program Files\ImgBurn\

-1

Обмен кнопками

Добавлено: Пт май 15, 2009 07:30
Andrey_A
Для создания образов я пользуюсь программой 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
С уважением Андрей А А

Добавлено: Вс май 17, 2009 00:48
Scorpkoms
Доброго времени!
Пожалуйста подскажите код на кнопку создания каталога,
типа:"Каталог","Каталог2","Каталог3" и т.д.
Спасибо.

Добавлено: Вт май 19, 2009 15:07
LocKtaR-o-DarK
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 запости сюда
или опиши задачу более подробно

Добавлено: Чт май 21, 2009 10:02
Scorpkoms
Scorpkoms писал(а):Доброго времени!
Пожалуйста подскажите код на кнопку создания каталога,
типа:"Каталог","Каталог2","Каталог3" и т.д.
Спасибо.
Как в Windows:
Изображение

Добавлено: Чт май 21, 2009 22:52
LocKtaR-o-DarK
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

Добавлено: Пт май 22, 2009 10:23
GGS
Scorpkoms, LocKtaR-o-DarK
Немного доработанный вариант и без внешнего .cmd (всё в кнопке)

Код: Выделить всё

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

Добавлено: Пт май 22, 2009 12:11
Scorpkoms
LocKtaR-o-DarK
давно хотел написать, задача была достаточно сложна
однако решение оказалось очень простое
GGS
Немного доработанный вариант и без внешнего .cmd (всё в кнопке)
Благодарю!

Добавлено: Пт май 22, 2009 13:15
Batya
GGS
Ну, если уж дорабатывать, то через %comspec% 8)

Код: Выделить всё

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-скрипт:

Код: Выделить всё

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
Кнопка:
TOTALCMD#BAR#DATA
C:\Путь\до\скрипта.vbs
"Новая папка"
shell32.dll,3
Новая папка

1
-1
Синим - собственный путь к скрипту.
Параметр выполнения скрипта (зеленый) - желаемое имя папки.