Hallo und willkommen hier...
Ich würde das File als Konstante anlegen. Wenn du mal an verschieden Stellen den gleichen Sound hast, brauchtst nur die Konstante ändern.
Delphi-Quellcode:
const
conSoundBlubb = 'C:\Users\Sven\Documents\Embarcadero\Studio\Projekte\Soundbord\Sounds\spasti alter.mp3'
conSoundBla = 'C:\Users\Sven\Documents\Embarcadero\Studio\Projekte\Soundbord\Sounds\spasti neuer.mp3'
.
.
.
procedure TForm1.playSound(DataLink: string);
begin
MediaPlayer1.FileName := DataLink;
MediaPlayer1.Play;
end;
procedure TForm1.Button5Click(Sender: TObject);
begin
playSound(conSoundBla);
end;
.
procedure TForm1.Button6Click(Sender: TObject);
begin
playSound(conSoundBla);
end;
.
procedure TForm1.Button7Click(Sender: TObject);
begin
playSound(conSoundBlubb);
end;
PS: Gewöhne dir gleich zu Anfang an, vernünftige Bezeichnungen für die Komponenten, Variablen, Objekte etc. zu verwenden.