Вверх ↑
Ответов: 687
Рейтинг: 142
#1: 2021-03-28 22:51:46 ЛС | профиль | цитата
Sersey, На сайте программы exiftool есть описание tag-ов практически всех файлов, которые поддерживает данная программа. Для PDF - https://exiftool.org/TagNames/PDF.html
Например, команда для изменения CreateDate и ModifyDate должна быть такой:

exiftool -createdate="2021:03:28" -modifydate="2021:03:28" "твой_файл.pdf"
Скорее всего у тебя пути к файлам имеют пробелы или русские буквы, их надо заключать в кавычки.
Немного подправил пример. Попробуй.

Add(MainForm,2953706,35,42)
{
Width=646
Caption="Метаданные картинки: чтение, изменение"
Point(Handle)
link(onCreate,16109481:doPopup,[(74,62)(74,83)(25,83)(25,111)])
}
Add(WinExec,12060573,399,91)
{
FileName="exiftool.exe"
Mode=0
Point(doConsoleExec)
Point(onConsoleResult)
link(onConsoleResult,12854544:doText,[])
}
Add(DropFile,7448277,196,56)
{
link(onDropFile,1640921:doWork1,[(256,62)])
}
Add(Menu,1371778,133,98)
{
Menu=#9:Read Exif|0:|
Point(onSelectNum)
link(onSelectNum,11186591:doExecute,[])
}
Add(ODialog,11186591,196,105)
{
link(onExecute,1640921:doWork2,[])
}
Add(HubEx,1640921,252,105)
{
link(onEvent,12248701:doString,[])
}
Add(WinTools,16109481,35,98)
{
link(Handle,2953706:Handle,[])
}
Add(ListBox,12854544,448,84)
{
Width=630
Height=261
Align=5
Font=[Lucida Console,8,0,0,204]
DataType=1
Point(String)
Point(onMouseDown)
link(onMouseDown,6610956:doEvent,[])
}
Add(IndexToChanel,6610956,504,98)
{
link(onEvent2,9968219:doPopupHere,[])
}
Add(PopupMenu,9968219,560,105)
{
Menu=#8:Изменить|
link(onClick,4665449:doWork1,[])
}
Add(ChildPanel,4665449,609,105)
{
link(onEvent1,6635445:doWork1,[(648,111)(648,76)(375,76)])
link(Data1,12854544:String,[(615,89)(496,89)(496,124)(475,124)])
}
BEGIN_SDK
Add(EditMulti,2791949,14,7)
{
EventCount=1
WorkCount=1
DataCount=1
Width=321
Height=305
link(doWork1,10620436:doSplit,[(39,13)(39,41)])
}
Add(Panel,8215020,35,105)
{
Top=234
Width=630
Height=27
Align=4
}
Add(Label,2319504,154,63)
{
Left=2
Top=2
Width=170
Height=23
Align=1
Caption=""
}
Add(Edit,9456596,189,14)
{
Left=172
Top=2
Width=381
Height=23
Align=5
Text=""
}
Add(Button,3951807,49,161)
{
Left=553
Top=2
Width=75
Height=23
Align=3
Caption="Записать"
link(onClick,13655842:doMessage,[])
}
Add(Trim,9998415,105,63)
{
link(onTrim,2319504:doText,[])
}
Add(Trim,2330609,105,21)
{
link(onTrim,9456596:doText2,[])
}
Add(Message,13655842,98,161)
{
Message="Уверены что хотите изменить данные в файле."
Caption="Внимание"
Type=1
Point(onOK)
link(onOK,1690141:doString,[])
}
Add(GlobalVar,8947609,175,133)
{
Name="file"
}
Add(FormatStr,1690141,154,168)
{
DataCount=3
Mask=""-%1=%2" %3"
link(onFString,2791949:onEvent1,[(228,174)(228,13)])
link(Str1,2319504:Caption,[])
link(Str2,9456596:Text,[(167,103)(195,103)])
link(Str3,8947609:Var,[(174,152)(181,152)])
}
Add(StrPart,10620436,49,35)
{
Char=":"
Point(Left)
Point(Right)
link(onSplit,2330609:doTrim,[(88,41)(88,27)])
link(onPart,9998415:doTrim,[(95,48)(95,69)])
link(Str,2791949:Data1,[(55,26)(20,26)])
}
END_SDK
Add(GlobalVar,3018808,322,105)
{
Name="file"
link(onValue,6635445:doWork2,[])
}
Add(HubEx,6635445,371,105)
{
link(onEvent,12060573:doConsoleExec,[])
}
Add(InfoTip,7235781,49,189)
{
Info=#122:Скачайте с сайта https://exiftool.org/ версию "exiftool.exe" для windows по ссылке https://exiftool.org/exiftool-12.10.zip|101:Разорхивируйте, переименуйте файл "exiftool(-k).exe" на "exiftool.exe" и положите рядом с программой.|
HAlign=0
Width=624
Height=53
Margin=10
}
Add(FormatStr,12248701,273,105)
{
DataCount=1
Mask=""%1""
link(onFString,3018808:doValue,[])
}

карма: 15

0