Delphi调用OLE类实现TTS方式语音朗读 直接看代码: unit uMain; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Comobj, Dialogs, StdCtrls, RzButton; type TFrmMain = class(TForm) btnStart: TRzBitBtn; mmMsg: TMemo; procedure btnSta

1.windows7内置语音识别 2.文本到语音转换增加了 Microsoft Lili - Chinese(China) ,支持中英文混合朗读 3.女声.部分词组基本发音准确 以上让我有做个小程序的冲动:如下: 1.引入SpeechLib.dll 2.创建form 3.编写代码 ));             cbSpeechType.DataSource = list;         }         private void btnSpeechText_Click(object sen

delphi 每回升级都会遇到各种问题, 在安卓和windows下正常,ios遇到排版问题. 解决办法:将附件文件放至程序目录下. 百度网盘下载附件 链接: https://pan.baidu.com/s/1_lJNiFeR1iW5OpeCkxFaLw 提取码: 87dj

******************************* * 编 译 错 误 信 息 * ******************************* ';' not allowed before 'ELSE' ElSE前不允许有“;” '<clause>' clause not allowed in OLE automation section 在OLE自动区段不允许“<clause>”子句 '<name>' is not a type identifier

******************************* * 编 译 错 误 信 息 * ******************************* ';' not allowed before 'ELSE' ElSE前不允许有“;” '<clause>' clause not allowed in OLE automation section 在OLE自动区段不允许“<clause>”子句 '<name>' is not a type identifier

http://ljz9425.blog.163.com/blog/static/369148572008111635253858/ Delphi下的RTTI(下) 2008-12-16 15:52:53|  分类: Delphi |字号 订阅目 录===============================================================================⊙ GetTypeData 函数⊙ GetPropInfo 函数⊙ FindPropInfo

本文所推荐的书,我均仔细读过,受益良多. 1. Pascal 精要.下载Pascal精要 本书讲Pascal 语言基本知识. 2. Object Pascal 参考(中英文对照版).下载Object Pascal参考 本书讲面向对象Pascal 基础知识 3. Delphi 算法与数据结构.下载Delphi 算法与数据结构 本书讲:查找,排序,链表,队列等稍进阶的知识,强烈推荐! ----------------------------------------------------------

二维码生成delphi版 生成二维码的软件,代码从C语言转换过来(源地址:http://fukuchi.org/works/qrencode/),断断续续的差不多花了一周时间来转换和调试.在转换过程中学到了不少东西,特别是对于delphi和C语言中一些概念比较模糊的地方,有了更清楚地认识. 支持中英文文字生成二维码,在手机上使用快拍和微信扫描后显示正常,无乱码.在delphi 7 / delphi 2010 / delphi XE5上调试通过.qrencode的源代码为C语言,支持生成png格式

http://blog.csdn.net/span12/article/details/42522091 你只要记住 字符串使用变了.VCL 下面所有的 char 改 ansichar string 改 ansistring. array of char改为 array of ansichar wide 版本的不用变.移动开发下,请使用 tencdong 和 tbytes 处理所有字符串问题. delphi 升级到xe7后的一些个人经验(一)...慢慢更新中原创 2015年01月08日 11:1

Delphi程序调用C#.Net编译的DLL并打开窗体(详解)最近用C#.Net写了一个公用模块, 本以为仅提供给.Net程序使用, 但是领导要求把这些功能提供给旧系统使用, 天啦, 几套旧系统全是Delphi写的, 我不想再重复写一次,于是尝试编译成COM组件提供给Delphi调用．花了一下午研究技术, 结果很满意, 调试通过, 特分享受出来给大家学习. 实现步骤: 1.生成密钥文件用于给程序集强名称签名(必须)sn -k MyKey.snk 2.使用强名称签名的Key编译成类库Tester.

https://blog.csdn.net/fgrass_163/article/details/6365296 Delphi下利用WinIo模拟鼠标键盘详解 2011年04月26日 21:03:00 阅读数:1815 前言 一日发现SendInput对某程序居然无效,无奈只好开始研究WinIo.上网查了很多资料,发现关于WinIo模拟鼠标键盘的资料很少,有的也只是支言片语讲的不是很详细,而且大部分都是关于模拟键盘的.自己写了一些程序研究一方,经历了无数次的键盘死锁.鼠标满屏乱飞.复位重启,总算

http://blog.csdn.net/laorenshen/article/details/41148253 学习使用Delphi for android 调用Java类库 2014-11-15 18:36 1053人阅读 评论(0) 收藏 举报  分类: 安卓开发(27)  Android是一套非常优秀的移动端操作系统,Delphi Xe5中也能直接调用SDK中提供的各项API,但是delphi自己封装的AndroidAPI非常少,在安装目录的 source\rtl\android 中,而

uses Comobj; procedure TForm1.Button1Click(Sender: TObject); var voice: OLEVariant; begin voice := CreateOLEObject('SAPI.SpVoice'); voice.Speak('Hello World!', 0); end; Delphi_TTS_1 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Cl

输入 procedure TypeKeyString(s: string); var c: Char; i: integer; off: integer; vkw: Word; begin to Length(s) do begin c := s[i]; ) then begin vkw := VkKeyScan(c); off := ; = $ then keybd_event(VK_SHIFT, , off, ); = $ then keybd_event(VK_CONTROL, , off

好几天没写博客了,其实有好多需要总结的,因为最近一直在忙着做项目,但是困惑了几天的Smarty模板中截取包含中英文混合的字符串乱码的问题,终于解决了,所以记录下来,需要的朋友看一下: 出现乱码的原因: 对于字符串的截取,truncate函数只适合英文用户,对与中文用户来说,使用 truncate会出现乱码,而且对于中文英文混合串来说,截取同样个数的字符串,实际显示长度上却不同,一个中文的长度大致相当于两个英文的长度.此外,truncate不能同时兼容GB2312.UTF-8等编码. 解决方法:自

最近做个发邮件的功能,需要将日志文件通过邮件发送回来用于分析,但是日志文件可能会超级大,测算下来一天可能会有800M的大小.所以压缩是不可避免了,delphi中的默认压缩算法整了半天不太好使,就看了看7z,在windows下有dll那么就用它吧. 下载7z.dll,还有一个delphi的开发sdk文件,sevenzip.pas.有这两个就可以了. 压缩 使用超级简单 procedure TForm1.Button1Click(Sender: TObject); var Arch: I7zOutA

TTS, Text To Speech的缩写,是使用语音朗读文本的技术.目前,在国内应用较多的是排队叫号系统 Windows 平台的TTS,通常使用的是微软自带的 Speech API. Windows XP 自带的是 Speech API 5.1,默认是只支持英文的.如果要朗读中文,需要安装LangPack,里面支持简体中文,不过,是个男生的发音. 从Vista开始,默认自带的 Microsoft Speech API 5.3,效果好了很多,可惜不支持XP,郁闷 下面,说一下 C# 利用 TT

问题:FMX 在移动平台的文字显示并非由该平台的原生 API 来显示,而是由 FMX.TextLayout.GPU 来处理,也许是官方没留意到中文字符的问题,造成在中英文混排折行时,有些问题. 适用:这个修正适用在任何文字显示的函数及控件上,如:TText, TLabel, DrawText....等. 修正方法: 请将源码 FMX.TextLayout.GPU.pas 复制到自己的工程目录里,再进行修改. 找到代码: ].GetUnicodeCategory <> TUnicodeCateg

目       录 第十三章     中英文版本切换设计... 2 13.1        不用自带的资源文件的理由... 2 13.2        配置文件... 2 13.3        语言管理类... 3 13.4        应用管理类... 12 13.5        小结... 12 第十三章      中英文版本切换设计 13.1     不用自带的资源文件的理由 可以利用resx资源文件进行多语言设计,resx文件本身是kv类型的资源文件,设计好资源文件后,启动软件时可

针对返回结果为参数的 一. 先建立自己的存储过程 ALTER PROCEDURE [dbo].[REName] ) AS BEGIN select ROW_NUMBER() over(order by Name asc) as [序号], Name,Gender,Birthday,Mobile,Tel,Ctfld from dbo.name where Gender = @Gender OR @Gender IN ( NULL, '', '-1' ) END 二.打开delphi,先添加几个控件