[√] Количество одинаковых символов в строке 
				  
				 
			
MicroCip Дата: Чт, 05 Января 2012, 17:33 | Сообщение # 1   
В общем возник такой вопрос, есть название файла, т.е. Имя.Формат, так вот, мне нужно узнать формат файла, копировать я его буду опираясь на точку перед форматом, но если в самом названии файла, будет содержаться точка, то получится что я скопирую часть имени и формат. Так вот собственно вопрос: Каким образом можно определить количество Определенного символа в строке? 
В каждом человеке солнце. Только дайте ему светить.(с)Сократ 
Сообщение отредактировано   MicroCip  - Чт, 05 Января 2012, 17:41 
 
  
 
Сообщение В общем возник такой вопрос, есть название файла, т.е. Имя.Формат, так вот, мне нужно узнать формат файла, копировать я его буду опираясь на точку перед форматом, но если в самом названии файла, будет содержаться точка, то получится что я скопирую часть имени и формат. Так вот собственно вопрос: Каким образом можно определить количество Определенного символа в строке? Автор - MicroCip  Дата добавления - 05 Января 2012  в 17:33  
Гарик Дата: Чт, 05 Января 2012, 17:58 | Сообщение # 2   
Quote  (MicroCip )
если в самом названии файла, будет содержаться точка, то получится что я скопирую часть имени и формат.
    ExtractFileExt "D:\Test.4.fgfr..bmp" "[result]"   В [result] будет только расширение .bmp 
 
  
 
Сообщение Quote  (MicroCip )
если в самом названии файла, будет содержаться точка, то получится что я скопирую часть имени и формат.
    ExtractFileExt "D:\Test.4.fgfr..bmp" "[result]"   В [result] будет только расширение .bmpАвтор - Гарик  Дата добавления - 05 Января 2012  в 17:58  
MicroCip Дата: Чт, 05 Января 2012, 18:08 | Сообщение # 3   
Эх, похоже нужно пойти поспать     Гарик , спасибо 
В каждом человеке солнце. Только дайте ему светить.(с)Сократ 
Сообщение отредактировано   MicroCip  - Чт, 05 Января 2012, 18:08 
 
  
 
Сообщение Эх, похоже нужно пойти поспать     Гарик , спасибо Автор - MicroCip  Дата добавления - 05 Января 2012  в 18:08  
mishem Дата: Чт, 05 Января 2012, 18:24 | Сообщение # 4   
Quote  (Гарик )
ExtractFileExt "D:\Test.4.fgfr..bmp" "[result]"
    Все правильно, есть такая команда.   Но раз тема называется не про расширения, то добавлю еще решение если бы не было такой команды.   Code
   SetVar "[результат]" "1"   While "[результат]" "<>" "0"      SearchStr "." "искомая строка" "[результат]" ""      SetVar "[результат_с точкой]" "[результат]"   EndWhile   StrLen "искомая строка" "[длина строки]"   SubStr "искомая строка" "[результат_с точкой]" "[длина строки]-[результат_с точкой]" "[измененная строка]"
    Добавлено  (05 Января 2012, 18:24)   ---------------------------------------------   Можно найти все результаты сложив их в массив   Code
   SetVar "[результат]" "1"   While "[результат]" "<>" "0"      SearchStr "." "искомая строка" "[результат]" ""      SetVar "[i]" "[i]+1"      SetVar "[результат_с точкой[i]]" "[результат]"   EndWhile   StrLen "искомая строка" "[длина строки]"   SubStr "искомая строка" "[результат_с точкой]" "[длина строки]-[результат_с точкой]" "[измененная строка]"
    В [i] будет Количество одинаковых символов в строке  
Не хочешь читать хелп?         Если хелп и форум не помогли, тогда все ответы здесь        Если вы думаете, что сможете — вы сможете, если думаете, что нет — вы правы. 
Сообщение отредактировано   mishem  - Чт, 05 Января 2012, 18:27 
 
  
 
Сообщение Quote  (Гарик )
ExtractFileExt "D:\Test.4.fgfr..bmp" "[result]"
    Все правильно, есть такая команда.   Но раз тема называется не про расширения, то добавлю еще решение если бы не было такой команды.   Code
   SetVar "[результат]" "1"   While "[результат]" "<>" "0"      SearchStr "." "искомая строка" "[результат]" ""      SetVar "[результат_с точкой]" "[результат]"   EndWhile   StrLen "искомая строка" "[длина строки]"   SubStr "искомая строка" "[результат_с точкой]" "[длина строки]-[результат_с точкой]" "[измененная строка]"
    Добавлено  (05 Января 2012, 18:24)   ---------------------------------------------   Можно найти все результаты сложив их в массив   Code
   SetVar "[результат]" "1"   While "[результат]" "<>" "0"      SearchStr "." "искомая строка" "[результат]" ""      SetVar "[i]" "[i]+1"      SetVar "[результат_с точкой[i]]" "[результат]"   EndWhile   StrLen "искомая строка" "[длина строки]"   SubStr "искомая строка" "[результат_с точкой]" "[длина строки]-[результат_с точкой]" "[измененная строка]"
    В [i] будет Количество одинаковых символов в строке Автор - mishem  Дата добавления - 05 Января 2012  в 18:24  
Гарик Дата: Чт, 05 Января 2012, 18:39 | Сообщение # 5   
Можно сделать проще:   StrParse "D:\T.es,t.4.fgfr.jj,yu,y.rt.rr5464..4...bmp" "." "[m]" "[k]"   SetVar "[result]" ".[m[k]]" 
 
  
 
Сообщение Можно сделать проще:   StrParse "D:\T.es,t.4.fgfr.jj,yu,y.rt.rr5464..4...bmp" "." "[m]" "[k]"   SetVar "[result]" ".[m[k]]" Автор - Гарик  Дата добавления - 05 Января 2012  в 18:39