Webcam in Delphi-Projekte einbinden

Beschreibung

Mit diesem Code kann das Bild einer Webcam (oder einer anderen Videoquelle) ein eine Delphi-Anwendung (Delphi7) eingebunden werden.
Vorraussetzung ist lediglich ein zum Gerät installierter WDM-Treiber.

Hinweise

Der Code enthält ein Demo-Projekt, welches das Videosignal der zuletzt verwendeten Videoquelle anzeigt.
Um eine andere Quelle auszuwählen einfach erneut auf 'Start' klicken - es öffnet sich dann ein Auswahlfenster.

Das Projekt benutzt eine nicht von mir erstellte Unit "CAM" - leider weiß ich hier jedoch die Herkunft nicht mehr mit Sicherheit. Wem die betreffende Unit bekannt vorkommt, der kann mir gerne die Quelle nennen...

Sprachausgabe mit MS Speech API in Delphi

Beschreibung

Dieses Codeschnipselchen zeigt wie mit minimalem Aufwand Sprachausgabe mit Delphi realisiert werden kann.

Vorbereitung

Um Sprachausgabe mit Delphi zu realisieren, muss das Microsoft Speech API SDK auf dem Rechner installiert sein.
Es steht hier zum Download: Speech API SDK (68 MB)

Minimal-Variante

Nach der Installation ist die Verwendung in Delphi ein Kinderspiel, wie dieses kurze und ganz simple Codeschnipselchen demonstriert:

Mehr Möglichkeiten mit ActiveX

Alternativ kann die Sprachausgabe auch als AcitveX-Komponente in Delphiprojekte integriert werden, was mehr Möglichkeiten (z.B. Auswahl der Stimme) bietet.
Dazu in Delphi im Menü den Punkt "Komponente" anwählen und hier "ActiveX importieren" anklicken.
Im darauf erscheinenden Auswahlfenster "Microsoft Voice Text" (Vtext.dll) installieren.
Daraufhin wird eine neue ActiveX-Komponente in die Komponentenliste eingefügt namens TTextToSpeech.
Mit TextToSpeech1.speak('This is what your computer says'); können nun Widestrings ausgesprochen werden.
Die Wahl der Ausgabestimme erfolgt beispielsweise mit TextToSpeech.select(i);, wobei i die Nummer des Sprechers angibt.
Auch zwei deutsche Stimmen stehen hier zum Download: lhttsged.exe (2.2 MB)
Alternative Quelle: lhttsged.exe (2.2 MB)