Wave in Mp3 konvertieren

[KahPee]

Hallo,

ich habe vor Sound von der Soundkarte aufzunehmen und diesen Sound hinterher in einer mp3-Datei abzuspeichern. Momentan habe ich den Schritt vom Sound zur Wave-Datei gelöst (Delphi Soundaufnehmen). Aber bei dem zweiten Schritt hapert es. Wie bekomme ich das mit der LAME-Unit hin nun aus der abgespeicherten Wave-Datei eine mp3 zu machen?

Vielen Dank schon mal im Voraus

KahPee

[Matze]

Hallo,

die Dll ist meines Wissens schlecht/kaum dokumentiert.
Du könntest die lame.exe nehmen und mit diversen Parametern steuern oder vielleicht hilft die MP3export.pas aus dem tar.gz-Archiv in /Dll/MP3export.pas

Darin findet sich diese Prozedur:

Delphi-Quellcode:

//MP3export.pas
Procedure EncodeWavToMP3(fs, fd: Integer);

Vielleicht macht sie schon das gewünschte.

[KahPee]

Was muss ich mir unter den Variablen fs und fd vorstellen? Ich müsste doch eigentlich irgendwo angeben wo die Wave-Datei liegt...

Edit: Hab mir das angeguckt. Die Procedure alleine reicht nicht. Hat jemand ansonsten nen Beispiel wie das geht? mit der Lame datei?

[Matze]

Vielleicht fs = FileSouce und fd = FileDestination?

Versuche zu verstehen, was die Prozedur macht. Sie sieht recht klein aus. ;)

Was kommen den für Fehlermeldungen?

[mkinzler]

Schau dir mal den Source von RazorLame an

[KahPee]

Zitat:

Zitat von Matze (Beitrag 1048766)

Vielleicht fs = FileSouce und fd = FileDestination?

Versuche zu verstehen, was die Prozedur macht. Sie sieht recht klein aus. ;)

Was kommen den für Fehlermeldungen?

Hatte auch erst an sowas gedacht, aber Fs und FD sind Integerwerte.. da kann man dann wohl schlecht Strings eingeben.

Kahpee

[Matze]

Stimmt, das lässt sich ja vorne und hinten nicht kompilieren.
Schaue dir lieber Markus' Empfehlung an. Vielleicht klappt's damit.

[KahPee]

Mh das von Markus hilft mir auch nicht weiter... da ich da nicht durchsteige XD Das ist viel zu viel Text.. Hat das noch niemand mit Delphi gemacht? Letztendlich müsste das doch nur eine Funktion sein mit unterschiedlichen Parametern sein..


mfg Kahpee

Edit:Ich glaube es würde schon reichen, wenn ich die Lame.exe mit bestimmten Parametern aufrufe wie macht man das mit Delphi? Hab gesehen, dass ich da auch shcon MP3-Tags einfließen lassen kann. D.H. ich müsste Input directory und outputdirectory angeben und anschließend noch MP3 Tags eingeben.

Edit2: Hab das Problem so mit

Delphi-Quellcode:

ShellExecute(Application.Handle,'open',PChar( ExtractFilePath(ParamStr(0)) +'lame.exe'),
  PChar('--silent -h -b 96 "C:\Source.mp3" "C:\Dest.mp3"'), Nil, SW_HIDE);

gelöst

[Wishmaster]

Hi

warum nimmst du nicht einfach eine existierende Lösung wie die bass.dll + bassenc.dll oder
NewAC? Ich persönlich benutze die bass.dll + lame_enc.dll

[krzyk_91]

Hallo,

ich wüßte gerne, wie man mit Bass.dll wav zu mp3 konvertiert. Ich habe im Forum nachgeschlagen, aber ich habe die richtige Antwort nicht gefunden. Könnte jemand eklären, wie man das hinkriegt. Die Zeile:

Delphi-Quellcode:

BASS_Encode_Start(channel, 'lame --alt-preset standard - C:\Users\Krzysztof\Desktop\datei.mp3', 0, nil, 0);

funktioniert leider nicht. Im Ordner befindent sich die lame-dateien. Kann jemand helfen? Danke im Voraus