[delphi] hmm pytanie chyba o wave [...]

0

hi, jak zapisac dzwiek z mikrofona do pliku wave juz wiem VIDE ponizszy kod

procedure TForm1.Button1Click(Sender: TObject);
begin
with MediaPlayer do
begin
  FileName := 'test.wav'; // nadanie nazwy
  Open;
  StartRecording; // rozpoczęcie nagrywania
end; 
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
with MediaPlayer do
begin
  Stop; // zatrzymanie nagrywania
  FileName := 'plik.wav'; // nadanie nowej nazwy pliku
  Save; // zapisanie...
  Close; // zamknięcie
end;

ale wyobrazcie sobei ze 1 min takiego nagrania wazy 1,5 mb ... = 10 min- 15 mb.. to jest dla mnei za duzo.... pytanie moje czy da sie w mediaplayer komponencie jakos ustalic stopien kompresji/ jakosci zeby
wielksoc byla mniejsza....potzrebuej nagrac okolo 15 min do jak najmniejszego pliku...
ad2. prezypomnialo mi sie powyzsze zapisywanie wymaga zeby zanim nagra byl tworzony plik WAV na ktorym bedzoe operowal.... mzona jakos taki plik stworzyc programowo??

0

Jeśli chodzi o kompresję wav'a to tylko poprzez obniżenie częstotliwości i ilości kanałów (czyli na mono). Możesz jeszcze przekonwertować na mp3 po nagraniu, gdybyś to robił w locie to nie nagrałby się dźwięk tak jak powinien. Trzeba zapisywać zawsze w jak najprostszym formacie, jeśli chcesz zapisywać na bieżąco. To też zależy od kompa, bo np. jak mamy kartę video to od bodajże Pentium III 600 MHz można było filmy zapisywać prosto do MPEG'a (czyli obraz skompresowany :) ), a nie do nieskompresowanego avi (czyli najprostszego formatu).

0

yhy czyli zapisac do wave ( swoja droga jak sterowc kanalem mono czy stereso-wybor) a pozniej do mp3 przerobic? jakies komponenty wskazowki ?? czekam na pomoc , pozdrawiam maja_pszczola

0

helo czy ktos mi pomzoe ;) ?

0

uzyj bibliotek lame zeby skompresowac do mp3

no chyba ze chcesz pisac sam kompresje, ale nie polecam

1 użytkowników online, w tym zalogowanych: 0, gości: 1