home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Bila Vrana
/
BILA_VRANA.iso
/
011A
/
ULOGIC13.ZIP
/
_SETUP.1
/
UltraLogic.exe
/
0
/
RCDATA
/
TFRMPROPERTIES
/
TFRMPROPERTIES.txt
Wrap
Text File
|
1996-09-28
|
4KB
|
171 lines
object frmProperties: TfrmProperties
Left = 192
Top = 114
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
ActiveControl = btnOK
BorderIcons = [biSystemMenu, biHelp]
BorderStyle = bsSingle
Caption = 'Properties'
ClientHeight = 211
ClientWidth = 407
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Position = poScreenCenter
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 6
Top = 169
Width = 394
Height = 9
Shape = bsBottomLine
end
object btnOK: TButton
Left = 121
Top = 182
Width = 75
Height = 25
HelpContext = 1
Caption = 'OK'
Default = True
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ModalResult = 1
ParentFont = False
PopupMenu = pmenuWhatsThis
TabOrder = 0
end
object btnCancel: TButton
Left = 211
Top = 182
Width = 75
Height = 25
HelpContext = 2
Cancel = True
Caption = 'Cancel'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ModalResult = 2
ParentFont = False
PopupMenu = pmenuWhatsThis
TabOrder = 1
end
object pcontrolProperties: TPageControl
Left = 6
Top = 5
Width = 394
Height = 164
ActivePage = tsheetMusic
TabOrder = 2
object tsheetGeneral: TTabSheet
Caption = 'General'
object cboxSmartHints: TCheckBox
Left = 19
Top = 51
Width = 97
Height = 17
HelpContext = 1101
Caption = 'Smart Hints'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
PopupMenu = pmenuWhatsThis
State = cbChecked
TabOrder = 0
end
object cboxAutoCheck: TCheckBox
Left = 19
Top = 84
Width = 122
Height = 17
HelpContext = 1102
Caption = 'Automatic Checking'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
PopupMenu = pmenuWhatsThis
State = cbChecked
TabOrder = 1
end
end
object tsheetMusic: TTabSheet
Caption = 'Music'
object cboxBackgroundMusic: TCheckBox
Left = 9
Top = 5
Width = 124
Height = 17
HelpContext = 1201
Caption = 'Background music'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
PopupMenu = pmenuWhatsThis
State = cbChecked
TabOrder = 0
OnClick = cboxBackgroundMusicClick
end
object rgroupMusicFile: TRadioGroup
Left = 9
Top = 27
Width = 371
Height = 104
HelpContext = 1202
Caption = 'Music File:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemIndex = 0
Items.Strings = (
'"Heal the world" (by Michael Jackson)'
'"Jump in the fire" (by Metallica)'
'"Across the universe" (by the Beatles)'
'"Don'#39't stop" (by Madonna)')
ParentFont = False
PopupMenu = pmenuWhatsThis
TabOrder = 1
end
end
end
object btnApply: TButton
Left = 319
Top = 182
Width = 75
Height = 25
Caption = '&Apply'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
Visible = False
OnClick = btnApplyClick
end
object pmenuWhatsThis: TPopupMenu
Left = 72
Top = 182
object pmitemWhatsThis: TMenuItem
Caption = '&What'#39's This?'
ShortCut = 0
OnClick = pmitemWhatsThisClick
end
end
end