Source position: forms.pp line 586
protected procedure TCustomForm.SetScaled(
const AScaled: Boolean
); override;