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,350,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,3018808:doValue,[])
}
Add(WinTools,16109481,35,98)
{
 link(Handle,2953706:Handle,[])
}
Add(ListBox,12854544,399,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,455,98)
{
 link(onEvent2,9968219:doPopupHere,[])
}
Add(PopupMenu,9968219,504,105)
{
 Menu=#8:Изменить|
 link(onClick,372440:doSplit,[])
}
Add(StrPart,372440,553,105)
{
 Char=":"
 Point(Left)
 Point(Right)
 link(onSplit,4665449:doWork1,[])
 link(onPart,4665449:doWork2,[])
 link(Str,12854544:String,[(559,89)(445,89)(445,126)(426,126)])
}
Add(ChildPanel,4665449,602,105)
{
 link(onEvent1,6635445:doWork1,[(641,111)(641,76)(326,76)])
}
BEGIN_SDK
  Add(EditMulti,2791949,14,7)
  {
   EventCount=1
   WorkCount=2
   VarCount=2
   Width=321
   Height=305
   link(doWork1,2330609:doTrim,[(74,13)(74,27)])
   link(doWork2,9998415:doTrim,[(32,20)(32,69)])
  }
  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)])
  }
END_SDK
Add(GlobalVar,3018808,273,105)
{
 Name="file"
 link(onValue,6635445:doWork2,[])
}
Add(HubEx,6635445,322,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|100:Разорхивируйте, переименуйте файл "exiftool(-k).exe" на "exiftool.exe" и положите рядом с программой.|
 HAlign=0
 Width=624
 Height=53
 Margin=10
}