Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Matze,
3. Jan 2010
Oder meine vorgeschlagene Umsetzung aus Beitrag #3 verwenden. Sie ist vielleicht nicht so sauber, aber meiner Meinung nach etwas übersichtlicher.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Matze,
3. Jan 2010
Mich würde auch etwas interessieren: Der Parameter "Sender", wofür steht der genau? In der Delphi-Reference wurde ich nicht fündig.
Ich hätte erwartet, dass so etwas geht, doch ich habe "Sender" hier wohl falsch interpretiert:
procedure TForm1.CheckBox1Click(Sender: TObject);
begin
if (Sender as TCheckBox) = CheckBox1 then
// durch CheckBox1 ausgelöst
else
// durch andere...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Matze,
3. Jan 2010
Hallo,
bei einer Änderung von "Enabled" wird bei mir kein OnClick-Ereignis ausgelöst (Turbo Delphi).
Falls du dennoch wissen möchtest, wie man das OnClick-Ereignis vorübergehend deaktivieren kann, so ginge es:
CheckBox1.OnClick := nil;
CheckBox1.Enabled := not CheckBox1.Enabled;
CheckBox1.OnClick := CheckBox1Click;
Aber du solltest auf alle Fälle die Ursache finden, denn normal ist...