Wahnsinn dieses Feedback
So ich habe nun die Ratschläge angenommen und entsprechend angepasst:
Code:
const
conSoundxx = 'C:\Users\Sven\Documents\Embarcadero\Studio\Projekte\Soundbord\Sounds\xx.mp3';
procedure TTabbedForm.Button1Click(Sender: TObject);
begin
TTabbedForm.playSound(conSoundxx);
end;
procedure TTabbedForm.playSound(DataLink: string);
begin
MediaPlayer1.FileName := DataLink;
MediaPlayer1.Play;
end;
Die Variable "DataLink" gibt es nun nicht mehr global, die habe ich gelöscht.
Die wird doch jetzt nur noch local verwendet.
Das Problem, dass der Mediaplayer nicht bezeichnet ist, ist jetzt weg. Aber er mag die "Const" nicht.
Diese habe zu viele Parameter!?