HELP срочно!

[PLOT]

Проблема со строковыми функциями. Надо написать цикл для удаления
всех пробелов из строки. Это нужно для декодера морзе >> русский.
Помогите я вообще не догоняю чего делать.

[pu4koff]

удалять символ из строки можно процедурой delete. Находишь пробел и бабах...
ЗЫ. находить можно функцией Pos

[ByteMan]

инструкция while, в результате выполнения которой удаляются начальные пробелы из строки st.
while(pos(' ',st) = 1) and(length(st) > 0) do delete (st,1,1);

[PLOT]

Спасибо, про эти функции я знаю, но мне нужен сам цикл перебора
символов. А пробелы надо грохнуть во всей строке.

[pu4koff]

попробуй так:

for i:= length(s) downto 1 do
  if (s[i]=' ')then delete(s,i,1);

[PLOT]

Новый косяк перед удалением пробелов надо определить положение и
колиество знаков между ними.
Подскажите, можно ли для этого использовать функцию (POS)? Если да, то как.
Еще раз спасибо.