home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2001 September
/
Chip_2001-09_cd1.bin
/
zkuste
/
delphi
/
kolekce
/
d12345
/
CHEMPLOT.ZIP
/
TPlot
/
Functons.dfm
/
Functons.txt
Wrap
Text File
|
2001-05-28
|
3KB
|
129 lines
object FunctionsForm: TFunctionsForm
Left = 286
Top = 359
Width = 350
Height = 362
HelpContext = 4000
HorzScrollBar.Range = 444
HorzScrollBar.Visible = False
VertScrollBar.Range = 325
VertScrollBar.Visible = False
ActiveControl = HelpBitBtn
AutoScroll = False
Caption = 'Create New Function'
Font.Color = clWindowText
Font.Height = 21
Font.Name = 'MS Sans Serif'
Font.Pitch = fpVariable
Font.Style = []
PixelsPerInch = 120
OnCreate = FormCreate
TextHeight = 20
object SeriesLabel: TLabel
Left = 10
Top = 10
Width = 104
Height = 25
Caption = 'SeriesN := '
end
object FunctionHintLabel: TLabel
Left = 10
Top = 260
Width = 170
Height = 25
Caption = 'FunctionHintLabel'
end
object HelpBitBtn: TBitBtn
Left = 10
Top = 294
Width = 94
Height = 31
HelpContext = 1860
TabOrder = 0
Kind = bkHelp
end
object CancelBitBtn: TBitBtn
Left = 240
Top = 294
Width = 94
Height = 31
TabOrder = 1
Kind = bkCancel
end
object OKBitBtn: TBitBtn
Left = 120
Top = 294
Width = 94
Height = 31
TabOrder = 2
Kind = bkOK
end
object FunctionMemo: TMemo
Left = 10
Top = 40
Width = 321
Height = 171
Hint = 'Type your expression in here'
TabOrder = 3
end
object FunctionComboBox: TComboBox
Left = 110
Top = 220
Width = 101
Height = 28
Hint = 'The available functions to insert or apply'
Style = csDropDownList
ItemHeight = 20
Items.Strings = (
'PI'
'COS'
'SIN'
'SINH'
'COSH'
'TAN'
'COTAN'
'ARCTAN'
'ARG'
'EXP'
'LN'
'LOG10'
'LOG2'
'LOGN'
'SQRT'
'SQR'
'POWER'
'INTPOWER'
'MIN'
'MAX'
'ABS'
'TRUNC'
'INT'
'CEIL'
'FLOOR'
'HEAV (=1 for x=>0, 0 for x<0),'
'SIGN (= 1 for x>1, 0 for x=0, -1 for x<0),'
'ZERO (= 0 for x=0, 1 for x<>0),'
'PH (= x - 2*pi*round(x/2/pi))'
'RND (= int(x) * Random)'
'RANDOM')
ParentShowHint = False
ShowHint = True
TabOrder = 4
OnClick = FunctionComboBoxClick
end
object InsertBitBtn: TBitBtn
Left = 10
Top = 220
Width = 94
Height = 31
Hint =
'Insert the chosen function at the cursor, or apply it to the sel' +
'ected text'
Caption = '&Insert:'
ParentShowHint = False
ShowHint = True
TabOrder = 5
OnClick = InsertBitBtnClick
end
end