Satzgenerator

[moritz]

Zitat:

Zitat von Jelly

ging ja fix... Auch einer von denen die tagtäglich im Forum rumhängen :lol:

Naja, hab nur mein Mailprogramm immer laufen. *g*

Gruß

Onz

[Stanlay Hanks]

Cool. Danke. Hab ich gar nicht gewusst, mit das dass so einfach geht.

Man liests ich Stanlay :bounce1:

[moritz]

Gerne geschehen. :cat:

[Stanlay Hanks]

:? Doch nicht so einfach... Ich zieh die Komponente Auf das Form, Mach nen Button und ein EditFeld: Dann geb ich beim onclick ereignis vom Button ein:

Delphi-Quellcode:

DirectSS1.Speak(Edit1.Text);

Dann drücke ich F9 und auf den Button und hab den schönsten OLE-Fehler.
"OLE-Fehler 80040302" Woran könnte das liegen. :?:

[Darty]

Mach doch ne neues Thema dazu auf .. Hier ging ja um was anderes oder nicht ? :roll:

[Stanlay Hanks]

Stimmt. Tschuldigung... :oops:

[nailor]

Der Sinn des Programms (das mittlerweile sogar schon in neueren Versionen vorliegt) ist einzig und allein einer: Spass

Das mit der Speech: Ich hab nirgends WINXP, so dass ich auch keinen Bedarf hab, es zu proggen...

[moritz]

Achso. Es sollte also einfach ein "J4F"-Programm werden.

[Alexander]

das mit dem spech ist wirklich nicht schwer, habe mich gerade mal hingesetz:

Code:

uses StdCtrls, Comobj;
[...]
procedure TForm1.Button1Click(Sender: TObject);
var
  voice: OLEVariant;
begin
  voice := CreateOLEObject('SAPI.SpVoice');
  voice.Speak(edit1.Text, 0);
end;

[Alexander]

@onz: was machen die beiden *.exe? Sind das nur beispiele?