17 lines
319 B
Text
17 lines
319 B
Text
|
object fmNoise: TfmNoise
|
||
|
|
Left = 0
|
||
|
|
Top = 0
|
||
|
|
BorderIcons = [biSystemMenu]
|
||
|
|
BorderStyle = bsSingle
|
||
|
|
Caption = 'fmNoise'
|
||
|
|
ClientHeight = 240
|
||
|
|
ClientWidth = 320
|
||
|
|
OnCreate = FormCreate
|
||
|
|
OnDestroy = FormDestroy
|
||
|
|
OnPaint = FormPaint
|
||
|
|
object tmr1sec: TTimer
|
||
|
|
Interval = 2000
|
||
|
|
OnTimer = tmr1secTimer
|
||
|
|
end
|
||
|
|
end
|