Delphi Sounds Problem

[Windowscratcher]

@Dalai Okay, danke für die Erklärung Werde es mal gleich ausprobieren.

[Windowscratcher]

@Dalai Okay, hab den Code hinzugefügt und es passiert nichts neues. Würde das jetzt heißen, dass kein Pfad erstellt wird?

[Dalai]

Zitat von Windowscratcher:

@Dalai Okay, hab den Code hinzugefügt und es passiert nichts neues.

Das kann nicht sein. Die erzeugte Dialogbox mit dem Pfad der abzuspielenden Datei muss in jedem Fall auftauchen, völlig egal, ob letztere existiert.

Zitat:

Würde das jetzt heißen, dass kein Pfad erstellt wird?

Ein Pfad wird gar nicht erstellt. Es wird ein String zusammengebaut aus Einzelteilen und das Resultat benutzt.

MfG Dalai

[Windowscratcher]

Sollte das bei Programmstart angezeigt werden? Bei mir tut sich nichts... Kann ich das auch mit dem Befehl "Panel2.Caption:='...'" machen ?

[p80286]

Zitat von himitsu:

@p80286:

Ich weiß nicht wie es in Lazarus aussieht, aber
geh im Delphi mal in die Projektoptionen, aktiviere dort "Mit Debug-DCUs kompilieren" und nun schau was bei deinem F7 passiert.

Hab ich Blödsinn geschrieben?
Debug-DCUs hab ich nicht aber Linker: DCUs erzeugen reicht doch?

Ein Programm"start" mit F8 stept brav durch die DPR

Delphi-Quellcode:

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.Run;
end.

Sobald der Cursor in Application.Run; steht F7 und ich bin in meinem eigenen Geschreibsel.

?Lazarus? damit hab ich (noch) nichts am Hut.

Zitat von Windowscratcher:

Sollte das bei Programmstart angezeigt werden? Bei mir tut sich nichts... Kann ich das auch mit dem Befehl "Panel2.Caption:='...'" machen ?

Sobald der String mit dem Pfadnamen erstellt ist sollte ein Meldungsfenster aufgehen und den Pfadnamen anzeigen. Ist das nicht der Fall, wird PlayMySound nicht aufgerufen.

Gruß
K-H

[Windowscratcher]

@p80286: Ich find die Option nicht... Ich habe jetzt aber den Befehl "ShowMessage(FilePath) Mal VOR den "IF" Satz getan und siehe da: Er erscheint. Wenn er aber im IF Satz steht, passiert nichts. Was muss ich jetzt machen?

[BUG]

Bist du dir sicher, das der Pfad und die Datei wirklich existieren?
Was steht in der Message?

[Windowscratcher]

[Window Title]
project1

[Content]
C:\Users\Filip\Documents\Schule\Physik und Technik\Physik und Technik\PT-Projekt\Programm\Modem.wav

[OK]

@BUG Das steht in der Message. Eigentlich der Dateipfad, wo die Datei enthalten ist. Ich versteh es echt nicht...

[Dalai]

Zitat von Windowscratcher:

Ich habe jetzt aber den Befehl "ShowMessage(FilePath) Mal VOR den "IF" Satz getan und siehe da: Er erscheint. Wenn er aber im IF Satz steht, passiert nichts.

Ich hab den Code doch genau so gegeben. Die Anweisung ShowMessage steht vor der if-Bedingung. Insofern verstehe ich das Problem nicht.

Zitat:

[Window Title]
project1

[Content]
C:\Users\Filip\Documents\Schule\Physik und Technik\Physik und Technik\PT-Projekt\Programm\Modem.wav

[OK]

@BUG Das steht in der Message. Eigentlich der Dateipfad, wo die Datei enthalten ist. Ich versteh es echt nicht...

Ist das Verzeichnis "Physik und Technik" wirklich doppelt? Was passiert, wenn du genau diesen Pfad (ohne den Dateinamen Modem.wav) in die Adresszeile des Explorers kopierst und bestätigst?

MfG Dalai

[Windowscratcher]

@Dalai Der Dateipfad ist richtig, habs mit dem Explorer ausprobiert. Und sorry, dann hab ichs ausversehen nach dem IF Satz hingeschrieben