Собрал аналог, демонстрирующий проблему.
Если в папке со схемой будут файлы имеющие в имени " не стандартные" символы, то переместить файл не получится.
Make(delphi) ver(4.04 build 184) Add(MainForm,2953706,301,189) { Position=1 link(onCreate,11015838:doWork2,[]) } Add(FileSearch,2495974,357,203) { SubDir=1 Include=2 link(onSearch,14522694:doEvent1,[]) link(Dir,6081030:Var2,[]) } Add(MT_AddData,16353286,504,140) { InputMT=0 link(onAdd,16662174:doRowAction,[]) link(Data2,506766:CountIcons,[]) } Add(Hub,14522694,406,203) { link(onEvent1,7087361:doSplit,[(430,209)(430,146)]) link(onEvent2,10929371:doGetFileIcon,[]) } Add(FileAttributes,10929371,441,189) { Point(doGetFileIcon) Point(onGetFileIcon) link(onGetFileIcon,12878466:doAdd,[]) } Add(ArrayRW,12878466,490,182) { link(Array,506766:IconArray,[(496,134)(510,134)]) } Add(MultiStrData,7087361,441,140) { Char="\" Direct=1 link(onPart1,16353286:doAdd,[]) } Add(MST_RowAction,16662174,553,140) { MSTControl="MTStrTbl" link(onChange,15946809:doColAction,[(585,146)]) } Add(MST_ColAction,15946809,602,140) { Action=9 MaxColWidth=2500 MSTControl="MTStrTbl" } Add(IconsManager,506766,504,91) { Name="Icons" Icons=['Void'=[ZIP7E05000078DAED8F494F535118869F4B811670A813CE8A33CEF38C8ADA5E6E979A18D746D126089218239AA0D58D115D3845E34F6A5AE886AA0948090D8545D399F64EE57A7A5BDC68FC0186F7E43DF99EF30DF90E48E2B8DD88DB85BF015A817661F1441BD5F78A3A25FE90AEEB148B4562B118AAAA522A95C8E7F3CCCDCD914C260985427CFE382FEA4CA6A6A6080CCEF3FA954A2A95E2415F918909936783799E0EE4F8FA659EBEFB16BD3D2AB76F65F8F441E7FD3B43CCD37919D0C8E534E2F138FE6E83743A4D3854A4BFD7607A5A6564648437431A93933A6F8754B2D92CF7BAD3620F95D95995E1E1613299928873DCBCA191496B140A2633335922910881E705C6C7541EF65BDCBD63895C41F41A3C1928F073DCE0F1A31C3FBE1B8C8EA64924CABC0814B87E2D856194F916D5E9F15BCC244CC1069AA6619A26C1609072B94C381CC6B22C16B5A8FF4E2DAEAEDFF2B580CBA3288AACD8F2F8A0AB162BB208BA04DB49D9568DE5CB3B65CFF1ADB2C766593EBFFC5C73F39E4BDBA8E695B31B361F5B79B075AF77A1FFF08E2B27CF1C7254598CEB5C7B62F5C576A9B1567F75D59275BBDA561CD82D57EB2F3435ADDFBF744D87B3CA784E6F74341E718B056CF6E2F54A0D5B148774B4AE324FAAAFAF3FD5B04C716EAF53C08747B697F7EEAB209B7C0BBFB531207508F30F47FF6E87B033CA2F803FF614]] } Add(Dir,2080286,364,154) { } Add(MTStrTbl,6524990,231,224) { Left=180 Top=55 Width=625 Height=400 Align=5 Name="MTStrTbl" Columns=#1:1| FlatScroll=1 Style=2 SmallIconsManager="Icons" Point(onMouseUp) Point(onMouseDown) link(onMouseUp,16375271:doCase,[]) link(onMouseDown,6348883:doCase,[(273,265)(273,300)]) } Add(PopupMenuEx,5175250,497,266) { Menu=#11:Переместить|1:-|8:Вырезать|10:Копировать|8:Вставить|1:-|7:Удалить|5:Найти| GutterLineOn=1 Bitmaps=[] link(MenuItemIdx,14141145:doMove,[(541,272)(541,304)(380,304)(380,335)]) } Add(Case,16375271,280,252) { @Hint=#27:Реагирует на отпускание ПКМ| Value=Integer(1) link(onTrue,14949713:doCompare,[]) } Add(MouseEvent,7286383,336,301) { @Hint=#56:Создаёт видимость реагирования на первое отпускание ПКМ.| } Add(Case,6348883,287,294) { @Hint=#24:Реагирует на нажатие ПКМ| Value=Integer(1) link(onTrue,7286383:doClick,[]) } Add(DirTools,14141145,392,322) { @Hint=#60:Проверка наличия объекта с данным именем в принимающей папке| NoConfirmation=1 link(onOK,8471066:doClear,[]) link(Source,6963919:Result,[]) link(Dest,7129889:Result,[(405,310)(447,310)]) } Add(StrCatDelim,7129889,441,266) { @Hint=#43:Полный путь к вложению перемещённому в бокс| Delimiter="\Box\" link(onStrCatDlm,5175250:doPopupHere,[]) link(Str1,15476386:Var3,[(447,250)]) link(Str2,9259387:Var3,[(454,257)]) } Add(StrCatDelim,6963919,392,266) { @Hint=#34:Полный путь к выделенному вложению| Delimiter="\" link(onStrCatDlm,7129889:doStrCatDlm,[]) link(Str1,15476386:Var2,[]) link(Str2,9259387:Var2,[]) } Add(GetDataEx,9259387,399,252) { Angle=3 link(Data,6177288:Var3,[(378,257)(378,278)]) } Add(GetDataEx,6177288,322,273) { Angle=3 link(Data,6524990:Select,[(237,278)]) } Add(If_else,14949713,336,259) { @Hint=#35:Завершение, если ничего не выбрано.| link(onFalse,6963919:doStrCatDlm,[]) link(Op1,6177288:Var1,[(342,251)(328,251)]) } Add(GetDataEx,15476386,392,245) { link(Data,6081030:Var3,[(398,194)]) } Add(GetDataEx,6081030,364,189) { link(Data,2080286:CurrentDir,[]) } Add(HubEx,11015838,343,203) { link(onEvent,2495974:doSearch,[]) } Add(MST_Clear,8471066,441,322) { MSTControl="MTStrTbl" link(onChange,11015838:doWork3,[(488,328)(488,244)(347,244)]) }
------------ Дoбавленo в 21.15:
Ravilr писал(а): ?????? вопросики это и есть нестандартные символы
Да, но не только, видимо это и возьму за основу.
|