Blame lazarus/gravity-control/unit1.lfm
|
Ivan Mahonin |
b59892 |
object Form1: TForm1
|
|
Ivan Mahonin |
b59892 |
Cursor = crCross
|
|
Ivan Mahonin |
b59892 |
Left = 167
|
|
Ivan Mahonin |
b59892 |
Height = 526
|
|
Ivan Mahonin |
b59892 |
Top = 217
|
|
Ivan Mahonin |
b59892 |
Width = 830
|
|
Ivan Mahonin |
b59892 |
Caption = 'Form1'
|
|
Ivan Mahonin |
b59892 |
ClientHeight = 526
|
|
Ivan Mahonin |
b59892 |
ClientWidth = 830
|
|
Ivan Mahonin |
b59892 |
OnMouseMove = FormMouseMove
|
|
Ivan Mahonin |
b59892 |
LCLVersion = '1.6.2.0'
|
|
Ivan Mahonin |
b59892 |
object Shape1: TShape
|
|
Ivan Mahonin |
b59892 |
Left = 134
|
|
Ivan Mahonin |
b59892 |
Height = 65
|
|
Ivan Mahonin |
b59892 |
Top = 123
|
|
Ivan Mahonin |
b59892 |
Width = 65
|
|
Ivan Mahonin |
b59892 |
Shape = stCircle
|
|
Ivan Mahonin |
b59892 |
end
|
|
Ivan Mahonin |
b59892 |
object Timer1: TTimer
|
|
Ivan Mahonin |
b59892 |
Interval = 5
|
|
Ivan Mahonin |
b59892 |
OnTimer = Timer1Timer
|
|
Ivan Mahonin |
b59892 |
left = 17
|
|
Ivan Mahonin |
b59892 |
top = 10
|
|
Ivan Mahonin |
b59892 |
end
|
|
Ivan Mahonin |
b59892 |
object Timer2: TTimer
|
|
Ivan Mahonin |
b59892 |
Interval = 50
|
|
Ivan Mahonin |
b59892 |
OnTimer = Timer2Timer
|
|
Ivan Mahonin |
b59892 |
left = 56
|
|
Ivan Mahonin |
b59892 |
top = 9
|
|
Ivan Mahonin |
b59892 |
end
|
|
Ivan Mahonin |
b59892 |
end
|