4. Suche dringend Hilfe bei Problem mit Radiobuttons und mpeg-Wiedergabe

Suche dringend Hilfe bei Problem mit Radiobuttons und mpeg-Wiedergabe

  • S

    Hallo...
    Sry, bin gestern auf meinem Schreibtisch schon weggepennt. 😞

    Also ich hab jetzt das ganze mal so gemacht, wie du gesagt hast, akari, also mit Arrays. Dann hab ich den Button "Simulationsdaten berechnen" entfernt und das ganze für die Ereignisse OnClick der Radiogroups eingefügt. Die RadioGroups wurden auch noch umbenannt:
    RadioGroup1 -> MOstaerkeGRP
    RadioGroup2 -> SRstaerkeGRP

    Rausgekommen is folgendes:

    void __fastcall TForm1::MOstaerkeGRPClick(TObject *Sender)
{
  MediaPlayer1->Eject();
  AnsiString FileName;
  FileName += "C:\\test\\MO" + Attrib[MOstaerkeGRP->ItemIndex];
  FileName += "C:\\test\\SR" + Attrib[SRstaerkeGRP->ItemIndex];
  FileName += ".mpeg";
  MediaPlayer1->FileName = FileName;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::SRstaerkeGRPClick(TObject *Sender)
{
  MediaPlayer1->Eject();
  AnsiString FileName2;
  FileName2 += "C:\\test\\MO" + Attrib[MOstaerkeGRP->ItemIndex];
  FileName2 += "C:\\test\\SR" + Attrib[SRstaerkeGRP->ItemIndex];
  FileName2 += ".mpeg";
  MediaPlayer1->FileName = FileName2;
}

    So.... Beim bauen krieg ich zumindest schonmal keinen Fehler mehr *freu*
    Allerdings spielt der MediaPlayer nun immer das gleiche Videofile ab. Er reagiert überhaupt nicht auf veränderungen ind den RadioGroups.
    Ich muss zu beginn in der MediaPlayer Komponente selbst eine Datei für die Eigenschaft FileName angeben, da sich das Projekt sonst nicht kompilieren lässt. Diese Datei, die hier angegeben wird ist es auch, die nun immer abgespielt wird.
    Kann es sein, dass die Eigenschaft FileName nicht überschreibbar ist und der MediaPlayer dann immer den Ausgangswert her nimmt?
    Leider hat mich das Lesen der Borland Hilfe auch nicht weiter gebracht.
    Die Dateien existieren alle und es bestehen auch keine Schreibfehler bei der Pfadangabe, oder so (min 1000x nachgeschaut).
    An was kann es denn sonst noch liegen, dass der MediaPlayer immer das gleiche Videofile abspielt?

    Simon

    P.S.: Das mit den Globals änder ich noch, wenn das Programm mal läuft...

    0
  • A

    Hallo

    Du must erstmal die möglicherweise bestehende Wiedergabe beenden und die neue danach auch startem

    MediaPlayer1->Close(); // Alte Wiedergabe beenden
  ...
  MediaPlayer1->FileName = ...; // Neue Datei zuweisen
  MediaPlayer1->Open(); // Neue Datei öffnen
  MediaPlayer1->Play(); // Wiedergabe starten

    außerdem brauchst du nicht zwei identische Methoden zur Auswahld er Datei, sondern kannst über den Objektinspektor beide Groupboxen auf ein und dieselbe Methode verweisen lassen.

    bis bald
    akari

    0
  • S

    Ich hab nun folgendes geändert:
    - Eigenschaft Visible der MediaPlayer Komponente auf false gesetzt
    - Einen Button mit dem Namen SimStartButt erstellt um die Wiedergabe zu starten
    - Das Verweisen der beiden RadioGruops auf dieselbe Methode mach ich ebenfalls, wenn das Programm mal läuft, da ich im Moment noch durchblick was das Programm macht (mehr oder weniger) 🙂

    Naja rausgekommen is folgendes:

    void __fastcall TForm1::MOstaerkeGRPClick(TObject *Sender)
{
  AnsiString FileName;
  MediaPlayer1->Close();
  FileName += "C:\test\MO" + Attrib[MOstaerkeGRP->ItemIndex];
  FileName += "C:\test\SR" + Attrib[SRstaerkeGRP->ItemIndex];
  FileName += ".mpeg";
  MediaPlayer1->FileName = FileName;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::SRstaerkeGRPClick(TObject *Sender)
{
  AnsiString FileName2;
  MediaPlayer1->Close();
  FileName2 += "C:\test\MO" + Attrib[MOstaerkeGRP->ItemIndex];
  FileName2 += "C:\test\SR" + Attrib[SRstaerkeGRP->ItemIndex];
  FileName2 += ".mpeg";
  MediaPlayer1->FileName = FileName2;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::SimStartButtClick(TObject *Sender)
{
  MediaPlayer1->Open();
  MediaPlayer1->Play();
}

    Nun bekomm ich aber beim Klicken des Buttons SimStartButt diese Fehlermeldung.
    Der Debugger markiert mir im Code die letzte Zeile (also

    MediaPlayer1->Play()

    )
    Die Dateien sind aber alle vorhanden und der Pfad stimmt auch...
    Woran liegt das?

    Simon

    0
  • B

    Wieso sind denn die doppelten Backslashs wieder weg.

    0
  • K
    Mod

    Hallo

    FileName2 += "C:\test\MO" + Attrib[MOstaerkeGRP->ItemIndex];
  FileName2 += "C:\test\SR" + Attrib[SRstaerkeGRP->ItemIndex];

    was ist an diesen beiden Zeilen falsch
    (Tip->\)

    Mfg
    Klaus

    0
  • S

    Mit doppelten Backslashes hats auch net funktioniert -> Gleicher Fehler...
    Ich komm mit den Backslashes net so ganz mit, da vorher jemand gesagt hat, dass es so auch geht (oder?)... Aber dann mach ich die halt wieder doppelt... Funktionieren tuts trotzdem net 😞

    0
  • K
    Mod

    Hallo

    was steht denn genau in "MediaPlayer1->FileName"

    Mfg
    Klaus

    0
  • S

    Hallo.

    Nach auswahl der entsprechenden RadioButtons sollte in FileName z.B. C:\\test\\MOgrossSRgross.mpeg stehen...

    Wie sich der Dateiname aus der Auswahl der zwei RadioGroups zusammensetzt sieht so aus:

    Also... Ich hab zwei RadioGoups mit folgenden Optionen:

    Radio Group1:
    -Motivation hoch
    -Motivation mittel
    -Motivation gering

    Radio Group2:
    -Schlüsselreiz hoch
    -Schlüsselreiz mittel
    -Schlüsselreiz gering

    Welche Kombinationen dann welche Datei aufrufen sollen sieht wie folgt aus:

    Motivation hoch + Schlüsselreiz hoch -> MOhochSRhoch.mpeg
    Motivation hoch + Schlüsselreiz mittel -> MOhochSRmittel.mpeg
    Motivation hoch + Schlüsselreiz gering -> MOhochSRgering.mpeg
    Motivation mittel + Schlüsselreiz hoch -> MOmittelSRhoch.mpeg
    Motivation mittel + Schlüsselreiz mittel -> MOmittelSRmittel.mpeg
    Motivation mittel + Schlüsselreiz gering -> MOmittelSRgering.mpeg
    Motivation gering + Schlüsselreiz hoch -> MOgeringSRhoch.mpeg
    Motivation gering + Schlüsselreiz mittel -> MOgeringSRmittel.mpeg
    Motivation gering + Schlüsselreiz gering -> MOgeringSRgering.mpeg

    Ich hoff, dass das einigermassen verständlich is. Ich weiss nämlich net, wie ich das anders erklären soll.

    Hmmm... Der Player soll also quasi je nach Auswahl die entsprechende der 9 Videodateien abspielen...

    0
  • B

    Bist du mal mit dem Debugger durchgegangen und hast kontrolliert was in FileName bzw. FileName2 drin steht? Stimmt der Name und gibt es die Datei da?

    0
  • S

    Ich habs...
    Es muss so aussehen:

    void __fastcall TForm1::MOstaerkeGRPClick(TObject *Sender)
{
  AnsiString FileName;
  MediaPlayer1->Close();
  FileName += "C:\\test\\MO" + Attrib[MOstaerkeGRP->ItemIndex];
  FileName += "SR" + Attrib[SRstaerkeGRP->ItemIndex];
  FileName += ".mpeg";
  MediaPlayer1->FileName = FileName;
}

    Vorher war es so:

    void __fastcall TForm1::MOstaerkeGRPClick(TObject *Sender)
{
  AnsiString FileName;
  MediaPlayer1->Close();
  FileName += "C:\test\MO" + Attrib[MOstaerkeGRP->ItemIndex];
  FileName += "C:\test\SR" + Attrib[SRstaerkeGRP->ItemIndex];
  FileName += ".mpeg";
  MediaPlayer1->FileName = FileName;
}

    Bei der alten Version kam dann als Wert für FilenName so etwas raus: "C:\\test\\MOhochC:\\test\\SRhoch.mpeg"
    Und das gits tatsächlich auf meiner Platte net 🙂
    Nun läufts wunderbar *freu*

    Aber eins wär noch ganz interessant... Akari hat schon versucht mir das zu erklären. Und zwar möchte ich gern den Pfad der Videodateien relativ zum Pfad der .exe angeben. Wie mach ich das? Akaris erklärung hab ich net so ganz verstanden...

    0
Anmelden zum Antworten