AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia Delphi Mit bass.dll von .wav nach .mp3?
Thema durchsuchen
Ansicht
Themen-Optionen

Mit bass.dll von .wav nach .mp3?

Ein Thema von AlexII · begonnen am 23. Apr 2010 · letzter Beitrag vom 23. Apr 2010
Antwort Antwort
AlexII

Registriert seit: 28. Apr 2008
1.717 Beiträge
 
FreePascal / Lazarus
 
#1

Mit bass.dll von .wav nach .mp3?

  Alt 23. Apr 2010, 16:14
Suche schon die ganze Zeit wie ich eine .wav-Datei nach .mp3 konvertiere. Wie macht man das und ist lame_enc.dll vllt besser dafür geeignet? Wenn ja wie macht man das mit lame_enc.dll?

Thx!
Bin Hobbyprogrammierer! Meine Fragen beziehen sich meistens auf Lazarus!
  Mit Zitat antworten Zitat
AlexII

Registriert seit: 28. Apr 2008
1.717 Beiträge
 
FreePascal / Lazarus
 
#2

Re: Mit bass.dll von .wav nach .mp3?

  Alt 23. Apr 2010, 17:07
Hab inzwischen diese Lösung gefunden:

BASS_Encode_Start(chan, 'lame --alt-preset standard - output.mp3', 0, nil, 0); Wie konvertiere ich allerdings in 128kb/s oder am besten in der Bitrate welche die "chan" beträgt?
Bin Hobbyprogrammierer! Meine Fragen beziehen sich meistens auf Lazarus!
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#3

Re: Mit bass.dll von .wav nach .mp3?

  Alt 23. Apr 2010, 22:23
Schon mal daran gedacht im bass.dll Forum zu fragen oder dir mal die Demos/Doku anzugucken?
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
AlexII

Registriert seit: 28. Apr 2008
1.717 Beiträge
 
FreePascal / Lazarus
 
#4

Re: Mit bass.dll von .wav nach .mp3?

  Alt 23. Apr 2010, 22:48
Na was hast du denn gedacht? Ich sitze doch nicht und warte nur.

Hab das vor kurzem gelöst.

Delphi-Quellcode:
procedure TForm1.RecordClick(Sender: TObject);
var filename: String;
begin
filename:='file';
BASS_Encode_Start(chan, PChar('lame.exe -h - "' + filename + '.mp3"'), 0, nil, 0);
end;

procedure TForm1.StopClick(Sender: TObject);
begin
BASS_Encode_Stop(chan);
end;
Bin Hobbyprogrammierer! Meine Fragen beziehen sich meistens auf Lazarus!
  Mit Zitat antworten Zitat
Antwort Antwort


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 14:50 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