AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Die Delphi-IDE SpeeedButton Properties: Down nicht manipulierbar
Thema durchsuchen
Ansicht
Themen-Optionen

SpeeedButton Properties: Down nicht manipulierbar

Ein Thema von Minz3 · begonnen am 18. Jul 2019 · letzter Beitrag vom 18. Jul 2019
 
Benutzerbild von Minz3
Minz3

Registriert seit: 18. Jul 2019
Ort: Thüringen
48 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#1

SpeeedButton Properties: Down nicht manipulierbar

  Alt 18. Jul 2019, 14:59
Huhu Gemeinde,

ich bin schon seit einer Weile ein stiller Leser und habe bisher auch immer recht schnell Lösungsansätze gefunden. Danke schon mal dafür!
Jetzt habe ich allerdings auch mal ein kleines Problem, welches ich zur Sprache bringen möchte. Also hab ich mich fix registriert und da bin ich.

Ich möchte mit Hilfe eines BitButtons die "Down" Eigenschaft eines SpeedButtons manipulieren, also true bzw. false setzen. Leider gelingt es mir nicht, diesen Status zu verändern. Nicht einmal im Eigenschaften-Fenster lässt sich der Haken setzen. Die Option "AllowAllUp" bringt leider auch nicht das gewünschte Ergebnis.
Das Setzen des Status im Quellcode funktioniert ebenso wenig, hier mal der Code für den BitButton:
Delphi-Quellcode:
procedure TMainForm.Dice1Click(Sender: TObject);

begin
   if Take1.Down = true then
  begin
    Take1.Down := false;
    exit;
  end;

  if (Take1.Down = false) and (Dice1.Caption = '0') then
    application.messagebox ('Bitte erst würfeln!', 'Fehler', mb_OK + mb_IconExclamation)
  else
    Take1.Down := true;

  if RollButton.Enabled then
    RollButton.SetFocus;
end;
Der Code ist Bestandteil eines Delphi Kurses. Ziel ist es einen Kniffel-Klon zu programmieren.
*Edit: "Dice1" ist ein BitButton, welcher "Take1" (SpeedButton) manipulieren soll. "RollButton" ist ebenfalls ein BitButton, welche dann zum "würfeln" gedacht ist.

Hoffe ich konnte mich soweit verständlich ausdrücken.

Grüße!
Attention:
Brain.exe has stopped working. Reboot the system in 3... 2... 1... ... ... ... Attempt failed.

Geändert von Minz3 (18. Jul 2019 um 15:05 Uhr) Grund: Erklärung der Variablennamen
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:47 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz