Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by himitsu,
4. Aug 2009
PS: dein Weg wäre vermutlich auch gegangen, allergings mit einer Änderung
procedure TMaskFrame.SetHeight(Value: Integer);
begin
If FHeight <> Value then
begin
FHeight := Value;
inherited Height := Value + 30;
end;
end;
und es wäre FHeight sozusagen doppelt vorhanden, einmal bei dir und in den Vorfahren
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by himitsu,
4. Aug 2009
und so?
private
function GetHeight: Integer;
procedure SetHeight(Value: Integer);
puplished
property Height: Integer read GetHeight write SetHeight;
{ ... }
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by himitsu,
4. Aug 2009
schonmal versucht es einfach neu zu definieren?
und um auf das "alte" Property zuzugreifen, gibt es auch da das gute alte Inherited. :stupid: