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

دوشنبه ۲۰ آبان ۱۳۹۲
بازدید ۵۹۹ نفر
نوآوران گرمی
(32 امتیاز از 9 رای)
Loading...

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

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

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

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

تکه کد سورس خواندن متن انگلیسی به زبان دلفی:

<span style="color: #ff0000;"><strong>جهت دریافت کد کامل این برنامه لطفا از بخش خرید محصول اقدام کنید</strong></span>
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, OleServer, SpeechLib_TLB, XPMan;

type
  TForm1 = class(TForm)
    Button1: TButton;
    SpVoice1: TSpVoice;
    Memo1: TMemo;
    XPManifest1: TXPManifest;
    Edit1: TMemo;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

begin
SpVoice1.Speak(Edit1.text,SVSFDefault) ;
end;

end.