Hallo Zusammen,
um mich kurz vorzustellen,
ich habe seit 1 Jahr meine Ausbildung abgeschlossen und arbeite in der Firma mit Delphi 10.1
Nun aber auch privat da ich wirklich noch Anfänger bin. Ich habe nun ein Problem mit meinem Quellcode.
Ich bin mir sicher mein Problem ist für fortgeschrittene schnell zu lösen...
Ich möchte versuchen über eine "Click.Button" Funktion einen Sound abzuspielen.
Hierfür verwende ich eine Mediaplayer componente. (Das ganze wird eine Multiplattform Anwendung)
Wird der Button geclickt passiert folgendes:
Code:
procedure TTabbedForm.Button1Click(Sender: TObject);
begin
DataLink :=
('C:\Users\Sven\Documents\Embarcadero\Studio\Projekte\Soundbord\Sounds\xx.mp3');
playsound(DataLink);
end;
Ich möchte also den Link in einer Stringvariable übertragen und dem Procedure "playsound" übertragen. "DataLink" ist golbal angelegt
Hier nun die PlaySound procedure:
Code:
procedure PlaySound(VAR DataLink: string);
begin
MediaPlayer1.FileName := DataLink;
MediaPlayer1.Play;
end;
Nun kommt die Fehlermeldung MediaPlayer1.FileName sei ein Undeklarierter Bezeichner
Wenn ich die MediaPlayer1 funktionen gleich in der ButtonClick Procedure ausführe funktioniert alles ohne Probleme.
Hat vielleicht jemand einen Tipp?
Vielen Dank
Gruß