home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Bila Vrana
/
BILA_VRANA.iso
/
011A
/
ULOGIC13.ZIP
/
_SETUP.1
/
UltraLogic.exe
/
0
/
RCDATA
/
TFRMMAIN
/
TFRMMAIN.txt
< prev
Wrap
Text File
|
1996-09-28
|
20KB
|
699 lines
object frmMain: TfrmMain
Left = 237
Top = 30
HorzScrollBar.Tracking = True
VertScrollBar.Tracking = True
BorderIcons = [biSystemMenu, biMinimize, biHelp]
BorderStyle = bsSingle
Caption = 'Ultra Logic'
ClientHeight = 373
ClientWidth = 288
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu
Position = poScreenCenter
Visible = True
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object imgBackGround: TImage
Left = 0
Top = 0
Width = 288
Height = 354
Align = alClient
Picture.Data = {<image000.bmp>}
Stretch = True
end
object Hand: TImage
Left = 5
Top = 88
Width = 38
Height = 18
ParentShowHint = False
Picture.Data = {<image001.ico>}
ShowHint = False
end
object Bevel3: TBevel
Left = 1
Top = 37
Width = 226
Height = 9
Shape = bsBottomLine
end
object Bevel4: TBevel
Left = 162
Top = 2
Width = 2
Height = 40
Shape = bsLeftLine
end
object SpeedButton1: TSpeedButton
Left = 248
Top = 6
Width = 28
Height = 27
Hint = 'Help|'
Glyph.Data = {
50020000424D500200000000000076000000280000001E0000001B0000000100
040000000000B001000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00700000000000
000000000000000007007F8888888888888888888888888807007F7777777777
777777777777777807007F7777777777777777777777777807007F7777777777
777777777777777807007F7777777770077777777777777807007F7777777770
077777777777777807007F77777777007777CCC77777777807007F7777077700
7777CCC77777777807007F7777007007777777777777777807007F7777000007
7777CC777777777807007F77770000000077CC777777777807007F7777000000
0777CCC77777777807007F7777000000777777CC7777777807007F7777000007
77CC777CC777777807007F77770000777CC7777CC777777807007F7777000777
7CC7777CC777777807007F777700777777CC777CC777777807007F7777077777
777CCCCC7777777807007F7777777777777777777777777807007F7777777777
777777777777777807007F7777777777777777777777777807007F7777777777
777777777777777807007F7777777777777777777777777807007F7777777777
777777777777777807007FFFFFFFFFFFFFFFFFFFFFFFFFFF0700777777777777
77777777777777777700010000000200000000000000000000004D0000A02C00
6C001C006C00CA050000AE05000094000000D605}
ParentShowHint = False
ShowHint = True
Visible = False
OnClick = SpeedButton1Click
end
object LeftBoard: TDrawGrid
Left = 43
Top = 83
Width = 128
Height = 263
TabStop = False
Color = clWhite
Ctl3D = True
DefaultColWidth = 30
DefaultRowHeight = 25
DefaultDrawing = False
FixedColor = clWhite
FixedCols = 4
RowCount = 10
FixedRows = 0
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine]
ParentCtl3D = False
ParentShowHint = False
PopupMenu = pmenuLeftBoard
ScrollBars = ssNone
ShowHint = False
TabOrder = 0
OnDragDrop = LeftBoardDragDrop
OnDragOver = LeftBoardDragOver
OnDrawCell = LeftBoardDrawCell
OnMouseDown = LeftBoardMouseDown
RowHeights = (
25
27
25
25
25
25
25
25
25
25)
end
object RightBoard: TDrawGrid
Left = 188
Top = 83
Width = 92
Height = 266
HelpContext = 3001
TabStop = False
Color = clTeal
DefaultColWidth = 21
DefaultRowHeight = 25
DefaultDrawing = False
FixedColor = clTeal
FixedCols = 4
RowCount = 10
FixedRows = 0
ParentShowHint = False
PopupMenu = pmenuWhatsThis
ScrollBars = ssNone
ShowHint = False
TabOrder = 1
OnDrawCell = RightBoardDrawCell
RowHeights = (
26
25
25
25
25
25
25
25
26
25)
end
object MediaPlayer: TMediaPlayer
Left = 9
Top = 342
Width = 85
Height = 20
VisibleButtons = [btPlay, btStop, btEject]
Visible = False
TabOrder = 2
OnNotify = MediaPlayerNotify
end
object ColorsBarPanel: TPanel
Left = 1
Top = 49
Width = 222
Height = 30
HelpContext = 3002
BevelInner = bvRaised
BevelOuter = bvNone
ParentShowHint = False
PopupMenu = pmenuWhatsThis
ShowHint = False
TabOrder = 3
object RedShape: TShape
Left = 3
Top = 4
Width = 24
Height = 22
Brush.Color = clRed
Shape = stRoundRect
OnMouseDown = AnyShapeMouseDown
end
object GreenShape: TShape
Left = 194
Top = 4
Width = 24
Height = 22
Brush.Color = clGreen
Shape = stRoundRect
OnMouseDown = AnyShapeMouseDown
end
object BlackShape: TShape
Left = 58
Top = 4
Width = 24
Height = 22
Brush.Color = clBlack
Shape = stRoundRect
OnMouseDown = AnyShapeMouseDown
end
object YellowShape: TShape
Left = 85
Top = 4
Width = 24
Height = 22
Brush.Color = clYellow
Shape = stRoundRect
OnMouseDown = AnyShapeMouseDown
end
object BlueShape: TShape
Left = 112
Top = 4
Width = 24
Height = 22
Brush.Color = clBlue
Shape = stRoundRect
OnMouseDown = AnyShapeMouseDown
end
object GrayShape: TShape
Left = 139
Top = 4
Width = 24
Height = 22
Brush.Color = clGray
Shape = stRoundRect
OnMouseDown = AnyShapeMouseDown
end
object FuchsiaShape: TShape
Left = 167
Top = 4
Width = 24
Height = 22
Brush.Color = clFuchsia
Shape = stRoundRect
OnMouseDown = AnyShapeMouseDown
end
object LimeShape: TShape
Left = 30
Top = 4
Width = 24
Height = 22
Brush.Color = clLime
Shape = stRoundRect
OnMouseDown = AnyShapeMouseDown
end
end
object Panel1: TPanel
Left = 2
Top = 6
Width = 153
Height = 31
TabOrder = 4
object sbtnCheck: TSpeedButton
Left = 64
Top = 3
Width = 25
Height = 25
Hint = 'Check!|'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
555555555555555555555555555555555555555555FF55555555555559055555
55555555577FF5555555555599905555555555557777F5555555555599905555
555555557777FF5555555559999905555555555777777F555555559999990555
5555557777777FF5555557990599905555555777757777F55555790555599055
55557775555777FF5555555555599905555555555557777F5555555555559905
555555555555777FF5555555555559905555555555555777FF55555555555579
05555555555555777FF5555555555557905555555555555777FF555555555555
59905555555555555777555555555555555555555555555555550000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = sbtnCheckClick
end
object sbtnRegistration: TSpeedButton
Left = 97
Top = 3
Width = 25
Height = 25
Hint = 'Registration|'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
0FF03333737F37737F373330B00FFFF