home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 2001 December
/
pcwk12201b.iso
/
Reklamy
/
Elpira-PW
/
MegaLotek.exe
/
0
/
RCDATA
/
TFRMSZUKSYS
/
TFRMSZUKSYS.txt
Wrap
Text File
|
1999-10-21
|
25KB
|
1,086 lines
object frmSzukSys: TfrmSzukSys
Left = 222
Top = 167
HelpContext = 1034
BorderIcons = []
BorderStyle = bsToolWindow
Caption = 'frmSzukSys'
ClientHeight = 290
ClientWidth = 544
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnPaint = FormPaint
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 8
Top = 22
Width = 325
Height = 33
Shape = bsFrame
end
object Label1: TLabel
Left = 18
Top = 32
Width = 14
Height = 13
Caption = 'Od'
Color = clSilver
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = True
Visible = False
end
object Label2: TLabel
Left = 182
Top = 32
Width = 14
Height = 13
Caption = 'Do'
Color = clSilver
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = True
Visible = False
end
object Bevel2: TBevel
Left = 336
Top = 22
Width = 203
Height = 33
Shape = bsFrame
end
object Label3: TLabel
Left = 344
Top = 32
Width = 14
Height = 13
Caption = 'Od'
Color = clSilver
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = True
end
object Label4: TLabel
Left = 440
Top = 32
Width = 14
Height = 13
Caption = 'Do'
Color = clSilver
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = True
end
object Shape1: TShape
Left = 8
Top = 58
Width = 173
Height = 191
Brush.Color = clRed
end
object Label5: TLabel
Left = 38
Top = 6
Width = 39
Height = 13
Caption = 'Label5'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
Visible = False
end
object Label6: TLabel
Left = 366
Top = 6
Width = 39
Height = 13
Caption = 'Label6'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object btn1: TSpeedButton
Left = 8
Top = 8
Width = 23
Height = 11
Caption = 'c'
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Layout = blGlyphBottom
ParentFont = False
Visible = False
OnClick = btn1Click
end
object btn2: TSpeedButton
Left = 336
Top = 8
Width = 23
Height = 11
Caption = 'c'
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Layout = blGlyphBottom
ParentFont = False
OnClick = btn2Click
end
object OdDaty: TDateEdit
Left = 60
Top = 28
Width = 103
Height = 21
Color = 14024447
Ctl3D = False
NumGlyphs = 2
ParentCtl3D = False
YearDigits = dyFour
TabOrder = 0
Visible = False
end
object DoDaty: TDateEdit
Left = 222
Top = 28
Width = 103
Height = 21
Color = 14024447
Ctl3D = False
NumGlyphs = 2
ParentCtl3D = False
YearDigits = dyFour
TabOrder = 1
Visible = False
end
object zakresOd: TComboBox
Left = 382
Top = 28
Width = 49
Height = 21
Style = csDropDownList
Color = 14024447
Ctl3D = True
ItemHeight = 13
ParentCtl3D = False
TabOrder = 2
end
object zakresDo: TComboBox
Left = 480
Top = 28
Width = 49
Height = 21
Style = csDropDownList
Color = 14024447
Ctl3D = True
ItemHeight = 13
ParentCtl3D = False
TabOrder = 3
end
object CLB1: TCheckListBox
Left = 184
Top = 58
Width = 355
Height = 227
OnClickCheck = CLB1ClickCheck
Color = 14024447
Ctl3D = False
ItemHeight = 13
Items.Strings = (
' 1. Wyszukaj kolejne liczby'
' 2. Wyszukaj liczby parzyste'
' 3. Wyszukaj liczby nieparzyste'
' 4. Wyszukaj liczby jezeli sa w danym przedziale'
' 5. Wyszukaj liczby parzyste je�eli s� w danym przedziale'
' 6. Wyszukaj liczby nieparzyste je�eli s� w danym przedziale'
' 7. Wyszukaj je�eli suma losowania wynosi ...'
' 8. Wyszukaj je�eli suma losowania jest parzysta'
' 9. Wyszukaj je�eli suma losowania jest nieparzysta'
'10. Wyszukaj je�eli liczby ko�cz� si� na cyfr� ...'
'11. Wyszukaj je�eli liczby zaczynaja si� na cyfr� ...'
'12. Wyszukaj je�eli liczby maj� sta�y wzrost ...')
ParentCtl3D = False
TabOrder = 4
OnClick = CLB1Click
end
object NB1: TNotebook
Left = 12
Top = 62
Width = 165
Height = 183
Color = 4285495
PageIndex = 12
ParentColor = False
TabOrder = 5
object TPage
Left = 0
Top = 0
Caption = 'p1'
object Lab011: TLabel
Left = 10
Top = 10
Width = 36
Height = 13
Caption = 'Lab011'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object CBox011: TComboBox
Left = 50
Top = 30
Width = 63
Height = 21
Style = csDropDownList
Color = 14024447
ItemHeight = 13
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'p2'
object Lab021: TLabel
Left = 10
Top = 10
Width = 36
Height = 13
Caption = 'Lab011'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object CBox021: TComboBox
Left = 50
Top = 30
Width = 63
Height = 21
Style = csDropDownList
Color = 14024447
ItemHeight = 13
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'p3'
object Lab031: TLabel
Left = 10
Top = 10
Width = 36
Height = 13
Caption = 'Lab011'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object CBox031: TComboBox
Left = 50
Top = 30
Width = 63
Height = 21
Style = csDropDownList
Color = 14024447
ItemHeight = 13
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'p4'
object Lab041: TLabel
Left = 10
Top = 10
Width = 36
Height = 13
Caption = 'Lab011'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Lab042: TLabel
Left = 10
Top = 68
Width = 36
Height = 13
Caption = 'Lab011'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object CBox041: TComboBox
Left = 50
Top = 30
Width = 63
Height = 21
Style = csDropDownList
Color = 14024447
ItemHeight = 13
TabOrder = 0
end
object CBox042: TComboBox
Left = 50
Top = 88
Width = 63
Height = 21
Style = csDropDownList
Color = 14024447
ItemHeight = 13
TabOrder = 1
end
end
object TPage
Left = 0
Top = 0
Caption = 'p5'
object Lab051: TLabel
Left = 10
Top = 10
Width = 36
Height = 13
Caption = 'Lab011'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Lab052: TLabel
Left = 10
Top = 68
Width = 36
Height = 13
Caption = 'Lab011'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object CBox051: TComboBox
Left = 50
Top = 30
Width = 63
Height = 21
Style = csDropDownList
Color = 14024447
ItemHeight = 13
TabOrder = 0
end
object CBox052: TComboBox
Left = 50
Top = 88
Width = 63
Height = 21
Style = csDropDownList
Color = 14024447
ItemHeight = 13
TabOrder = 1
end
end
object TPage
Left = 0
Top = 0
Caption = 'p6'
object Lab061: TLabel
Left = 10
Top = 10
Width = 36
Height = 13
Caption = 'Lab011'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Lab062: TLabel
Left = 10
Top = 68
Width = 36
Height = 13
Caption = 'Lab011'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object CBox061: TComboBox
Left = 50
Top = 30
Width = 63
Height = 21
Style = csDropDownList
Color = 14024447
ItemHeight = 13
TabOrder = 0
end
object CBox062: TComboBox
Left = 50
Top = 88
Width = 63
Height = 21
Style = csDropDownList
Color = 14024447
ItemHeight = 13
TabOrder = 1
end
end
object TPage
Left = 0
Top = 0
Caption = 'p7'
object Lab071: TLabel
Left = 10
Top = 10
Width = 36
Height = 13
Caption = 'Lab011'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Lab072: TLabel
Left = 10
Top = 68
Width = 36
Height = 13
Caption = 'Lab011'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Spin071: TRxSpinEdit
Left = 50
Top = 30
Width = 69
Height = 19
Alignment = taCenter
MaxValue = 1.000000000000000000
MinValue = 1.000000000000000000
Value = 1.000000000000000000
Color = 14024447
Ctl3D = False
ParentCtl3D = False
TabOrder = 0
end
object Spin072: TRxSpinEdit
Left = 50
Top = 88
Width = 69
Height = 19
Alignment = taCenter
MaxValue = 1.000000000000000000
MinValue = 1.000000000000000000
Value = 1.000000000000000000
Color = 14024447
Ctl3D = False
ParentCtl3D = False
TabOrder = 1
end
end
object TPage
Left = 0
Top = 0
Caption = 'p8'
end
object TPage
Left = 0
Top = 0
Caption = 'p9'
end
object TPage
Left = 0
Top = 0
Caption = 'p10'
object Lab101: TLabel
Left = 10
Top = 10
Width = 36
Height = 13
Caption = 'Lab011'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object SpeedButton1: TSpeedButton
Left = 6
Top = 166
Width = 23
Height = 11
Caption = '+'
Layout = blGlyphBottom
Spacing = 0
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 32
Top = 166
Width = 23
Height = 11
Caption = '-'
Layout = blGlyphBottom
Spacing = 0
OnClick = SpeedButton2Click
end
object CBox101: TComboBox
Left = 50
Top = 30
Width = 63
Height = 21
Style = csDropDownList
Color = 14024447
ItemHeight = 13
TabOrder = 0
end
object GB10: TGroupBox
Left = 4
Top = 56
Width = 157
Height = 101
TabOrder = 1
object CheckBox1: TCheckBox
Tag = 1
Left = 8
Top = 14
Width = 35
Height = 17
Caption = '1'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object CheckBox4: TCheckBox
Tag = 4
Left = 8
Top = 34
Width = 35
Height = 17
Caption = '4'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object CheckBox7: TCheckBox
Tag = 7
Left = 8
Top = 54
Width = 35
Height = 17
Caption = '7'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
object CheckBox10: TCheckBox
Left = 66
Top = 74
Width = 35
Height = 17
Caption = '0'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
end
object CheckBox8: TCheckBox
Tag = 8
Left = 66
Top = 54
Width = 35
Height = 17
Caption = '8'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
end
object CheckBox5: TCheckBox
Tag = 5
Left = 66
Top = 34
Width = 35
Height = 17
Caption = '5'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
end
object CheckBox2: TCheckBox
Tag = 2
Left = 66
Top = 14
Width = 35
Height = 17
Caption = '2'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
end
object CheckBox3: TCheckBox
Tag = 3
Left = 120
Top = 14
Width = 35
Height = 17
Caption = '3'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
end
object CheckBox6: TCheckBox
Tag = 6
Left = 120
Top = 34
Width = 35
Height = 17
Caption = '6'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
end
object CheckBox9: TCheckBox
Tag = 9
Left = 120
Top = 54
Width = 35
Height = 17
Caption = '9'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 9
end
end
end
object TPage
Left = 0
Top = 0
Caption = 'p11'
object Lab111: TLabel
Left = 10
Top = 10
Width = 36
Height = 13
Caption = 'Lab011'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object SpeedButton3: TSpeedButton
Left = 6
Top = 166
Width = 23
Height = 11
Caption = '+'
Layout = blGlyphBottom
Spacing = 0
OnClick = SpeedButton3Click
end
object SpeedButton4: TSpeedButton
Left = 32
Top = 166
Width = 23
Height = 11
Caption = '-'
Layout = blGlyphBottom
Spacing = 0
OnClick = SpeedButton4Click
end
object GB11: TGroupBox
Left = 4
Top = 56
Width = 157
Height = 101
TabOrder = 0
object CheckBox11: TCheckBox
Tag = 1
Left = 8
Top = 14
Width = 35
Height = 17
Caption = '1'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object CheckBox12: TCheckBox
Tag = 4
Left = 8
Top = 34
Width = 35
Height = 17
Caption = '4'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object CheckBox13: TCheckBox
Tag = 7
Left = 8
Top = 54
Width = 35
Height = 17
Caption = '7'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
object CheckBox14: TCheckBox
Left = 66
Top = 74
Width = 35
Height = 17
Caption = '0'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
Visible = False
end
object CheckBox15: TCheckBox
Tag = 8
Left = 66
Top = 54
Width = 35
Height = 17
Caption = '8'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
end
object CheckBox16: TCheckBox
Tag = 5
Left = 66
Top = 34
Width = 35
Height = 17
Caption = '5'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
end
object CheckBox17: TCheckBox
Tag = 2
Left = 66
Top = 14
Width = 35
Height = 17
Caption = '2'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
end
object CheckBox18: TCheckBox
Tag = 3
Left = 120
Top = 14
Width = 35
Height = 17
Caption = '3'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
end
object CheckBox19: TCheckBox
Tag = 6
Left = 120
Top = 34
Width = 35
Height = 17
Caption = '6'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
end
object CheckBox20: TCheckBox
Tag = 9
Left = 120
Top = 54
Width = 35
Height = 17
Caption = '9'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 9
end
end
object CBox111: TComboBox
Left = 50
Top = 30
Width = 63
Height = 21
Style = csDropDownList
Color = 14024447
ItemHeight = 13
TabOrder = 1
end
end
object TPage
Left = 0
Top = 0
Caption = 'p12'
object Lab121: TLabel
Left = 10
Top = 10
Width = 36
Height = 13
Caption = 'Lab011'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Lab122: TLabel
Left = 10
Top = 68
Width = 36
Height = 13
Caption = 'Lab011'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object CBox121: TComboBox
Left = 50
Top = 30
Width = 63
Height = 21
Style = csDropDownList
Color = 14024447
ItemHeight = 13
TabOrder = 0
end
object CBox122: TComboBox
Left = 50
Top = 88
Width = 63
Height = 21
Style = csDropDownList
Color = 14024447
ItemHeight = 13
TabOrder = 1
end
end
object TPage
Left = 0
Top = 0
Caption = 'p13'
object Lab131: TLabel
Left = 10
Top = 10
Width = 36
Height = 13
Caption = 'Lab011'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14024447
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object CBox131: TComboBox
Left = 50
Top = 30
Width = 63
Height = 21
Style = csDropDownList
Color = 14024447
ItemHeight = 13
TabOrder = 0
end
end
end
object btnOk: TBitBtn
Left = 12
Top = 262
Width = 75
Height = 21
Caption = 'OK'
Default = True
TabOrder = 6
OnClick = btnOkClick
end
object btnAnuluj: TBitBtn
Left = 92
Top = 262
Width = 75
Height = 21
Caption = 'Anuluj'
TabOrder = 7
OnClick = btnAnulujClick
end
end
