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