Source position: kmemodlgimage.pas line 78
procedure TKMemoImageForm.CBProportionalClick(
Sender: TObject
);