در خواست برنامه متن به گفتار text to speech با دلفی

[reza.majazi]

برنامه تبدیل متن به گفتار با دلفی رو می خواستم یه چیزی شبیه به speech ویندوز

البته نمی خوام پیشرفته باشه در هر سطحی باشه مشکلی نداره (حتی اگه نتونه جمله کامل رو بخونه و فقط بتونه کلمه به کلمه بخونه) بازم مشکلی نیست .

تازه کار بادلفی رو شروع کردم

چند تا سوال هم دارم

این که باید برای هر کلمه باید یک صدا داشته باشم (مثلا برای تلفظ a باید ) باید همچین تلفظی داشه باشم که اگه کاربر a رو وارد کرد و Ok رو زد برابر با اون تلفظ بشه .


یا این که خود دلفی چنین امکاناتی به صورت اماده داره .


باید از Memo تو فرمم اسفاده کنم یا RichEdit


لطفا در سطح مبتدی توضیح بدین



تا 30/3 /87 این برنامه رو لازم دارم


تشکر

[soldier]

سلام

یک تابع Api هست که این کارو انجام میده...

اما یادم رفته، اگر پیداش کردم حتمآ میزارم...


تاپیک های مشابه :


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

[F A R H A D]

سلام
تازه وارد ميبينم!!! soldier جان بابا خيلي كم پيدايي، حالا مرد مباح خدمته شما چي


برنامه تبدیل متن به گفتار با دلفی رو می خواستم یه چیزی شبیه به speech ویندوز

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

[soldier]

سلام

خوب حالا ما تازه وارد شدیم بامرام؟

درگیر امتحانات و مسائل دیگه بودم...

در کل خدمتتون هستیم...


موفق باشی

[reza.majazi]

دستت درد نکنه فرهاد اگه ممکنه کمی بیشتر توضیح بده گفتم که دلفی رو بلد نیستم (دارم یاد می گیرم)

باید چه چیزاای تو فرم بزارم و...

مبتدی لطفا

تشکر

[reza.majazi]

من فقط تا 3/30 وقت دارم و...

[mojtaba-design]

سلام فرهاد جان خوبي
ميگم كدت خرايه.چرا؟
چون بايد يك چيزي به uses اضافه شه
خودت يك چك كن

[reza.majazi]

اقا اگه ممکنه یکی جواب منو بده

[skmkh6056]

اقا اگه ممکنه یکی جواب منو بده

مسیر زیر را طی کنید
file\new\aplication
از تب استاندارد روی مواردی که در زیر اسمشونو مینویسم دابل کلیک کن("Edit , Button")
حال روی button دابل کلیک کن و کد زیر را توش کپی کن
کد زیر را قبل ار begin
var
MyVoice: OLEVariant;
و کد زیر را بعد از begin
MyVoice := CreateOleObject('SAPI.SpVoice');
if not(trim(Edit1.Text)='') then
MyVoice.Speak(trim(Edit1.Text), 0);

و کد زیر را در قسمت بالای کدهات جزو عضوهای uses قرار بده
, ComObj
حال f9 را بزن و روی button کلیک کن و از اسپیکر گوش بده
موفق باشی

[F A R H A D]

بايد يك چيزي به uses اضافه شه
درسته من فراموش كردم

و کد زیر را در قسمت بالای کدهات جزو عضوهای uses قرار بده
, ComObj

[reza.majazi]

مسیر زیر را طی کنید
file\new\aplication
از تب استاندارد روی مواردی که در زیر اسمشونو مینویسم دابل کلیک کن("Edit , Button")
حال روی button دابل کلیک کن و کد زیر را توش کپی کن
کد زیر را قبل ار begin
var
MyVoice: OLEVariant;
و کد زیر را بعد از begin
MyVoice := CreateOleObject('SAPI.SpVoice');
if not(trim(Edit1.Text)='') then
MyVoice.Speak(trim(Edit1.Text), 0);

و کد زیر را در قسمت بالای کدهات جزو عضوهای uses قرار بده
, ComObj
حال f9 را بزن و روی button کلیک کن و از اسپیکر گوش بده
موفق باشی



واقعا دستت درد نکنه رفیق (خیلی حال دادی ) :46:

[maysam1366]

سلام . میخواستم بدانم میشه تبدیل متن به گفتار را با استفاده از میکرو وزبان c انجام داد.

[CPUSatan]

1- از اونجایی که تازه کاری بهتره از ActiveXش استفاده کنی که یه کم درد سرش کمتره، این کد هم که دوستان برات گذاشتن اول اون ActiveX رو می سازه بعد ازش کار می کشه و کار جفتشون یکیه.
2- از اونجایی که OLE ها و ActiveX ها اینطور که تو دلفی پشتیبانی می شن توی سی و میکرو نمی شن، اگر هم بشه استفاده کرد اصلا به این آسونی نخواهد بود (منظورت که ویژوال سی نبود؟؟!!)

[مرد مباح]

یک سوال برای منم 1یش اومده.
اگه حرفه ای نباشی و بدون استفاده از اینAPI بخوای این کارو بکنی چه راهی داره ؟
و برعکس این کار چی؟ یعنی بخونی و تایپ کنه!!؟؟

توابعی برای آنالیزهای صوتی وجود داره ؟

[CPUSatan]

دیگه استفاده از این اکتیوایکسش راحت ترین کاره، اکتیو ایکسشو ایمپرت کن بعدش راحت مثل یه کامپوننت باهاش رفتار کن.

[مرد مباح]

چه کامپوننت یا ActiveX برای این کار وجود داره که بتونه اصوات را تفکیک کنه ؟
من چیزی نمیشناسم.

[Smoke_1110]

برنامه تبدیل متن به نوشتار فارسی کجا پیدا کنم ؟

[CPUSatan]

این اکتیو ایکس فقط برای تبدیل متن انگلیسی به گفتار. کاری با آنالیز صداها و غیره هم نداره..... کامپوننتی چیزی برای کار با صدا گیر آوردین من هم دنبالشم.