Aktualisieren der Fensterklasse

[himitsu]

Jupp, eine Fensterklasse wird hier nicht aktualisiert und eigentlich will er es auch nicht.
Er will bestimmt nur die Anzeige aktualisieren, wenn sich was ändert (siehe meine letzen Sätze)

Zitat von wolfaa:

naja meine informatiklehrerin sieht das anders

Dann schick die mal zu uns ... die bekommt schon was auf die Pfoten.

Delphi-Quellcode:

procedure TKorperberechnung.FormCreate(Sender: TObject);
begin
  Korperrechnung := TKorperrechnung.Create;
  Blub;
end;

procedure TKorperberechnung.Blub;
begin
  EdQuader1.Visible := RBtnQuader.Checked;
  EdQuader2.Visible := RBtnQuader.Checked;
  EdQuader3.Visible := RBtnQuader.Checked;
  EdZylinder1.Visible := RBtnZylinder.Checked;
  EdZylinder2.Visible := RBtnZylinder.Checked;
  EdKegel1.Visible := RBtnKegel.Checked;
  EdKegel2.Visible := RBtnKegel.Checked;
  EdKugel.Visible := EdKugel.Visible;
end;

Und Blub natürlich auch in den OnChange oder OnClick der CheckBoxen aufrufen.
Statt Blub könnte man auch direkt eine gemeinsame OnChange-Methode nutzen.