Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi RadioButton soll Buttons Enablen und umgekehrt (https://www.delphipraxis.net/10284-radiobutton-soll-buttons-enablen-und-umgekehrt.html)

Rapthor 15. Okt 2003 12:09


RadioButton soll Buttons Enablen und umgekehrt
 
Wie schaffe ich es, dass wenn ein Radiobutton markiert ist, ein anderer normaler Button beispielsweise Enabled wird ? Und andersrum will ich gleichzeitig, dass wenn die Markierung auf einen anderen Radiobutton fällt, der Button wieder Disabled wird (Enabled = false)?!

Sanchez 15. Okt 2003 12:12

Re: RadioButton soll Buttons Enablen und umgekehrt
 
Hallo,

Du fragst einfach im OnClick des RadioButtons bzw der Radiogroup ab, welcher Radiobutton aktiviert (checked) ist und enablest/disablest dementsprechend deine Buttons

grüße, daniel

sakura 15. Okt 2003 12:12

Re: RadioButton soll Buttons Enablen und umgekehrt
 
Nutze das OnClick Ereignis des RadioButton

Delphi-Quellcode:
procedure TfrmMain.RadioButton1Click(Sender: TObject);
begin
  Button1.Enabled := RadioButton1.Checked;
end;
...:cat:...

MathiasSimmack 15. Okt 2003 12:13

Re: RadioButton soll Buttons Enablen und umgekehrt
 
Deine Worte sind doch schon Pseudo-Code. Die Bedingungen hast du doch ziemlich genau definiert. Musst nur echten Code draus machen. Wenn du schon mal mit Radiobuttons gearbeitet hast, kennst du auch den Ansatzpunkt, wie man ermitteln kann, ob ein RB ... *hi hi* ... geklickt wurde.


Boah: drei Mann geantwortet. :)

Pseudemys Nelsoni 15. Okt 2003 12:14

Re: RadioButton soll Buttons Enablen und umgekehrt
 
Delphi-Quellcode:
procedure TForm1.RadioButton1Click(Sender: TObject);
begin
  button1.Enabled := true;
end;
Delphi-Quellcode:
procedure TForm1.RadioButton2Click(Sender: TObject);
begin
  button1.Enabled := false;
end;

so?


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:57 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz