Delphi-Quellcode:
type
TForm1 = class(TForm)
WaveOut1: TWaveOut; // 1
private
Output: TAuFileOut; // 2
end;
procedure TForm1.StarteAufnahme(Sender: TObject);
begin
Output := WaveOut1; // 3
end;
Ich hab mal den Code etwas gekürzt. Irgendwas kann da nicht stimmen oder man braucht einfach "Output" gar nicht (siehe 1, 2, 3).
Ansonsten hast du dir die Antwort ja schon selbst gegeben: Einfach eine weitere Instanz deiner Klasse nehmen und die Aufnahme starten. Nachdem die erste fertig ist mit dem Speichern, diese aus dem Speicher nehmen (.Free).
Bernhard