Komischer Fehler mit Buttons

[E307]

Ich habe in meinem Projekt 3 Speed- Buttons, die bei Klick eine Aktion ausführen sollen. Allerdings lassen sich die Buttons nicht anklicken!! Noch dazu führen im Main- Menü zwei Knöpfe zum selben Ergebnis, allerdins funktionieren diese. Warum kann ich die Buttons nicht anklicken? Ich habe keine Einstellung verstellt.

[fkerber]

Hi!

Und willkommen in der DP.

Kannst du sie nicht klicken, oder passiert beim Klicken einfach nur nichts?
sicher, dass bei den Events etwas zugewiesen ist?

Bzw. bei den anderen Aktionen nicht beiden Buttons die selbe Procedure zugewiesen ist?


Ciao Frederic

[E307]

Erst konnte ich sie nicht mal anklicken, jetzt habe ich die SpeedButtons durch Bitbuttons ersetzt. Jetzt funktionieren die Aktionen manchmal, manchmal auch nicht. Aber die im MainMenu tuns immer

[fkerber]

Hi!

Ohne Code bzw. Projekt werden wir dir kaum helfen können.


Ciao Frederic

[E307]

Okay, aber ob ihr damit so viel anfangen könnt.
Quellcode der Buttons aus meinem Multimediaplayer:

Delphi-Quellcode:

procedure TForm1.PlayButtonClick(Sender: TObject);
begin
if Video = true then //Wenn Datei ein Video ist
VideoPlayer.Play
else
if filename <>'' then
Musicplayer.Play;
timer.Enabled:=true;
PlayNr := -1;     // Das abspielen mit erstem song beginnen
PlayListTimerTimer(nil);
end;

procedure TForm1.PauseButtonClick(Sender: TObject);
begin
if Video = true then
VideoPlayer.Pause
else
Musicplayer.Pause;
end;

procedure TForm1.StopButtonClick(Sender: TObject);
begin
if Video = true then
VideoPlayer.Stop
else
Musicplayer.Stop;
end;

Die Felder im mainmenu verwenden den Selben Code, ich habe den Code hier dann einfach kopiert.

[arest]

mit dem quellcode kann ich nicht so argh viel anfange, aber du könntest einfach mal die folgende zeile einfügen, um zu prüfen ob die buttons reagieren:

showmessage('TEST'); wenn auf den buttonklick keine meldung erscheint funktionieren einfach deine buttons nicht...