![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Столкнулся с проблемой, если добавляю условие s[j]<>'|', т.е. как указано ниже, то в ELSE вообще не попадаю!!! Хотя условие должно выполнится 5-ь раз, если логически рассуждать. Но почему код не работает. Если убираю s[j]<>'|', условие срабатывает 4-е раза.
Строки вида - V3I SE7779AD3U1 SE7779AV1U1 SE7779AD1U1 SE9620AE7U1 Код:
for j:=Length(Poisk_In_File)+1 to Length(S) do begin If (s[j]<>' ')OR(s[j]<>'|') then Iskom_Str:=Iskom_Str+s[j] Else begin ..... end; end; |
#2
|
||||
|
||||
![]() Цитата:
Так тебе тут и нужен не OR а AND --------------------------------------------- Программирование - не профессия, а стиль жизни |
#3
|
||||
|
||||
![]() когда чтото не получается - пробуй подставить действия попроще:
в твоём случае это выглядеть будет так: Код:
If not(s[j]=' ')OR not(s[j]='|') then Iskom_Str:=Iskom_Str+s[j] Else begin ..... end; тут получается взаимоисключение, как видишь... например есть символ '|', но он не равен ' ', значит true, действие выполнится, опять же если символ ' ', то он не равен '|', и опять действие выполняется ) если я правильно понял, тебе нудно сделать так: если символ не ' ' и не '|', то действия выполняется, тогда нужно просто OR (оператор ИЛИ) заменить на AND (оператор И) Если Вы недовольны моими действиями, Вам СЮДА. |
#4
|
|||
|
|||
![]() Цитата:
1. Первое условие у тебя никогда не сработает. Если ты из кода скопировал, то обрати внимание что s[j] - это единичный символ, а тут ' ' два символа. 2. Если тебе просто нужно убрать пробелы и знак '|'. Возможно проще сделать так? Код:
Iskom_Str := StringReplace(copy(s, length(Poisk_In_File), length(s)), ' ', '', [rfReplaceAll]); Iskom_Str := StringReplace(Iskom_Str, '|', '', [rfReplaceAll]); |
#5
|
|||
|
|||
![]() Да Johnson ты меня правильнопонял, попробую... Спасибо за советы!!! Точно. Два символа!))) Сам себя запутал.... Спасибо большое! А код нахидит в строке слова и добавляет их в Combobox...
|
#6
|
|||
|
|||
![]() Цитата:
Для слов можн оиспользовать стандартный объект типа TParser :-) |