home *** CD-ROM | disk | FTP | other *** search
- object Gaussianfrm: TGaussianfrm
- Left = 207
- Top = 143
- BorderStyle = bsDialog
- Caption = 'Add gaussian noise'
- ClientHeight = 114
- ClientWidth = 301
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- OldCreateOrder = True
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel1: TBevel
- Left = 217
- Top = 13
- Width = 72
- Height = 48
- end
- object Label1: TLabel
- Left = 24
- Top = 56
- Width = 6
- Height = 13
- Caption = '0'
- end
- object Label2: TLabel
- Left = 100
- Top = 56
- Width = 14
- Height = 13
- Caption = '0'#39'5'
- end
- object Label3: TLabel
- Left = 187
- Top = 56
- Width = 6
- Height = 13
- Caption = '1'
- end
- object Label4: TLabel
- Left = 221
- Top = 25
- Width = 65
- Height = 24
- Alignment = taCenter
- AutoSize = False
- Caption = '0.5'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -21
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label5: TLabel
- Left = 21
- Top = 8
- Width = 119
- Height = 13
- Caption = '&Gaussian noise variance:'
- FocusControl = TrackBar1
- end
- object TrackBar1: TTrackBar
- Left = 14
- Top = 24
- Width = 187
- Height = 33
- Max = 1000
- Orientation = trHorizontal
- Frequency = 100
- Position = 100
- SelEnd = 100
- SelStart = 0
- TabOrder = 2
- ThumbLength = 20
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- OnChange = TrackBar1Change
- end
- object Button2: TButton
- Left = 119
- Top = 80
- Width = 75
- Height = 25
- Cancel = True
- Caption = '&Cancel'
- TabOrder = 0
- OnClick = Button2Click
- end
- object Button1: TButton
- Left = 23
- Top = 80
- Width = 75
- Height = 25
- Caption = '&OK'
- TabOrder = 1
- OnClick = Button1Click
- end
- end
-