Имя: Пароль:
1C
1С v8
Поиск числа в строке
0 karpos
 
18.06.14
15:16
Еще раз всем привет. Есть строка вида дд14:00, дд8:05, д14:00, д8:00.
Как мне вытащить сначала первую часть чисел до : вторую я нашел.

  Поз = Найти(Время,":");
  Если НЕ Поз тогда
    Возврат 0;
  КонецЕсли;
ДробЧасть = (Число(Сред(Время,Поз+1,6))/60*100);
1 Wobland
 
18.06.14
15:17
ну не Лев же
2 Волшебник
 
модератор
18.06.14
15:20
Время = СтрЗаменить(Время, "д", "");
Поз = Найти(Время,":");
Часы = Число(Лев(Время, Поз-1));
Минуты = Число(Сред(Время, Поз+1));
3 Рэйв
 
18.06.14
15:20
Для начала
НовСтр=СтрЗаменить(СтараяСтр,":",Символы.ПС);

Потом перебирай многострочный текст построчно и, перебирая посимвольно строки, выбирай только цифры.
4 karpos
 
18.06.14
15:32
не буквы могут быть разные
5 karpos
 
18.06.14
15:33
либо одна буква либо две
6 hhhh
 
18.06.14
15:58
(5)

    ТекНом = СокрЛП(СтрокаНомер);
    НаборЦифр = "1234567890";
    ТекНач = 0;
    ДлинаТекНом = СтрДлина(ТекНом);
    Для ии = 1 По ДлинаТекНом Цикл
        Если Найти(НаборЦифр, Сред(ТекНом, ии, 1)) = 0 Тогда
            Продолжить;
        КонецЕсли;
        ТекНач = ии;
        Прервать;
    КонецЦикла;
7 МихаилМ
 
18.06.14
16:04
подходите системно:

дополните запятой
два раза разложитьстрокувмассив
8 Крошка Ру
 
18.06.14
16:10
Что-то мне это напоминает...

v8: Строка в число !!!
9 karpos
 
18.06.14
20:13
hhh может я ошибаюсь но ии всегда будет ровна 1, и почему в условие с сравнивается с 0 , доступа к серверу нет завтра гляну в табло.
Компьютеры — прекрасное средство для решения проблем, которых до их появления не было.