الاستفادة من خدمة موقع بالواب و جعلها في التطبيق
#1
السلام عليكم  ورحمة الله.
اسال هل يمكن الاستفادة من خدمة موقع بالواب مثال
كود :
http://naturalreaders.com/index.html
اي انشاء واجهة تطبيق خاصة بك بالدلفي  و عند الضغط على زر  بلاي. يقرا النص من خلال الموقع . 
باختصار  واجهة تطبيق خاصة بك  و التنفيد يكون عن طريق الموقع دون الحاجة لفتح الموقع .
جزاكم الله خير  ا.
الرد
#2
بعد التتبع وجدت

كود :
http://api.naturalreaders.com/v2/tts/?t=%22welcome%22&r=1&s=1&requesttoken=94350e95ced5bcd8ffa311d47eb68a9b
الرد
#3
(13-11-2015, 05:32 PM)onexite كتب : بعد التتبع وجدت
http://api.naturalreaders.com/v2/tts/?t=...d47eb68a9b
اشكرك onexite على ردك الصاروخي ..... Big Grin 
ولكنك فتحت شهيتي اكثر للاستزادة في الموضوع ...
اولا معارفي جد محدودة في هذا المجال  لذلك  رفقا .... هناك سيل من الاسئلة ... Huh
اولا كيف حصلت على الرابط اعلاه ؟ لقد نظرت في كود سورس الصفحة فلم اعثر له على اثر؟
ثانيا  لقد قمت بتغير  welcome و نجح الامر و لكن  المشكلة
. كيف استعمال  ما تفضلت به  في كود دلفي ...؟ ما عندي ولا فكرة ....تغير اللغة - التحكم في السرعة- ولما لا تحميل الصوت في ملف mp3...
إذا وجهتني  قليلا ساحاول  وضع مثال .... 
أشكرك مرة اخرى يا استاذ انت رائع حقا ......
الرد
#4
الخدمة متوقفة على معرف (requesttoken)  طريقة الحصول عليه اتبع الرابط التالي
http://api.naturalreaders.com/v2/auth/re...4048025914
ويكون الجواب من نوع json وعليه عليك استخدام requesttoken في الطلب الثاني
على كل حال لتشغيل الملف افتح netradio في الامثلة المرفقة ل bass
لتغيير اللغة و السرعة غير قيمة r,s من خلال الرابط

PHP كود :
procedure TForm1.Button1Click(Sender: TObject);
var
  ThreadId: Cardinal;
  const url ='http://api.naturalreaders.com/v2/tts/?t=%22hello%22&r=2&s=1&requesttoken=5f33ef69c95d535be2f63fdff33ff48e';
begin

  StrPCopy
(proxy,ed_ProxyServer.Text); // copy the Servertext to the Proxy array
  if (cthread <> 0) then
    MessageBeep
(0)
  else
    cthread := BeginThread(nil, 0, @OpenURL, PAnsiChar(url), 0, ThreadId);
end; 
الرد
#5
اشكرك كثيرا
الرابط الاول لم يعد يعمل !
ولم افهم  يبدو ان الامر متعلق اكثر بمعرفة html
كنت اود ان توجهني الى مواقع للتعلم  او اذا كان هناك مثال جاهز  
اشكرك على كل حال .
الرد
#6
البرنامج + السورس وهو يقوم بتحويل الكتابة الى صوت
وهذا الكود المستخدم

PHP كود :
var
  Form1: TForm1;
  chan: DWORD;
  Handle: THandle;

implementation

{$R *.dfm}


procedure TForm1.Button1Click(Sender: TObject);
var 
requesttoken:string;
 Url:AnsiString;
begin
requesttoken
:=IdHTTP1.Get('http://api.naturalreaders.com/v2/auth/requesttoken?callback=&appid=pelc790w2bx&appsecret=2ma3jkhafcyscswg8wgk00w0kwsog4s&_=1404048025914');
requesttoken:=StringReplace(requesttoken,'{"rst":"true","requesttoken":"','',[])  ;
requesttoken:=StringReplace(requesttoken,'"}','',[])  ;


 BASS_StreamFree(chan);
 Url:='http://api.naturalreaders.com/v2/tts/?t="'+Edit1.Text+'"&r=1&s=1&requesttoken='+requesttoken ;
 chan := BASS_StreamCreateURL(PChar (Url), 0, 0, nil, 0);

   if not BASS_ChannelPlay(chan, False) then
          Label4
.caption:='Error playing stream!' + #13#10 + '(error code: ' + IntToStr(BASS_ErrorGetCode) +')';


end;

procedure TForm1.FormCreate(Sender: TObject);
begin

  
if (not BASS_Init(-1, 44100, 0, Handle, nil)) then
  BASS_SetConfig
(BASS_CONFIG_NET_PLAYLIST, 1);

end; 
end


الملفات المرفقة
.rar   text2sound.rar (الحجم : 944.36 ك ب / التحميلات : 70)
الرد
#7
السلام عليكم
بارك الله فيك اخي onexite على البرنامج والسورس
الرابط الاول لا يشتغل على ما اظن
و ممكن تبسط لنا كيف حصلت على هدا الرابط
http://api.naturalreaders.com/v2/auth/re...lc790w2bx&
appsecret=2ma3jkhafcyscswg8wgk00w0kwsog4s&_=1404048025914
وبارك الله فيك
و من طلب العلوم بغير كد _________ سيدركها إذا شاب الغراب
الرد
#8
السلام عليكم
اشكرك اخي onexite نورت عقلي بالمثال السابق ولكن على كل حال هناك سيل من الاسئلة
1 كيف حصلت على الرابط ؟ وهذا هو المهم في رأيي هل هو نوع من القرصنة ؟
2 اين هو او ما هو bass؟؟؟؟
كما تلاحظ انا اجهل تماما التعامل مع المواقع و معارفي محدودة ولكني فهمت الكود الى حد ما
اشكرك على مجهودك وعلى صبرك .
الرد
#9
السلام عليكم
لقد عاودت النظر في الموضوع ولقد أضفت  و تتبعت إعدادات اللغة والسرعة في المثال الذي تفضل به الأخ الكريم onexite والذي ربما لإنشغاله لم يرد على سؤالي
المسألة كيف يمكن الحصول على الرابط أدناه لقد تتبعت كود الصفحة سطرا سطرا و لم أجد له أثرا ، مما جعلني أظن أن هناك برنامج خاص يساعد على ذلك بحثت في قوقل عن خيط ما لكن معارفي شحيحة , هل من مرشد؟
http://api.naturalreaders.com/v2/auth/re...lc790w2bx&
لانه مهم في معرفة requesttoken.


الملفات المرفقة
.rar   text2sound_bass_natural reader_site.rar (الحجم : 140.14 ك ب / التحميلات : 19)
الخوف من أي محاولة جديدة طريق حتمي للفشل.
الرد
#10
(05-08-2016, 05:19 PM)wadoud كتب : السلام عليكم
لقد عاودت النظر في الموضوع ولقد أضفت  و تتبعت إعدادات اللغة والسرعة في المثال الذي تفضل به الأخ الكريم onexite والذي ربما لإنشغاله لم يرد على سؤالي
المسألة كيف يمكن الحصول على الرابط أدناه لقد تتبعت كود الصفحة سطرا سطرا و لم أجد له أثرا ، مما جعلني أظن أن هناك برنامج خاص يساعد على ذلك بحثت في قوقل عن خيط ما لكن معارفي شحيحة , هل من مرشد؟
http://api.naturalreaders.com/v2/auth/re...lc790w2bx&
لانه مهم في معرفة requesttoken.
وعليكم السلام
لقد وجدت الموضوع بالصدفة وانا ابحث في المنتدى
هل مازلت تبحث عن حل؟
سبحان الله وبحمده سبحان الله العظيم
[-] كل من 1 user says قال شكرا ل Agmcz على المشاركة المفيدة
  • wadoud
الرد


التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 2 ) ضيف كريم