Autor Beitrag
Tony-S
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 184
Erhaltene Danke: 6

Windows 7, XP, Ubtuntu
Delphi 7, Visual Basic.net
BeitragVerfasst: Mi 15.10.08 20:25 
Hallo Delphi Community ich hab eine kleine Frage.
- Ich habe mir einen sagen wir mal Mini Mp3 Player programmiert und bin jetzt auf das Problem gestoßen das ich keinen Song öffnen/abspielen kann.

Hier mal das Problem in Bildern:

Moderiert von user profile iconNarses: Bild als Anhang 1 hochgeladen
(der Fehler, der auftritt).

Moderiert von user profile iconNarses: Bild als Anhang 2 hochgeladen
(und hier der Pfad..)

Ich denke/dachte eigentlich das der Pfad so richtig ist, wie ich ihn in Delphi geschrieben habe.
Wäre nett wenn man mir da weiterhelfen könnte.


Moderiert von user profile iconGausi: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am Mi 15.10.2008 um 21:50
Einloggen, um Attachments anzusehen!
Xentar
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 2077
Erhaltene Danke: 2

Win XP
Delphi 5 Ent., Delphi 2007 Prof
BeitragVerfasst: Mi 15.10.08 20:28 
Du könntest damit anfangen, das Gleichheitszeichen rauszunehmen, sowie Musik statt Music zu schreiben.

_________________
PROGRAMMER: A device for converting coffee into software.
Tony-S Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 184
Erhaltene Danke: 6

Windows 7, XP, Ubtuntu
Delphi 7, Visual Basic.net
BeitragVerfasst: Mi 15.10.08 20:38 
das mit dem Music --> Musik hatte ich schon geändert und := änderte ich auch zu :
ausblenden Delphi-Quelltext
1:
2:
3:
MediaPlayer1.Close;
MediaPlayer1.FileName := 'c:\Benutzer\Spegel\Musik\Jenny.mp3';
MediaPlayer1.Open;

es tritt aber noch immer derselbe Fehler auf :o

Moderiert von user profile iconNarses: Delphi-Tags hinzugefügt
Gausi
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8554
Erhaltene Danke: 481

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: Mi 15.10.08 20:47 
Unter Vista sind einige der Pfade nicht so, wie sie im Explorer angezeigt werden. Der Benutzerordner gehört dazu. Klick mal im Explorer auf den Pfadnamen oben in der Leiste, dann sollte da der "echte Pfad" stehen.

Aber: Derart hardgecodete Dateinamen haben in einem richtigen Programm natürlich nichts zu suchen - für Testzwecke mag das gehen, darüber hinaus nicht.

_________________
We are, we were and will not be.
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 19346
Erhaltene Danke: 1754

W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
BeitragVerfasst: Mi 15.10.08 20:47 
Ich rate mal ins Blaue:
Unter Vista ist C:\Benutzer nur eine "lokalisierte Anzeige" (ist ja egal wie genau) von C:\Users und so ist es bei anderen auch. Hast du es mal mit einem OpenDialog versucht, der Pfad daraus geht vielleicht? Ansonsten schau mal was der echte Pfad ist und probiere den.

Dass es da Probleme in der Hinsicht gibt habe ich schonmal gemerkt, allerdings direkt im Windows Explorer (!) schon.
Fabian E.
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 554

Windows 7 Ultimate
Visual Studio 2008 Pro, Visual Studion 2010 Ultimate
BeitragVerfasst: Mi 15.10.08 20:48 
Unter Vista ist es leider so, dass der Benutzername nicht immer der Pfad-Name ist. Sobald du nämlich deinen Benutzernamen änderst wird der Ordner Pfad nicht geändert, der Name allerdings schon. Heißt soviel wie dass du davon nichts mitbekommst. Hast du schonmal versucht die Datei von einem anderen Ort zu öffnen?

EDIT: @jaenicke: Genau so ist es.
Tony-S Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 184
Erhaltene Danke: 6

Windows 7, XP, Ubtuntu
Delphi 7, Visual Basic.net
BeitragVerfasst: Mi 15.10.08 21:00 
user profile iconjaenicke hat folgendes geschrieben:
Ich rate mal ins Blaue:
Unter Vista ist C:\Benutzer nur eine "lokalisierte Anzeige" (ist ja egal wie genau) von C:\Users und so ist es bei anderen auch. Hast du es mal mit einem OpenDialog versucht, der Pfad daraus geht vielleicht? Ansonsten schau mal was der echte Pfad ist und probiere den.

Dass es da Probleme in der Hinsicht gibt habe ich schonmal gemerkt, allerdings direkt im Windows Explorer (!) schon.

Moderiert von user profile iconNarses: Bild als Anhang hochgeladen
Das müsstest du doch meinen oder

ausblenden Delphi-Quelltext
1:
MediaPlayer1.FileName:='C:\Users\Spegel\Musik\Jenny.mp3';					

Haut aber immernoch nicht hin, was du mit OpenDialog meinst weis ich jetzt nicht :D.... naja irgendwo is da noch der Wurm drinn

Moderiert von user profile iconNarses: Zitat kenntlich gemacht
Moderiert von user profile iconNarses: Delphi-Tags hinzugefügt
Einloggen, um Attachments anzusehen!
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 19346
Erhaltene Danke: 1754

W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
BeitragVerfasst: Mi 15.10.08 21:02 
Die Datei heißt "12 Jenny.mp3" ...
Dunkel
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 682

Mac OS X Snow Leopard
Xcode 3.1
BeitragVerfasst: Do 16.10.08 01:00 
Hallo und willkommen im Forum!

Benutz, statt dem hardgecodeten Pfad zur Datei, lieber den TOpenDialog, und lass den Benutzer die Datei auswählen. Erstens kommst Du dann nicht in die Bredouille, dass der Pfad zur Datei nicht stimmt. Zweitens ist ein MP3-Player, so klein er auch sein mag, auf die Dauer ziemlich eintönig, wenn immer nur ein und die Selbe Datei abgespielt wird... :wink:

_________________
Ich streite einsam mich mit dieser Oberflächenwelt
Gutes sei ein löblich Brot von dem ich zehre - bis zum Tod [Das Ich - Im Ich]
Tony-S Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 184
Erhaltene Danke: 6

Windows 7, XP, Ubtuntu
Delphi 7, Visual Basic.net
BeitragVerfasst: Do 16.10.08 15:29 
Erstmal danke an euch, besonders weil mir so schnell geholfen werden konnte ^^. Wie das mit TOpen... geht schau ich einfach mal :D .
Tony-S Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 184
Erhaltene Danke: 6

Windows 7, XP, Ubtuntu
Delphi 7, Visual Basic.net
BeitragVerfasst: Do 16.10.08 22:34 
Wie ihr wisst hat das ja ganz gut geklappt mit dem abspielen des einen Songs, also hab ich mich mal drann gesetzt und im Form nachgeschaut wie das mit TOpen so geht leider etwas erfolglos..;

Den Abschnitt hier habe ich mir mal kopiert, weil es ja nicht viel mehr zu sein scheint.

procedure TForm1.Button1Click(Sender: TObject);
begin
OpenDialog.Filter:='mp3 files (*.mp3)|*.mp3'; //Filtert mp3-Dateien heraus

if OpenDialog.Execute=True then
begin
MediaPlayer1.FileName:=OpenDialog.FileName; //weißt ausgewählte Datei dem mediaplayer zu
MediaPlayer1.Open; //mediaplayer läd datei
end;
end;

////////////////////////////////////////////////////////////////////////////////////////////////////

Hab dazu ein paar kleine Fragen..:
OpenDialog.Filter:='mp3 files (*.mp3)|*.mp3'; //von wo werden diese mp3 gefiltert und was muss man angeben.
MediaPlayer1.FileName:=OpenDialog.FileName; //was genau muss man hinschreiben?; muss man jedes "Filename" also auch das vor dem Zuweisungszeichen durch den
//Ordnernamen ersetzen?

Über die Procedure um die datein zu öffnen muss ja noch dieses hier "OpenDialog: TOpenDialog;"
OpenDialog: TOpenDialog;
procedure Button1Click(Sender: TObject);

WENN ich jetzt das Programm kompilieren will erhalte ich diesen Fehler:
FieldForm1.OpenDialog does not have a corresponding Component. Remove declaration?

Was bedeutet denn dieser Fehler bzw was hab ich noch falsch; wäre nett wenn ihr mir das erklären/zeigen könntet was flasch is.
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 19346
Erhaltene Danke: 1754

W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
BeitragVerfasst: Do 16.10.08 22:37 
Du musst die Komponente TOpenDialog auf das Formular packen und nicht oben nur eine Variable hinschreiben, die so heißt ;-).
Tony-S Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 184
Erhaltene Danke: 6

Windows 7, XP, Ubtuntu
Delphi 7, Visual Basic.net
BeitragVerfasst: Do 16.10.08 22:41 
Achso lol ^^ muss man erstmal wissen :D, unter welcher Rubik find ich denn das gute Ding?
Xentar
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 2077
Erhaltene Danke: 2

Win XP
Delphi 5 Ent., Delphi 2007 Prof
BeitragVerfasst: Do 16.10.08 22:43 
Dialoge.. (welch eine Überraschung)
Man kann in der Komponentenpalette übrigens auch suchen - einfach den Namen, also z.B. TOpenDialog eintippen.

_________________
PROGRAMMER: A device for converting coffee into software.
Tony-S Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 184
Erhaltene Danke: 6

Windows 7, XP, Ubtuntu
Delphi 7, Visual Basic.net
BeitragVerfasst: Do 16.10.08 22:48 
sorry -_- das ich Frage, aber unter Search finde ich so etwas nicht, is ja leider auch alles auf Englisch. Und in diesem Feld wo man etwas eintippen könnte kann man wohl nicht suchen; meine Hilfefunktion geht zb unter Vista gar nicht. Unter wlecher Rubrik ist die Komponente denn?


Habe das Missverstanden mit "Dialoge"
pickhost.gentoo64.ne.../0001/3564/TOpen.jpg

ich seh den Raster Dialoge allerdings auch nirgends ...


Zuletzt bearbeitet von Tony-S am Do 16.10.08 22:57, insgesamt 1-mal bearbeitet
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 19346
Erhaltene Danke: 1754

W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
BeitragVerfasst: Do 16.10.08 22:56 
user profile iconTony-S hat folgendes geschrieben Zum zitierten Posting springen:
sorry -_- das ich Frage, aber unter Search finde ich so etwas nicht, is ja leider auch alles auf Englisch.
Der Name TOpenDialog hat doch mit der Sprache nix zu tun? Da verstehe ich nicht was du meinst ;-).

user profile iconTony-S hat folgendes geschrieben Zum zitierten Posting springen:
Und in diesem Feld wo man etwas eintippen könnte kann man wohl nicht suchen; meine Hilfefunktion geht zb unter Vista gar nicht.
www.microsoft.com/do...B&displaylang=de ;-)

user profile iconTony-S hat folgendes geschrieben Zum zitierten Posting springen:
Unter wlecher Rubrik ist die Komponente denn?
user profile iconXentar hat folgendes geschrieben Zum zitierten Posting springen:
Dialoge.. (welch eine Überraschung)
Also auf englisch Dialogs.
Tony-S Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 184
Erhaltene Danke: 6

Windows 7, XP, Ubtuntu
Delphi 7, Visual Basic.net
BeitragVerfasst: Do 16.10.08 23:13 
OK nach langem Suchen hab ichs jetzt doch gefunden aufn 22" is halt alles so klein, nee Spaß; hab jetzt nur noch das Problem mit dem Fehler das Filename nicht deklariert is.. muss ich da einen bestimmten Ordner angeben?
Xentar
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 2077
Erhaltene Danke: 2

Win XP
Delphi 5 Ent., Delphi 2007 Prof
BeitragVerfasst: Do 16.10.08 23:16 
user profile iconTony-S hat folgendes geschrieben Zum zitierten Posting springen:
sorry -_- das ich Frage, aber unter Search finde ich so etwas nicht, is ja leider auch alles auf Englisch. Und in diesem Feld wo man etwas eintippen könnte kann man wohl nicht suchen; meine Hilfefunktion geht zb unter Vista gar nicht. Unter wlecher Rubrik ist die Komponente denn?


Habe das Missverstanden mit "Dialoge"
pickhost.gentoo64.ne.../0001/3564/TOpen.jpg

ich seh den Raster Dialoge allerdings auch nirgends ...

Scroll mal nach rechts.
Wieso hast du Delphi eigentlich auf Englisch..?

Und das, wo du eintippen wolltest, ist kein Suchfeld, sondern die Auswahl des Desktops ;) Mach mal rechtsklick auf die Komponentenpalette, dann Eigenschaften (also Properties?). Da scrollst du mal im linken Bereich nach unten, da müsste sowas wie "All" stehen. Auswählen, und dann im rechten Bereich per Klick nach Namen sortieren.
Ist etwas umständlich, aber nun hast du alle Komponenten nach Namen sortiert, und kannst in Ruhe suchen.

_________________
PROGRAMMER: A device for converting coffee into software.
Xentar
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 2077
Erhaltene Danke: 2

Win XP
Delphi 5 Ent., Delphi 2007 Prof
BeitragVerfasst: Do 16.10.08 23:18 
user profile iconTony-S hat folgendes geschrieben Zum zitierten Posting springen:
OK nach langem Suchen hab ichs jetzt doch gefunden aufn 22" is halt alles so klein, nee Spaß; hab jetzt nur noch das Problem mit dem Fehler das Filename nicht deklariert is.. muss ich da einen bestimmten Ordner angeben?

Ich rate mal: Du hast Opendialog.Filename stehen, obwohl die Komponente OpenDialog1 heißt. Ansonsten, code zeigen.

_________________
PROGRAMMER: A device for converting coffee into software.
Tony-S Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 184
Erhaltene Danke: 6

Windows 7, XP, Ubtuntu
Delphi 7, Visual Basic.net
BeitragVerfasst: Do 16.10.08 23:21 
Nee so schlau war ich schon selber :D

procedure TForm1.Button1Click(Sender: TObject);
begin
OpenDialog1.Filter:='mp3 files (*.mp3)|*.mp3' ; //Filtert mp3-Dateien heraus

if OpenDialog1.Execute=True then
begin
MediaPlayer1.Filename:=Filename; //weißt ausgewählte Datei dem mediaplayer zu
MediaPlayer1.Open; //mediaplayer läd datei
end;
end;


end;

Filename is halt nicht deklariert, gibt es mir als Fehler an.