Вверх ↑
Ответов: 632
Рейтинг: 4
#1: 2018-08-27 18:21:08 ЛС | профиль | цитата
Сделал программу, которая по ссылки скачивает файл и даёт название, но в название часто попадаются символы с которыми файл нельзя сохранять (например:?). Как эти символы убрать, простой способ список замен сделать, но всех символов не угадать. Может есть способ ограничить символы. Например только русский, английский. Если название полностью не читаемое сохранить со случайными символами.

--- Добавлено в 2018-08-27 18:40:22


Add(MainForm,2953706,21,105)
{
}
Add(StrList,3225928,497,98)
{
Strings=#1: |1:ё|1:й|1:ц|1:у|1:к|1:е|1:н|1:г|1:ш|1:щ|1:з|1:х|1:ъ|1:ф|1:ы|1:в|1:а|1:п|1:р|1:о|1:л|1:д|1:ж|1:э|1:я|1:ч|1:с|1:м|1:и|1:т|1:ь|1:б|1:ю|1:1|1:2|1:3|1:4|1:5|1:6|1:7|1:8|1:9|1:0|1:-|1:q|1:w|1:e|1:r|1:t|1:y|1:u|1:i|1:o|1:p|1:a|1:s|1:d|1:f|1:g|1:h|1:j|1:k|1:l|1:z|1:x|1:c|1:v|1:b|1:n|1:m|1:,|1:.|
Point(StrToFind)
Point(doGetIndex)
}
Add(Position,10866075,504,203)
{
link(onSearch,6972558:doStrCat,[(558,209)(558,216)])
link(Str,868810:Item,[(510,191)(482,191)(482,247)(454,247)])
link(Target,591610:Value,[(517,191)(466,191)(466,243)(412,243)(412,236)(398,236)])
}
Add(Copy,10704782,294,203)
{
Count=1
link(onCopy,10331267:doValue,[(331,209)(331,125)])
link(Str,6861674:Var2,[(300,187)(307,187)])
link(Position,13170378:Position,[(307,191)(258,191)(258,247)(230,247)])
}
Add(Length,13494885,175,203)
{
link(onLength,13170378:doFor,[])
link(Str,6861674:Var1,[(181,180)])
}
Add(GetDataEx,6861674,301,175)
{
link(Data,1538820:Text,[(307,135)(237,135)])
}
Add(For,13170378,224,203)
{
link(onEvent,10704782:doCopy,[])
link(onStop,3339557:doData,[(268,216)(268,286)])
link(End,13494885:Result,[(237,191)(209,191)(209,240)(181,240)])
}
Add(Memory,591610,392,203)
{
link(onData,868810:doEnum,[])
}
Add(StrCat,6972558,581,210)
{
Point(doClear)
link(Str1,8386716:Var2,[(587,198)(575,198)])
link(Str2,10331267:Value,[(594,180)(342,180)])
}
Add(Hub,10160039,133,189)
{
link(onEvent1,7738151:In,[])
link(onEvent2,13494885:doLength,[(161,202)(161,209)])
}
Add(LineBreak,11061912,539,217)
{
link(Out,6972558:doClear,[])
Primary=[7738151,-378,-28]
}
Add(GetDataEx,8386716,569,245)
{
Angle=2
link(Data,6972558:Result,[(587,254)])
}
Add(Edit,1538820,231,63)
{
Left=10
Top=45
Width=365
link(onChange,10160039:doEvent1,[(275,69)(275,132)(121,132)(121,195)])
}
Add(StrCase,347607,350,203)
{
link(onModify,591610:doValue,[])
}
Add(ArrayEnum,868810,448,203)
{
link(onItem,10866075:doSearch,[])
link(Array,3225928:Array,[(454,177)(517,177)])
}
Add(DoData,3339557,280,280)
{
link(onEventData,2953706:doCaption,[(324,286)(324,198)(9,198)(9,111)])
link(Data,8386716:Var1,[(286,250)])
}
Add(Memory,10331267,336,119)
{
link(onData,347607:doModify,[(380,125)(380,184)(338,184)(338,209)])
}

Сам догадался
карма: 0

0
Редактировалось 1 раз(а), последний 2018-08-27 18:40:22