AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia Delphi Was gerade läuft aufnehmen
Thema durchsuchen
Ansicht
Themen-Optionen

Was gerade läuft aufnehmen

Ein Thema von sCrAPt · begonnen am 17. Aug 2003 · letzter Beitrag vom 27. Mär 2008
Antwort Antwort
Seite 1 von 3  1 23      
sCrAPt
(Gast)

n/a Beiträge
 
#1

Was gerade läuft aufnehmen

  Alt 17. Aug 2003, 04:18
Hi.
Wie kann ich aufnehmen was grad auf dem Rechner für Musik läuft? Aber ohne Micro...
  Mit Zitat antworten Zitat
Benutzerbild von flomei
flomei

Registriert seit: 17. Jan 2003
Ort: Schieder-Schwalenberg
2.094 Beiträge
 
Delphi 2005 Personal
 
#2

Re: Was gerade läuft aufnehmen

  Alt 17. Aug 2003, 14:00
Möchtest du einen Stream speichern oder Musik die von Festplatte abgespielt wird ?
Wenn du einen Stream speichern willst: Es gibt unzählige Programme die Streams z.B. als MP3 auf Platte speichern können. Such mal ein wenig auf www.download.com oder www.winload.de nach solchen Programmen. Ich bin mir sicher, dass du einige finden wirst.

MfG Florian
Florian Meier
... ist raus.
Vielen Dank für die Zeit mit euch!
http://www.flomei.de -- http://www.md5hash.de
  Mit Zitat antworten Zitat
Gandalfus

Registriert seit: 19. Apr 2003
407 Beiträge
 
Delphi 2006 Professional
 
#3

Re: Was gerade läuft aufnehmen

  Alt 17. Aug 2003, 14:14
Stichworte

bass.dll

mci
  Mit Zitat antworten Zitat
sCrAPt
(Gast)

n/a Beiträge
 
#4

Re: Was gerade läuft aufnehmen

  Alt 17. Aug 2003, 15:26
Ich möchte die aufnehmen die gerade auf dem Rechner läuft. egal ob beep; oder Winamp etwas spielt....
Bass.dll ist schön und gut, nur wenn ich das programm verkaufen möchte (das ich auch vor habe) muss ich ja 1000$ herblettern......
  Mit Zitat antworten Zitat
Gandalfus

Registriert seit: 19. Apr 2003
407 Beiträge
 
Delphi 2006 Professional
 
#5

Re: Was gerade läuft aufnehmen

  Alt 17. Aug 2003, 19:09
Privatpersonen nur 100 oder willst du das eine Firma verkaufen?

Ansonsten halt mal über MCI oder Directsound informieren.
  Mit Zitat antworten Zitat
sCrAPt
(Gast)

n/a Beiträge
 
#6

Re: Was gerade läuft aufnehmen

  Alt 17. Aug 2003, 23:32
Einer Firma
  Mit Zitat antworten Zitat
Benutzerbild von S - tefano
S - tefano

Registriert seit: 16. Dez 2002
Ort: Dülmen
477 Beiträge
 
Delphi 2009 Professional
 
#7

Re: Was gerade läuft aufnehmen

  Alt 17. Aug 2003, 23:52
Ich weiß nicht ob das nur bei Creative geht, oder ob man da einfach nur ne andere Lautstärkeregelungssoftware braucht, aber in der Lautstärkeregelung von Creative kann man als Aufnahme Quelle neben Mikrofon etc. auch "What you hear" auswählen.

Wie das allerdings geht, keine Ahnung. Aber wie gesagt, mit anderer Software für Lautstärkeregelung müsste dass ja eigentlich auch gehen.

Aber mit so Sachen wie der BassDLL oder FMOD müsste das auch gehen. Aber damit ist dein Problem mit der Lizensierung ja noch nicht gelöst. Und ich glaub nicht dass du sowas als Freeware findest selbst wenn dus verkaufen willst.

Wirst dir das also vermutlich selbermachen müssen... kann mir nicht vorstellen dass das einfach ist.

Bis dann,

S - tefano
"Sir, we are surrounded!" - "Excellent, we can attack in every direction!"
  Mit Zitat antworten Zitat
Benutzerbild von Matze
Matze
(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge
 
Turbo Delphi für Win32
 
#8

Re: Was gerade läuft aufnehmen

  Alt 19. Aug 2003, 20:40
Guten Abend!

Stichwort: overmoon

Was das ist? Also sowas...

Er hat RatRec programmiert, alles klar? Nicht? Dann schau mal hier:

http://www.delphipraxis.net/internal...ect.php?t=8515

Vielleicht kann er dir helfen.

Gruß Matze
  Mit Zitat antworten Zitat
Benutzerbild von overmoon
overmoon

Registriert seit: 8. Aug 2003
Ort: Passau
51 Beiträge
 
Delphi 6 Personal
 
#9

Re: Was gerade läuft aufnehmen

  Alt 20. Aug 2003, 17:24
Also Dinge aufnehmen geht mit Delphi und der Unit mmSystem richtig einfach.

Der Schlüssel ist die Prozedur "mciSendString". Über diese Prozedur kann man die Komplette Aufnahme des Wave-Files machen.

1.) Wir müssen ein Audiogerät öffnen. Ich nenne es einfach mal "mySound".

mciSendString('OPEN NEW TYPE WAVEAUDIO ALIAS mySound',nil,0,Handle); 2.) Nun müssen wir die Optionen für die Audioaufnahme einstellen. Da für gibt es einige Einstellungen:

- BitsPerSample (Wie genau wird ein analoger Wert abgetastet; meist 8 oder 16)

- Channels (Mono(1) oder Stereo (2))

- SamplesPerSec (Abtastungen pro Sekunde; 800,11025,22050,44100)

Damit wäre eigentlich alles angegeben, was man braucht. Damit es funktioniert, müssen noch zwei weitere Dinge angegeben werden. Lässt man diese weg, gibt es Probleme.

- BytesPerSec (= (BitsPerSample div 8)*Channels*SamplesPerSec )

- Alignment (= Channels*(BitsPerSample div 8) )

Die Prozedur zum Einstellen der Einstellungen sieht dann folgendermaßen aus:

Delphi-Quellcode:
mciSendString('SET mySound ' +
                   'TIME FORMAT MS ' +
                   'BITSPERSAMPLE 16 ' +
                   'CHANNELS 2 ' +
                   'SAMPLESPERSEC 44100 ' +
                   'BYTESPERSEC 176400 ' +
                   'ALIGNMENT 4',
                   nil,0,handle);
3.) Das Starten der Aufnahme:

Das folgende erklärt sich eigentlich von selbst:

mciSendString('RECORD mySound',nil,0,Handle); 4.) Genauso einfach ist das Stoppen der Aufnahme:

mciSendString('STOP mySound',nil,0,Handle); 5.) Nach erfolgter Aufnahme wollen wir die Datei natürlich nicht im Nirvana des OS verschwinden lassen... wir müssen sie speichern.

Das geht folgendermaßen:

mciSendString('SAVE mySound "c:\datei.wav"',nil,0,Handle);
6.) Schließlich muss man noch das Audiogerät "mySound", welches man am Anfang geöffnet hatte, schließen.

mciSendString('CLOSE mySound',nil,0,Handle); Und wir sind fertig mit der Aufnahme.

7.) Weitere Aufgaben, die man über "mciSendString" machen kann sind z.B. noch: PLAY, WAIT und LOAD
"Habe Mut, dich deines eigenen Verstandes zu bedienen." (Immanuel Kant)
  Mit Zitat antworten Zitat
Benutzerbild von overmoon
overmoon

Registriert seit: 8. Aug 2003
Ort: Passau
51 Beiträge
 
Delphi 6 Personal
 
#10

Re: Was gerade läuft aufnehmen

  Alt 20. Aug 2003, 17:30
Die Aufnahmen werden nur leider recht groß, deshalb macht sich eine Konvertierung zu Mp3 recht gut.

Dazu bietet sich der lame - Encoder an.

Den bekommst du hier:
http://lame.sourceforge.net/

Dort bekommst du die lame_enc.dll und die lame.exe .
Kannst du eigentlich nehmen, was du willst, konvertieren beide brav waves nach Mp3.

Die lame.exe musst du z.B. einfach mit entsprechenden Parametern aufrufen.


Zur Lizenz vom Lame_Ecoder:

Zitat:
Can I use LAME in my commercial program?

Yes, you can, under the restrictions of the LGPL. The easiest
way to do this is to:

1. Link to LAME as separate library (libmp3lame.a on unix or
lame_enc.dll on windows)

2. Fully acknowledge that you are using LAME, and give a link
to our web site, www.mp3dev.org

3. If you make modifications to LAME, you *must* release these
these modifications back to the LAME project, under the LGPL.
Klingt doch ganz gut, oder ?

overmoon
"Habe Mut, dich deines eigenen Verstandes zu bedienen." (Immanuel Kant)
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 3  1 23      


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:26 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz