Witam!
Chcialbym napisac aplikacje ktora komunikuje sie z programem syntalk za pomoca kanalu DDE, niestety z tego co wyczytalem w pomocy w Delphim nie radze sobie. Mogl by ktos zarzucic najprostrzym kodem ktory to robi?
Oto to co napisali w tym programie (syntalk) z ktorym mam sie komunikowac :
SynTalk jest serwerem DDE, co umożliwia integrowanie go z innymi aplikacjami. Serwer syntezy mowy zarejestrowany jest w systemie pod nazwą: service name = "Syntalk". Obsługa syntezy jest operacją z grupy o nazwie topic name = "System". Tekst przesyłany przez kanał DDE powinien być skierowany do jednostki danych o nazwie item name ="text".
Współpraca z SynTalkiem - serwerem DDE rozpoczyna się od nawiązania połączenia między aplikacjami. Następnie aplikacja klienta wysyła tekst, który ma być poddany syntezie, po czym wydaje komendy sterujące procesem syntezy. Dostępne są komendy:read - do rozpoczęcia wypowiadania tekstu,
pause - do zatrzymania procesu syntezy,break - do przerwania wypowiedzi.
Gdy aplikacja klienta nie potrzebuje dłużej korzystać z usług SynTalka, kończy konwersację z serwerem DDE.
Poniżej podany został przykład makrokomendy dla edytora tekstu MS Word wykorzystującej syntezer do wypowiedzenia tekstu zawartego w bieżącym dokumencie. Komunikacja między aplikacjami odbywa się przez kanał DDE.Sub MAIN
channel = DDEInitiate("Syntalk", "System")
DDEPoke channel, "text", GetBookmark$("\Doc")
DDEExecute channel, "[read]"
DDETerminate channelEnd Sub
Pozdrawiam,
TrumpeT