home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 January
/
Chip_1999-01_cd.bin
/
zkuste
/
Globy
/
_SETUP.1
/
Sazeni3D.exe
/
0
/
RCDATA
/
TCALC
/
TCALC.txt
Wrap
Text File
|
1994-11-07
|
11KB
|
530 lines
object Calc: TCalc
Left = 200
Top = 104
HelpContext = 99
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = 'Kalkula�ka'
ClientHeight = 182
ClientWidth = 367
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyDown = FormKeyDown
PixelsPerInch = 96
TextHeight = 13
object Shape1: TShape
Left = 19
Top = 8
Width = 287
Height = 22
end
object L: TLabel
Left = 21
Top = 11
Width = 281
Height = 16
Alignment = taRightJustify
AutoSize = False
Caption = '0'
Color = clWhite
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Label1: TLabel
Left = 5
Top = 12
Width = 11
Height = 13
Caption = 'M'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object BitBtn1: TBitBtn
Left = 20
Top = 42
Width = 29
Height = 25
Caption = '1'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
TabStop = False
OnClick = BitBtn1Click
end
object BitBtn4: TBitBtn
Left = 20
Top = 77
Width = 29
Height = 25
Caption = '4'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
TabStop = False
OnClick = BitBtn4Click
end
object BitBtn7: TBitBtn
Left = 20
Top = 111
Width = 29
Height = 25
Caption = '7'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
TabStop = False
OnClick = BitBtn7Click
end
object BitBtn10: TBitBtn
Left = 20
Top = 146
Width = 29
Height = 25
Caption = '0'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 9
TabStop = False
OnClick = BitBtn10Click
end
object BitBtn8: TBitBtn
Left = 61
Top = 111
Width = 29
Height = 25
Caption = '8'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
TabStop = False
OnClick = BitBtn8Click
end
object BitBtn9: TBitBtn
Left = 101
Top = 111
Width = 29
Height = 25
Caption = '9'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
TabStop = False
OnClick = BitBtn9Click
end
object BitBtn6: TBitBtn
Left = 101
Top = 77
Width = 29
Height = 25
Caption = '6'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
TabStop = False
OnClick = BitBtn6Click
end
object BitBtn5: TBitBtn
Left = 61
Top = 77
Width = 29
Height = 25
Caption = '5'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
TabStop = False
OnClick = BitBtn5Click
end
object BitBtn2: TBitBtn
Left = 60
Top = 42
Width = 29
Height = 25
Caption = '2'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
TabStop = False
OnClick = BitBtn2Click
end
object BitBtn3: TBitBtn
Left = 101
Top = 42
Width = 29
Height = 25
Caption = '3'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
TabStop = False
OnClick = BitBtn3Click
end
object BitBtn11: TBitBtn
Left = 181
Top = 42
Width = 29
Height = 25
Caption = '&M+'
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 16
TabStop = False
OnClick = BitBtn11Click
end
object BitBtn12: TBitBtn
Left = 222
Top = 42
Width = 29
Height = 25
Caption = 'M-'
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 18
TabStop = False
OnClick = BitBtn12Click
end
object BitBtn13: TBitBtn
Left = 181
Top = 77
Width = 29
Height = 25
Caption = 'M&R'
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 17
TabStop = False
OnClick = BitBtn13Click
end
object BitBtn14: TBitBtn
Left = 222
Top = 77
Width = 29
Height = 25
Caption = 'MC'
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 19
TabStop = False
OnClick = BitBtn14Click
end
object BitBtn15: TBitBtn
Left = 61
Top = 146
Width = 29
Height = 25
Caption = '+/-'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 10
TabStop = False
OnClick = BitBtn15Click
end
object BitBtn16: TBitBtn
Left = 102
Top = 146
Width = 29
Height = 25
Caption = ','
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 11
TabStop = False
OnClick = BitBtn16Click
end
object BitBtn17: TBitBtn
Left = 141
Top = 42
Width = 29
Height = 25
Caption = '/'
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 12
TabStop = False
OnClick = BitBtn17Click
end
object BitBtn18: TBitBtn
Left = 142
Top = 77
Width = 29
Height = 25
Caption = 'X'
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 13
TabStop = False
OnClick = BitBtn18Click
end
object BitBtn19: TBitBtn
Left = 142
Top = 111
Width = 29
Height = 25
Caption = '-'
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 14
TabStop = False
OnClick = BitBtn19Click
end
object BitBtn20: TBitBtn
Left = 143
Top = 146
Width = 29
Height = 25
Caption = '+'
Font.Color = clBlue
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 15
TabStop = False
OnClick = BitBtn20Click
end
object BitBtn21: TBitBtn
Left = 181
Top = 146
Width = 71
Height = 25
Caption = '='
Default = True
Font.Color = clBlack
Font.Height = -19
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 22
TabStop = False
OnClick = BitBtn21Click
OnKeyDown = BitBtn21KeyDown
end
object BitBtn22: TBitBtn
Left = 181
Top = 111
Width = 35
Height = 25
Caption = '&X->M'
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 20
TabStop = False
OnClick = BitBtn22Click
end
object BitBtn23: TBitBtn
Left = 318
Top = 145
Width = 41
Height = 25
Caption = '&C'
Font.Color = clRed
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 29
TabStop = False
OnClick = BitBtn23Click
end
object BitBtn24: TBitBtn
Left = 263
Top = 42
Width = 42
Height = 25
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 23
TabStop = False
OnClick = BitBtn24Click
Glyph.Data = {
7E000000424D7E000000000000003E0000002800000011000000100000000100
010000000000400000000000000000000000020000000200000000000000FFFF
FF00FFFF8000FFFF8000FFFF8000FFFF8000E73F8000F27F8000F8FF8000F8FF
8000F8FF8000F2638000E72F8000FFE38000FFFB8000FFE38000FFFF8000FFFF
8000}
end
object BitBtn25: TBitBtn
Left = 263
Top = 77
Width = 42
Height = 25
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 24
TabStop = False
OnClick = BitBtn25Click
Glyph.Data = {
7E000000424D7E000000000000003E0000002800000011000000100000000100
010000000000400000000000000000000000020000000200000000000000FFFF
FF00FFFF8000FFFF8000FFFF8000F3938000F3938000E1C78000E1C78000CC93
8000CC938000CCFF80009CFF80009E008000FE008000FFFF8000FFFF8000FFFF
8000}
end
object BitBtn26: TBitBtn
Left = 224
Top = 111
Width = 27
Height = 25
Caption = '&Pi'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 21
TabStop = False
OnClick = BitBtn26Click
end
object BitBtn27: TBitBtn
Left = 318
Top = 7
Width = 38
Height = 25
Caption = '<--'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 27
TabStop = False
OnClick = BitBtn27Click
end
object BitBtn28: TBitBtn
Left = 263
Top = 111
Width = 41
Height = 25
Caption = 'Com&b'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 25
TabStop = False
OnClick = BitBtn28Click
end
object BitBtn29: TBitBtn
Left = 318
Top = 42
Width = 38
Height = 25
Caption = 'Rnd'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 28
TabStop = False
OnClick = BitBtn29Click
end
object BitBtn30: TBitBtn
Left = 263
Top = 145
Width = 41
Height = 25
Caption = 'CE'
Font.Color = clRed
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 26
TabStop = False
OnClick = BitBtn30Click
end
object MSOfficeCaption1: TMSOfficeCaption
AppNameText.FontKind = fkSystemB
AppNameText.Visible = True
CaptionText.Caption = 'Kalkula�ka'
CaptionText.ColorActive = clYellow
CaptionText.ColorInactive = clGray
CaptionText.FontKind = fkSystem
CaptionText.Visible = True
CompanyText.FontKind = fkSystemBI
CompanyText.Visible = True
Left = 328
Top = 80
end
end