Показать сообщение отдельно
  #17  
Старый 25.04.2013, 17:53
Аватар для Alegun
Alegun Alegun вне форума
LMD-DML
 
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
По умолчанию

Вот пример того что получилось, двухсторонний конвертер морзянки, правда тупо говнокодом, одними ифками, т.к. на использование массивов и др. хороших вещей времени не нашлось. Проверил, работает.


Добавлено позже:

А насчёт пробелов при воспроизведении можно и правда так

Загонять буквы через пробелы и затем
Код:
s:= StringReplace(строка с кодом Морзе, ' ', '_', [rfReplaceAll]);

for i := 1 to length(s) do if s[i] <> '_' then проиграть(s[i]);
...
и пауз так не будет точно.
Вложения
Тип файла: zip Morse.zip (3.6 Кбайт, 1 просмотров)
Ответить с цитированием