선경선향아빠's Blog

TTS 예전에 아이들 한글 공부 하는데 도움이 될까 해서 간단한 TTS 프로그램을 하나 만들었었는데 구글 번역을 idHTTP로 호출하여 간단히 TTS를 구현했는데 동작하지 않더라구요. [Delphi] 구글 번역 이용해서 TTS 기능 구현하기 https://skshpapa80.blogspot.com/2013/04/delphi-tts.html 그래서 잊고 있었는데 이번에 델파이 스타터 버전을 깔고 나서 다른 방법을 이용하여 구현하였습니다. 구현방법이랑 소스는 추후에 정리해서 올리도록 하지요!!! 사용법은 키보드로 한글을 입력하거나 마우스로 글자를 만들고 발음 버튼을 클릭하면 글자를 읽어 줍니다. ^^

  2010년 큰딸이 한글을 배우기 시작할 때 프로그래머인 아빠가 뭐해줄게 없을까 고민하다가 만들게 된 프로그램 이 있습니다. 나름 한글 공부하는데 도움이 됐으면 해서 이름도 한글 공부라고 짖고 아이들이 재미있어 했으면 좋겠다는 생각에 구현을 하다 보니 TTS 기능이 필요해서 구글 번역을 이용하기로 했습니다. 인터넷이 연결된 곳에서는 잘 작동을 했었거든요!!! ‘ㄱ’글자 버튼을 누르면 텍스트 박스에 ‘ㄱ’ 이 입력됩니다. 한글 공부시키려고 만들었었는데.. 마우스 연습도 되네요!!! 물론 저걸로 한글을 깨우치진 않고 컴퓨터를 가지고 놀때 보여준 프로그램 입니다. 구글 번역 서비스를 사용하신분을 아시겠지만 구글 번역 서비스에 번역된 텍스트를 읽어주는 기능이 있습니다. 그서비스가 어떻게 구현회는지 분석하다보니 번역 URL에 테스트를 던지면 mp3파일형식의 스트림으로 전달해주길래 그기능을 이용해서 TTS기능을 구현해보았습니다. 소스는 정말 간단합니다. 인디컴포넌트중 idHTTP 컴포넌트를 사용했습니다. ------ 소스코드 var     Stream : TMemoryStream; begin     // 구글 TTS 사용     Stream := TMemoryStream.Create;       try       // idHTTP를 사용할때 UserAgent를 입력해야 하더군요       IdHTTP1.Request.UserAgent := 'Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.9.2.3) Gecko/20100401';       // URL 주소를 보면아시겠지만 한글을 쓸꺼라 ko 입니다.       // 리턴받는 스트림이 mp3형태입니다.        IdHTTP1.Get(TIdUR...