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;