object FracSize: TFracSize Left = 728 Top = 105 BorderIcons = [biMinimize] BorderStyle = bsDialog Caption = 'Image size' ClientHeight = 121 ClientWidth = 145 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -10 Font.Name = 'MS Sans Serif' Font.Style = [] Scaled = False OnClose = FormClose OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 4 Top = 84 Width = 137 Height = 5 Shape = bsTopLine end object StaticText1: TStaticText Left = 4 Top = 8 Width = 48 Height = 20 AutoSize = False Caption = '&Width:' FocusControl = Edit1 Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 0 end object StaticText2: TStaticText Left = 4 Top = 36 Width = 48 Height = 19 AutoSize = False Caption = '&Height:' FocusControl = Edit2 Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 1 end object Edit1: TEdit Tag = 1 Left = 60 Top = 4 Width = 65 Height = 22 Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] MaxLength = 5 ParentFont = False TabOrder = 2 Text = 'Edit1' OnExit = Edit1Exit OnKeyPress = Edit1KeyPress end object Edit2: TEdit Tag = 2 Left = 60 Top = 32 Width = 65 Height = 22 Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] MaxLength = 5 ParentFont = False TabOrder = 3 Text = 'Edit2' OnExit = Edit2Exit OnKeyPress = Edit1KeyPress end object BitBtn1: TBitBtn Left = 4 Top = 92 Width = 65 Height = 25 Caption = '&Ok' Default = True Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 OnClick = BitBtn1Click NumGlyphs = 2 Spacing = 8 end object BitBtn2: TBitBtn Left = 76 Top = 92 Width = 65 Height = 25 Cancel = True Caption = '&Cancel' Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 2 ParentFont = False TabOrder = 6 NumGlyphs = 2 end object SpinButton1: TSpinButton Tag = 1 Left = 125 Top = 5 Width = 15 Height = 20 DownGlyph.Data = { BA000000424DBA00000000000000420000002800000009000000060000000100 1000030000007800000000000000000000000000000000000000007C0000E003 00001F000000E03DE03DE03DE03DE03DE03DE03DE03DE03D0500E03DE03DE03D E03D0000E03DE03DE03DE03D1802E03DE03DE03D000000000000E03DE03DE03D 1502E03DE03D00000000000000000000E03DE03D7802E03D0000000000000000 000000000000E03D0600E03DE03DE03DE03DE03DE03DE03DE03DE03D96B5} TabOrder = 7 UpGlyph.Data = { BA000000424DBA00000000000000420000002800000009000000060000000100 1000030000007800000000000000000000000000000000000000007C0000E003 00001F000000E03DE03DE03DE03DE03DE03DE03DE03DE03D0500E03D00000000 00000000000000000000E03D1802E03DE03D00000000000000000000E03DE03D 1502E03DE03DE03D000000000000E03DE03DE03D7802E03DE03DE03DE03D0000 E03DE03DE03DE03D0600E03DE03DE03DE03DE03DE03DE03DE03DE03D00A0} OnDownClick = SpinButton1DownClick OnUpClick = SpinButton1UpClick end object SpinButton2: TSpinButton Tag = 2 Left = 125 Top = 33 Width = 15 Height = 20 DownGlyph.Data = { BA000000424DBA00000000000000420000002800000009000000060000000100 1000030000007800000000000000000000000000000000000000007C0000E003 00001F000000E03DE03DE03DE03DE03DE03DE03DE03DE03D0500E03DE03DE03D E03D0000E03DE03DE03DE03D1802E03DE03DE03D000000000000E03DE03DE03D 1502E03DE03D00000000000000000000E03DE03D7802E03D0000000000000000 000000000000E03D0600E03DE03DE03DE03DE03DE03DE03DE03DE03D96B5} TabOrder = 8 UpGlyph.Data = { BA000000424DBA00000000000000420000002800000009000000060000000100 1000030000007800000000000000000000000000000000000000007C0000E003 00001F000000E03DE03DE03DE03DE03DE03DE03DE03DE03D0500E03D00000000 00000000000000000000E03D1802E03DE03D00000000000000000000E03DE03D 1502E03DE03DE03D000000000000E03DE03DE03D7802E03DE03DE03DE03D0000 E03DE03DE03DE03D0600E03DE03DE03DE03DE03DE03DE03DE03DE03D00A0} OnDownClick = SpinButton1DownClick OnUpClick = SpinButton1UpClick end object CheckBox1: TCheckBox Left = 4 Top = 64 Width = 137 Height = 14 Alignment = taLeftJustify Caption = 'Keep &proportions' Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 4 OnClick = CheckBox1Click end end